home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / mail / mh / updates / MH.6.8.Z / MH.6.8
Encoding:
Text File  |  1992-12-14  |  1.3 MB  |  55,593 lines
Text Truncated. Only the first 1MB is shown below. Download the file for the complete contents.
  1. *** ../mh-6.7.2/Patchlevel    Wed Jan 22 13:37:46 1992
  2. --- Patchlevel    Mon Dec 14 16:24:15 1992
  3. ***************
  4. *** 1 ****
  5. ! MH.6.7 patch.2
  6. --- 1 ----
  7. ! MH.6.8 patch.0
  8. *** ../mh-6.7.2/conf/Makefile    Thu Apr  5 16:05:23 1990
  9. --- conf/Makefile    Mon Oct 26 14:36:23 1992
  10. ***************
  11. *** 3,5 ****
  12.   ######################################################################
  13. ! # @(#)$Id: Makefile,v 2.2 90/04/05 15:18:33 sources Exp $
  14.   
  15. --- 3,7 ----
  16.   ######################################################################
  17. ! # @(#)$Id: Makefile,v 2.3 1992/10/26 22:36:21 jromine Exp $
  18. ! 
  19. ! SHELL    =    /bin/sh
  20.   
  21. *** ../mh-6.7.2/conf/config/config.c    Fri Jan 24 17:10:25 1992
  22. --- conf/config/config.c    Mon Nov 16 14:51:06 1992
  23. ***************
  24. *** 1,7 ****
  25.   /* config.c - master MH configuration file */
  26.   #ifndef    lint
  27. ! static char ident[] = "@(#)$Id: config.c,v 1.5 1992/01/24 00:35:28 jromine Exp $";
  28. ! #endif    lint
  29.   
  30.   /* @(MHWARNING) */
  31.   
  32. --- 1,7 ----
  33.   /* config.c - master MH configuration file */
  34.   #ifndef    lint
  35. ! static char ident[] = "@(#)$Id: config.c,v 1.9 1992/11/05 16:59:39 jromine Exp $";
  36. ! #endif    /* lint */
  37.   
  38.   /* @(MHWARNING) */
  39.   
  40. ***************
  41. *** 10,20 ****
  42.   #include "../h/mh.h"
  43.   #ifdef    MHRC
  44.   #include <pwd.h>
  45. ! #endif    MHRC
  46.   #include <stdio.h>
  47.   
  48.   
  49. ! #if    defined(__STDC__) && !defined(__HIGHC__)
  50.   #define    binpath(file) "@(MHBINPATH)/"#file
  51.   #define    etcpath(file) "@(MHETCPATH)/"#file
  52.   #else
  53. --- 10,20 ----
  54.   #include "../h/mh.h"
  55.   #ifdef    MHRC
  56.   #include <pwd.h>
  57. ! #endif /* MHRC */
  58.   #include <stdio.h>
  59.   
  60.   
  61. ! #if    defined(__STDC__)
  62.   #define    binpath(file) "@(MHBINPATH)/"#file
  63.   #define    etcpath(file) "@(MHETCPATH)/"#file
  64.   #else
  65. ***************
  66. *** 27,37 ****
  67.   @(MHCONFIG)
  68.   
  69.   
  70.   #ifdef    MHRC
  71.   #ifdef    SYS5
  72.   struct passwd *getpwnam ();
  73. ! #endif    SYS5
  74. ! #endif    MHRC
  75.   
  76.   /*   */
  77.   
  78. --- 27,39 ----
  79.   @(MHCONFIG)
  80.   
  81.   
  82. + #ifndef    __STDC__
  83.   #ifdef    MHRC
  84.   #ifdef    SYS5
  85.   struct passwd *getpwnam ();
  86. ! #endif /* SYS5 */
  87. ! #endif /* MHRC */
  88. ! #endif
  89.   
  90.   /*   */
  91.   
  92. ***************
  93. *** 44,54 ****
  94.   #ifdef    MHRC
  95.       char   *pp;
  96.       struct passwd  *pw;
  97. ! #endif    MHRC
  98.   
  99.   #ifdef    MHRC
  100.       m_getdefs ();
  101. ! #endif    MHRC
  102.   
  103.       switch (*file) {
  104.       case '/': 
  105. --- 46,56 ----
  106.   #ifdef    MHRC
  107.       char   *pp;
  108.       struct passwd  *pw;
  109. ! #endif /* MHRC */
  110.   
  111.   #ifdef    MHRC
  112.       m_getdefs ();
  113. ! #endif /* MHRC */
  114.   
  115.       switch (*file) {
  116.       case '/': 
  117. ***************
  118. *** 57,64 ****
  119.   #ifdef    MHRC
  120.       case '~': 
  121.           if (cp = index (pp = file + 1, '/'))
  122. !         *cp++ = NULL;
  123. !         if (*pp == NULL)
  124.           pp = mypath;
  125.           else
  126.           if (pw = getpwnam (pp))
  127. --- 59,66 ----
  128.   #ifdef    MHRC
  129.       case '~': 
  130.           if (cp = index (pp = file + 1, '/'))
  131. !         *cp++ = '\0';
  132. !         if (*pp == '\0')
  133.           pp = mypath;
  134.           else
  135.           if (pw = getpwnam (pp))
  136. ***************
  137. *** 76,82 ****
  138.           if (access (lpath, 04) != NOTOK)
  139.           return lpath;    /* else fall */
  140.       try_it: ;
  141. ! #endif    MHRC
  142.   
  143.       default: 
  144.           if (access ((cp = m_mailpath (file)), 04) != NOTOK)
  145. --- 78,84 ----
  146.           if (access (lpath, 04) != NOTOK)
  147.           return lpath;    /* else fall */
  148.       try_it: ;
  149. ! #endif /* MHRC */
  150.   
  151.       default: 
  152.           if (access ((cp = m_mailpath (file)), 04) != NOTOK)
  153. ***************
  154. *** 96,102 ****
  155.   struct swit anoyes[] = {
  156.       "no", 0,
  157.       "yes", 0,
  158. !     NULL, NULL
  159.   };
  160.   
  161.   /*   */
  162. --- 98,104 ----
  163.   struct swit anoyes[] = {
  164.       "no", 0,
  165.       "yes", 0,
  166. !     NULL, 0
  167.   };
  168.   
  169.   /*   */
  170. ***************
  171. *** 112,117 ****
  172. --- 114,120 ----
  173.   char   *distcomps = "distcomps";
  174.   char   *draft = "draft";
  175.   char   *forwcomps = "forwcomps";
  176. + char   *inbox = "inbox";
  177.   char   *mh_defaults = etcpath (mh.profile);
  178.   char   *mh_profile = ".mh_profile";
  179.   char   *mhlformat = "mhl.format";
  180. ***************
  181. *** 131,139 ****
  182.   char   *context = "context";
  183.   #ifndef    NOMHSEQ
  184.   char   *mh_seq = ".mh_sequences";
  185. ! #else    NOMHSEQ
  186.   char   *mh_seq = NULL;
  187. ! #endif    NOMHSEQ
  188.   
  189.   
  190.   /* 
  191. --- 134,142 ----
  192.   char   *context = "context";
  193.   #ifndef    NOMHSEQ
  194.   char   *mh_seq = ".mh_sequences";
  195. ! #else /* NOMHSEQ */
  196.   char   *mh_seq = NULL;
  197. ! #endif /* NOMHSEQ */
  198.   
  199.   
  200.   /* 
  201. ***************
  202. *** 193,201 ****
  203.   
  204.   #ifndef    MORE
  205.   char   *lproc = "/usr/ucb/more";
  206. ! #else    MORE
  207.   char   *lproc = MORE;
  208. ! #endif    MORE
  209.   
  210.   
  211.   /*
  212. --- 196,204 ----
  213.   
  214.   #ifndef    MORE
  215.   char   *lproc = "/usr/ucb/more";
  216. ! #else /* MORE */
  217.   char   *lproc = MORE;
  218. ! #endif /* MORE */
  219.   
  220.   
  221.   /*
  222. ***************
  223. *** 211,219 ****
  224.   
  225.   #ifndef    MORE
  226.   char   *moreproc = "/usr/ucb/more";
  227. ! #else    MORE
  228.   char   *moreproc = MORE;
  229. ! #endif    MORE
  230.   
  231.   
  232.   /* 
  233. --- 214,222 ----
  234.   
  235.   #ifndef    MORE
  236.   char   *moreproc = "/usr/ucb/more";
  237. ! #else /* MORE */
  238.   char   *moreproc = MORE;
  239. ! #endif /* MORE */
  240.   
  241.   
  242.   /* 
  243. ***************
  244. *** 248,254 ****
  245.   char   *postproc = etcpath (spost);
  246.   #else
  247.   char   *postproc = etcpath (post);
  248. ! #endif BERK
  249.   
  250.   
  251.   /* 
  252. --- 251,257 ----
  253.   char   *postproc = etcpath (spost);
  254.   #else
  255.   char   *postproc = etcpath (post);
  256. ! #endif /* BERK */
  257.   
  258.   
  259.   /* 
  260. ***************
  261. *** 281,289 ****
  262.   
  263.   #ifndef    MORE
  264.   char   *showproc = "/usr/ucb/more";
  265. ! #else    MORE
  266.   char   *showproc = MORE;
  267. ! #endif    MORE
  268.   
  269.   
  270.   /* 
  271. --- 284,292 ----
  272.   
  273.   #ifndef    MORE
  274.   char   *showproc = "/usr/ucb/more";
  275. ! #else /* MORE */
  276.   char   *showproc = MORE;
  277. ! #endif /* MORE */
  278.   
  279.   
  280.   /* 
  281. ***************
  282. *** 347,353 ****
  283.   
  284.   #ifndef    FOLDPROT
  285.   #define    FOLDPROT    "0711"
  286. ! #endif    not FOLDPROT
  287.   
  288.   char   *foldprot = FOLDPROT;
  289.   
  290. --- 350,356 ----
  291.   
  292.   #ifndef    FOLDPROT
  293.   #define    FOLDPROT    "0711"
  294. ! #endif /* not FOLDPROT */
  295.   
  296.   char   *foldprot = FOLDPROT;
  297.   
  298. ***************
  299. *** 360,365 ****
  300.   
  301.   #ifndef    MSGPROT
  302.   #define    MSGPROT        "0644"
  303. ! #endif    not MSGPROT
  304.   
  305.   char   *msgprot = MSGPROT;
  306. --- 363,368 ----
  307.   
  308.   #ifndef    MSGPROT
  309.   #define    MSGPROT        "0644"
  310. ! #endif /* not MSGPROT */
  311.   
  312.   char   *msgprot = MSGPROT;
  313. *** ../mh-6.7.2/conf/config/mts.c    Thu Feb 14 15:18:22 1991
  314. --- conf/config/mts.c    Tue Nov 24 10:40:38 1992
  315. ***************
  316. *** 1,7 ****
  317.   /* mts.c - definitions for the mail transport system */
  318.   #ifndef    lint
  319. ! static char ident[] = "@(#)$Id: mts.c,v 2.7 91/02/14 15:17:56 mh Exp $";
  320. ! #endif    lint
  321.   
  322.   /* LINTLIBRARY */
  323.   
  324. --- 1,7 ----
  325.   /* mts.c - definitions for the mail transport system */
  326.   #ifndef    lint
  327. ! static char ident[] = "@(#)$Id: mts.c,v 2.16 1992/11/24 18:40:34 jromine Exp $";
  328. ! #endif /* lint */
  329.   
  330.   /* LINTLIBRARY */
  331.   
  332. ***************
  333. *** 8,14 ****
  334.   #undef    NETWORK
  335.   #if    defined(BSD41A) || defined(BSD42) || defined(SOCKETS)
  336.   #define    NETWORK
  337. ! #endif    not (defined(BSD41A) || defined(BSD42) || defined(SOCKETS))
  338.   
  339.   #include "../h/strings.h"
  340.   #include <ctype.h>
  341. --- 8,14 ----
  342.   #undef    NETWORK
  343.   #if    defined(BSD41A) || defined(BSD42) || defined(SOCKETS)
  344.   #define    NETWORK
  345. ! #endif
  346.   
  347.   #include "../h/strings.h"
  348.   #include <ctype.h>
  349. ***************
  350. *** 17,30 ****
  351.   #ifdef    NETWORK
  352.   #if    defined(BSD42) || defined(SOCKETS)
  353.   #include <netdb.h>
  354. ! #endif    BSD42 or SOCKETS
  355. ! #else    not NETWORK
  356.   #ifndef SYS5
  357.   #include <whoami.h>
  358. ! #else SYS5
  359.   #include <sys/utsname.h>
  360. ! #endif SYS5
  361. ! #endif    not NETWORK
  362.   #include <pwd.h>
  363.   
  364.   
  365. --- 17,30 ----
  366.   #ifdef    NETWORK
  367.   #if    defined(BSD42) || defined(SOCKETS)
  368.   #include <netdb.h>
  369. ! #endif
  370. ! #else    /* NETWORK */
  371.   #ifndef SYS5
  372.   #include <whoami.h>
  373. ! #else
  374.   #include <sys/utsname.h>
  375. ! #endif /* SYS5 */
  376. ! #endif /* NETWORK */
  377.   #include <pwd.h>
  378.   
  379.   
  380. ***************
  381. *** 35,51 ****
  382.   
  383.   extern int  errno;
  384.   
  385. ! char   *tailor_value ();
  386.   
  387.   
  388. ! #ifdef    SYS5
  389.   #define    index    strchr
  390.   #define    rindex    strrchr
  391. ! #endif    SYS5
  392.   
  393.   char   *index (), *malloc (), *mktemp (), *rindex (), *strcpy ();
  394.   
  395.   struct passwd  *getpwuid ();
  396.   
  397.   /*   */
  398.   
  399. --- 35,55 ----
  400.   
  401.   extern int  errno;
  402.   
  403. ! static char   *tailor_value ();
  404.   
  405.   
  406. ! #if defined(SYS5) && !defined(_AIX)
  407.   #define    index    strchr
  408.   #define    rindex    strrchr
  409. ! #endif /* SYS5 */
  410.   
  411. + #if !defined(__STDC__) && !defined(_AIX) && !defined(_POSIX_SOURCE)
  412.   char   *index (), *malloc (), *mktemp (), *rindex (), *strcpy ();
  413.   
  414. + #ifdef    SYS5
  415.   struct passwd  *getpwuid ();
  416. + #endif
  417. + #endif /* !__STDC__ */
  418.   
  419.   /*   */
  420.   
  421. ***************
  422. *** 60,69 ****
  423.   static char *mtstailor = "@(MHETCPATH)/mtstailor";
  424.   
  425.   static char    *localname = "";
  426.   static char    *systemname = "";
  427.   #ifdef    MF
  428.   static char    *UUCPchan = "";
  429. ! #endif    MF
  430.   char    *mmdfldir = "@(MHDROPATH)";
  431.   char    *mmdflfil = "@(MHDROPFIL)";
  432.   char    *uucpldir = "/usr/spool/mail";
  433. --- 64,74 ----
  434.   static char *mtstailor = "@(MHETCPATH)/mtstailor";
  435.   
  436.   static char    *localname = "";
  437. + static char    *localdomain = "";
  438.   static char    *systemname = "";
  439.   #ifdef    MF
  440.   static char    *UUCPchan = "";
  441. ! #endif /* MF */
  442.   char    *mmdfldir = "@(MHDROPATH)";
  443.   char    *mmdflfil = "@(MHDROPFIL)";
  444.   char    *uucpldir = "/usr/spool/mail";
  445. ***************
  446. *** 80,88 ****
  447.   
  448.   #ifdef    MF
  449.   char   *umincproc = "@(MHETCPATH)/uminc";
  450. ! #else    MF
  451.   char   *umincproc = NULL;
  452. ! #endif    MF
  453.   
  454.   
  455.   int    lockstyle = LOK_UNIX;
  456. --- 85,93 ----
  457.   
  458.   #ifdef    MF
  459.   char   *umincproc = "@(MHETCPATH)/uminc";
  460. ! #else /* MF */
  461.   char   *umincproc = NULL;
  462. ! #endif /* MF */
  463.   
  464.   
  465.   int    lockstyle = LOK_UNIX;
  466. ***************
  467. *** 107,121 ****
  468.   static char *tmpmode = "0600";
  469.   char   *Okhosts = "@(MHETCPATH)/Rmail.OkHosts";
  470.   char   *Okdests = "@(MHETCPATH)/Rmail.OkDests";
  471. ! #endif    MHMTS
  472.   
  473.   #ifdef    MMDFMTS
  474. ! #endif    MMDFMTS
  475.   
  476.   #ifdef    SENDMTS
  477.   char   *hostable = "@(MHETCPATH)/hosts";
  478.   char   *sendmail = "/usr/lib/sendmail";
  479. ! #endif    SENDMTS
  480.   
  481.   
  482.   /* SMTP/POP stuff */
  483. --- 112,126 ----
  484.   static char *tmpmode = "0600";
  485.   char   *Okhosts = "@(MHETCPATH)/Rmail.OkHosts";
  486.   char   *Okdests = "@(MHETCPATH)/Rmail.OkDests";
  487. ! #endif /* MHMTS */
  488.   
  489.   #ifdef    MMDFMTS
  490. ! #endif /* MMDFMTS */
  491.   
  492.   #ifdef    SENDMTS
  493.   char   *hostable = "@(MHETCPATH)/hosts";
  494.   char   *sendmail = "/usr/lib/sendmail";
  495. ! #endif /* SENDMTS */
  496.   
  497.   
  498.   /* SMTP/POP stuff */
  499. ***************
  500. *** 135,141 ****
  501.   char    *popbbhost = "";
  502.   char    *popbbuser = "";
  503.   char    *popbblist = "@(MHETCPATH)/hosts.popbb";
  504. ! #endif    BPOP
  505.   
  506.   
  507.   /* MailDelivery */
  508. --- 140,146 ----
  509.   char    *popbbhost = "";
  510.   char    *popbbuser = "";
  511.   char    *popbblist = "@(MHETCPATH)/hosts.popbb";
  512. ! #endif /* BPOP */
  513.   
  514.   
  515.   /* MailDelivery */
  516. ***************
  517. *** 158,167 ****
  518.       char  **value;
  519.   }       binds[] = {
  520.       "localname", &localname,
  521.       "systemname", &systemname,
  522.   #ifdef    MF
  523.       "uucpchan", &UUCPchan,
  524. ! #endif    MF
  525.       "mmdfldir", &mmdfldir,
  526.       "mmdflfil", &mmdflfil,
  527.       "uucpldir", &uucpldir,
  528. --- 163,173 ----
  529.       char  **value;
  530.   }       binds[] = {
  531.       "localname", &localname,
  532. +     "localdomain", &localdomain,
  533.       "systemname", &systemname,
  534.   #ifdef    MF
  535.       "uucpchan", &UUCPchan,
  536. ! #endif /* MF */
  537.       "mmdfldir", &mmdfldir,
  538.       "mmdflfil", &mmdflfil,
  539.       "uucpldir", &uucpldir,
  540. ***************
  541. *** 185,199 ****
  542.       "tmpmode", &tmpmode,
  543.       "okhosts", &Okhosts,
  544.       "okdests", &Okdests,
  545. ! #endif    MHMTS
  546.   
  547.   #ifdef    MMDFMTS
  548. ! #endif    MMDFMTS
  549.   
  550.   #ifdef    SENDMTS
  551.       "hostable", &hostable,
  552.       "sendmail", &sendmail,
  553. ! #endif    SENDMTS
  554.   
  555.       "servers", &servers,
  556.       "pophost", &pophost,
  557. --- 191,205 ----
  558.       "tmpmode", &tmpmode,
  559.       "okhosts", &Okhosts,
  560.       "okdests", &Okdests,
  561. ! #endif /* MHMTS */
  562.   
  563.   #ifdef    MMDFMTS
  564. ! #endif /* MMDFMTS */
  565.   
  566.   #ifdef    SENDMTS
  567.       "hostable", &hostable,
  568.       "sendmail", &sendmail,
  569. ! #endif /* SENDMTS */
  570.   
  571.       "servers", &servers,
  572.       "pophost", &pophost,
  573. ***************
  574. *** 204,213 ****
  575.       "popbbhost", &popbbhost,
  576.       "popbbuser", &popbbuser,
  577.       "popbblist", &popbblist,
  578. ! #endif    BPOP
  579.   #ifdef    NNTP
  580.       "nntphost", &popbbhost,
  581. ! #endif    NNTP
  582.   
  583.       "maildelivery", &maildelivery,
  584.   
  585. --- 210,219 ----
  586.       "popbbhost", &popbbhost,
  587.       "popbbuser", &popbbuser,
  588.       "popbblist", &popbblist,
  589. ! #endif /* BPOP */
  590.   #ifdef    NNTP
  591.       "nntphost", &popbbhost,
  592. ! #endif /* NNTP */
  593.   
  594.       "maildelivery", &maildelivery,
  595.   
  596. ***************
  597. *** 240,253 ****
  598.       while (fgets (buffer, sizeof buffer, fp)) {
  599.       if ((cp = index (buffer, '\n')) == NULL)
  600.           break;
  601. !     *cp = NULL;
  602. !     if (*buffer == '#' || *buffer == NULL)
  603.           continue;
  604.       if ((bp = index (buffer, ':')) == NULL)
  605.           break;
  606. !     *bp++ = NULL;
  607.       while (isspace (*bp))
  608. !         *bp++ = NULL;
  609.   
  610.       for (b = binds; b -> keyword; b++)
  611.           if (strcmp (buffer, b -> keyword) == 0)
  612. --- 246,259 ----
  613.       while (fgets (buffer, sizeof buffer, fp)) {
  614.       if ((cp = index (buffer, '\n')) == NULL)
  615.           break;
  616. !     *cp = 0;
  617. !     if (*buffer == '#' || *buffer == '\0')
  618.           continue;
  619.       if ((bp = index (buffer, ':')) == NULL)
  620.           break;
  621. !     *bp++ = 0;
  622.       while (isspace (*bp))
  623. !         *bp++ = 0;
  624.   
  625.       for (b = binds; b -> keyword; b++)
  626.           if (strcmp (buffer, b -> keyword) == 0)
  627. ***************
  628. *** 264,270 ****
  629.   #ifdef    MHMTS
  630.       Syscpy = atoi (syscpy);
  631.       (void) sscanf (tmpmode, "0%o", &Tmpmode);
  632. ! #endif    MHMTS
  633.       Everyone = atoi (everyone);
  634.   }
  635.   
  636. --- 270,276 ----
  637.   #ifdef    MHMTS
  638.       Syscpy = atoi (syscpy);
  639.       (void) sscanf (tmpmode, "0%o", &Tmpmode);
  640. ! #endif /* MHMTS */
  641.       Everyone = atoi (everyone);
  642.   }
  643.   
  644. ***************
  645. *** 292,298 ****
  646.           grot ('t', '\t');
  647.   #undef    grot
  648.   
  649. !         case NULL: s--;
  650.           case QUOTE: 
  651.               *bp = QUOTE;
  652.               break;
  653. --- 298,304 ----
  654.           grot ('t', '\t');
  655.   #undef    grot
  656.   
  657. !         case 0: s--;
  658.           case QUOTE: 
  659.               *bp = QUOTE;
  660.               break;
  661. ***************
  662. *** 309,315 ****
  663.               *bp = toascii (i);
  664.               break;
  665.           }
  666. !     *bp = NULL;
  667.   
  668.       bp = malloc ((unsigned) (strlen (buffer) + 1));
  669.       if (bp != NULL)
  670. --- 315,321 ----
  671.               *bp = toascii (i);
  672.               break;
  673.           }
  674. !     *bp = 0;
  675.   
  676.       bp = malloc ((unsigned) (strlen (buffer) + 1));
  677.       if (bp != NULL)
  678. ***************
  679. *** 323,335 ****
  680.   char   *LocalName () {
  681.   #ifdef    BSD41A
  682.       char  *myname;
  683. ! #endif    BSD41A
  684.   #if    defined(BSD42) || defined(SOCKETS)
  685.       register struct hostent *hp;
  686. ! #endif    BSD42 or SOCKETS
  687.   #if    defined(SYS5) && !defined(NETWORK)
  688.       struct utsname name;
  689. ! #endif    SYS5 and not NETWORK
  690.       static char buffer[BUFSIZ] = "";
  691.   
  692.       if (buffer[0])
  693. --- 329,341 ----
  694.   char   *LocalName () {
  695.   #ifdef    BSD41A
  696.       char  *myname;
  697. ! #endif /* BSD41A */
  698.   #if    defined(BSD42) || defined(SOCKETS)
  699.       register struct hostent *hp;
  700. ! #endif /* BSD42 or SOCKETS */
  701.   #if    defined(SYS5) && !defined(NETWORK)
  702.       struct utsname name;
  703. ! #endif /* SYS5 and not NETWORK */
  704.       static char buffer[BUFSIZ] = "";
  705.   
  706.       if (buffer[0])
  707. ***************
  708. *** 337,347 ****
  709.   
  710.       mts_init ("mts");
  711.       if (*localname)
  712. !     return strcpy (buffer, localname);
  713.   
  714.   #ifdef    locname
  715.       (void) strcpy (buffer, locname);
  716. ! #else    not locname
  717.   #ifdef    NETWORK
  718.   #ifdef    BSD41A
  719.       myname = "myname";
  720. --- 343,354 ----
  721.   
  722.       mts_init ("mts");
  723.       if (*localname)
  724. !     strcpy (buffer, localname);
  725. !     else {
  726.   
  727.   #ifdef    locname
  728.       (void) strcpy (buffer, locname);
  729. ! #else /* not locname */
  730.   #ifdef    NETWORK
  731.   #ifdef    BSD41A
  732.       myname = "myname";
  733. ***************
  734. *** 351,357 ****
  735.       (void) strcpy (buffer, myname);
  736.       free (myname);
  737.       }
  738. ! #endif    BSD41A
  739.   #if    defined(BSD42) || defined(SOCKETS)
  740.       (void) gethostname (buffer, sizeof buffer);
  741.   #ifndef    BIND
  742. --- 358,364 ----
  743.       (void) strcpy (buffer, myname);
  744.       free (myname);
  745.       }
  746. ! #endif /* BSD41A */
  747.   #if    defined(BSD42) || defined(SOCKETS)
  748.       (void) gethostname (buffer, sizeof buffer);
  749.   #ifndef    BIND
  750. ***************
  751. *** 359,375 ****
  752.   #endif
  753.       if (hp = gethostbyname (buffer))
  754.       (void) strcpy (buffer, hp -> h_name);
  755. ! #endif    BSD42 or SOCKETS
  756. ! #else    not NETWORK
  757.   #ifndef    SYS5
  758.       (void) strcpy (buffer, SystemName ());
  759. ! #else    SYS5
  760.       (void) uname (&name);
  761.       (void) strcpy (buffer, name.nodename);
  762. ! #endif    SYS5
  763. ! #endif    not NETWORK
  764. ! #endif    not locname
  765. ! 
  766.       return buffer;
  767.   }
  768.   
  769. --- 366,386 ----
  770.   #endif
  771.       if (hp = gethostbyname (buffer))
  772.       (void) strcpy (buffer, hp -> h_name);
  773. ! #endif /* BSD42 or SOCKETS */
  774. ! #else /* not NETWORK */
  775.   #ifndef    SYS5
  776.       (void) strcpy (buffer, SystemName ());
  777. ! #else /* SYS5 */
  778.       (void) uname (&name);
  779.       (void) strcpy (buffer, name.nodename);
  780. ! #endif /* SYS5 */
  781. ! #endif /* not NETWORK */
  782. ! #endif /* not locname */
  783. !     }
  784. !     if (*localdomain) {
  785. !     strcat (buffer, ".");
  786. !     strcat (buffer, localdomain);
  787. !     }
  788.       return buffer;
  789.   }
  790.   
  791. ***************
  792. *** 378,384 ****
  793.   char *SystemName () {
  794.   #if    defined(SYS5) && !defined(NETWORK)
  795.       struct utsname name;
  796. ! #endif    SYS5 and not NETWORK
  797.       static char buffer[BUFSIZ] = "";
  798.   
  799.       if (buffer[0])
  800. --- 389,395 ----
  801.   char *SystemName () {
  802.   #if    defined(SYS5) && !defined(NETWORK)
  803.       struct utsname name;
  804. ! #endif /* SYS5 and not NETWORK */
  805.       static char buffer[BUFSIZ] = "";
  806.   
  807.       if (buffer[0])
  808. ***************
  809. *** 390,405 ****
  810.   
  811.   #ifdef    sysname
  812.       (void) strcpy (buffer, sysname);
  813. ! #else    sysname
  814.   #if    !defined(SYS5) || defined(NETWORK)
  815.       (void) gethostname (buffer, sizeof buffer);
  816. ! #else    SYS5 and not NETWORK
  817.   #ifdef    SYS5
  818.       (void) uname (&name);
  819.       (void) strcpy (buffer, name.nodename);
  820. ! #endif  SYS5
  821. ! #endif  SYS5 and not NETWORK
  822. ! #endif    sysname
  823.   
  824.       return buffer;
  825.   }
  826. --- 401,416 ----
  827.   
  828.   #ifdef    sysname
  829.       (void) strcpy (buffer, sysname);
  830. ! #else /* sysname */
  831.   #if    !defined(SYS5) || defined(NETWORK)
  832.       (void) gethostname (buffer, sizeof buffer);
  833. ! #else /* SYS5 and not NETWORK */
  834.   #ifdef    SYS5
  835.       (void) uname (&name);
  836.       (void) strcpy (buffer, name.nodename);
  837. ! #endif /* SYS5 */
  838. ! #endif /* SYS5 and not NETWORK */
  839. ! #endif /* sysname */
  840.   
  841.       return buffer;
  842.   }
  843. ***************
  844. *** 409,419 ****
  845.   char   *UucpChan () {
  846.   #ifdef    MF
  847.       static char buffer[BUFSIZ] = "";
  848. ! #endif    MF
  849.   
  850.   #ifndef    MF
  851.       return NULL;
  852. ! #else    MF
  853.       if (buffer[0])
  854.       return buffer;
  855.   
  856. --- 420,430 ----
  857.   char   *UucpChan () {
  858.   #ifdef    MF
  859.       static char buffer[BUFSIZ] = "";
  860. ! #endif /* MF */
  861.   
  862.   #ifndef    MF
  863.       return NULL;
  864. ! #else /* MF */
  865.       if (buffer[0])
  866.       return buffer;
  867.   
  868. ***************
  869. *** 423,433 ****
  870.   
  871.   #ifdef    uucpchan
  872.       (void) strcpy (buffer, uucpchan);
  873. ! #else    uucpchan
  874.       (void) strcpy (buffer, "uucp");
  875. ! #endif    uucpchan
  876.       return buffer;
  877. ! #endif    MF
  878.   }
  879.   
  880.   /*   */
  881. --- 434,444 ----
  882.   
  883.   #ifdef    uucpchan
  884.       (void) strcpy (buffer, uucpchan);
  885. ! #else /* uucpchan */
  886.       (void) strcpy (buffer, "uucp");
  887. ! #endif /* uucpchan */
  888.       return buffer;
  889. ! #endif /* MF */
  890.   }
  891.   
  892.   /*   */
  893. ***************
  894. *** 443,449 ****
  895.       if (fp = fopen ("/etc/systemid", "r")) {
  896.       if (fgets (name, len, fp)) {
  897.           if (cp = index (name, '\n'))
  898. !         *cp = NULL;
  899.           (void) fclose (fp);
  900.           return OK;
  901.       }
  902. --- 454,460 ----
  903.       if (fp = fopen ("/etc/systemid", "r")) {
  904.       if (fgets (name, len, fp)) {
  905.           if (cp = index (name, '\n'))
  906. !         *cp = 0;
  907.           (void) fclose (fp);
  908.           return OK;
  909.       }
  910. ***************
  911. *** 453,477 ****
  912.   
  913.       return OK;
  914.   }
  915. ! #endif    ALTOS
  916.   
  917.   /*   */
  918.   
  919. ! static char username[BUFSIZ] = "";
  920. ! static char fullname[BUFSIZ] = "";
  921.   
  922.   
  923.   char   *getusr () {
  924.       register char  *cp,
  925.                      *np;
  926.       register struct passwd *pw;
  927.   
  928.       if (username[0])
  929.       return username;
  930.   
  931.       if ((pw = getpwuid (getuid ())) == NULL
  932.           || pw -> pw_name == NULL
  933.           || *pw -> pw_name == NULL) {
  934.       (void) strcpy (username, "unknown");
  935.       (void) sprintf (fullname, "The Unknown User-ID (%d)", getuid ());
  936.       return username;
  937. --- 464,501 ----
  938.   
  939.       return OK;
  940.   }
  941. ! #endif /* ALTOS */
  942.   
  943.   /*   */
  944.   
  945. ! static char username[BUFSIZ];
  946. ! static char fullname[BUFSIZ];
  947.   
  948.   
  949.   char   *getusr () {
  950.       register char  *cp,
  951.                      *np;
  952. + #ifdef KPOP
  953. +     int uid;
  954. + #endif /* KPOP */
  955.       register struct passwd *pw;
  956.   
  957.       if (username[0])
  958.       return username;
  959.   
  960. + #ifndef KPOP
  961.       if ((pw = getpwuid (getuid ())) == NULL
  962.           || pw -> pw_name == NULL
  963.           || *pw -> pw_name == NULL) {
  964. + #else /* KPOP */
  965. +     uid = getuid ();
  966. +     if (uid == geteuid () && (cp = getenv ("USER")) != NULL
  967. +     && (pw = getpwnam (cp)) != NULL)
  968. +       strcpy (username, cp);
  969. +     else if ((pw = getpwuid (uid)) == NULL
  970. +          || pw -> pw_name == NULL
  971. +          || *pw -> pw_name == '\0') {
  972. + #endif /* KPOP */
  973.       (void) strcpy (username, "unknown");
  974.       (void) sprintf (fullname, "The Unknown User-ID (%d)", getuid ());
  975.       return username;
  976. ***************
  977. *** 480,494 ****
  978.       np = pw -> pw_gecos;
  979.       for (cp = fullname; *np && *np != (MMailids ? '<' : ','); *cp++ = *np++)
  980.       continue;
  981. !     *cp = NULL;
  982.       if (MMailids) {
  983.       if (*np)
  984.           np++;
  985.       for (cp = username; *np && *np != '>'; *cp++ = *np++)
  986.           continue;
  987. !     *cp = NULL;
  988.       }
  989. !     if (MMailids == 0 || *np == NULL)
  990.       (void) strcpy (username, pw -> pw_name);
  991.   
  992.       if ((cp = getenv ("SIGNATURE")) && *cp)
  993. --- 504,518 ----
  994.       np = pw -> pw_gecos;
  995.       for (cp = fullname; *np && *np != (MMailids ? '<' : ','); *cp++ = *np++)
  996.       continue;
  997. !     *cp = '\0';
  998.       if (MMailids) {
  999.       if (*np)
  1000.           np++;
  1001.       for (cp = username; *np && *np != '>'; *cp++ = *np++)
  1002.           continue;
  1003. !     *cp = '\0';
  1004.       }
  1005. !     if (MMailids == 0 || *np == '\0')
  1006.       (void) strcpy (username, pw -> pw_name);
  1007.   
  1008.       if ((cp = getenv ("SIGNATURE")) && *cp)
  1009. ***************
  1010. *** 504,510 ****
  1011.   
  1012.   
  1013.   char   *getfullname () {
  1014. !     if (username[0] == NULL)
  1015.       (void) getusr ();
  1016.   
  1017.       return fullname;
  1018. --- 528,534 ----
  1019.   
  1020.   
  1021.   char   *getfullname () {
  1022. !     if (username[0] == '\0')
  1023.       (void) getusr ();
  1024.   
  1025.       return fullname;
  1026. ***************
  1027. *** 537,543 ****
  1028.       return NOTOK;
  1029.   }
  1030.   
  1031. ! #else    notdef
  1032.   int     dup2 (d1, d2)
  1033.   register int    d1,
  1034.                   d2;
  1035. --- 561,567 ----
  1036.       return NOTOK;
  1037.   }
  1038.   
  1039. ! #else /* notdef */
  1040.   int     dup2 (d1, d2)
  1041.   register int    d1,
  1042.                   d2;
  1043. ***************
  1044. *** 569,573 ****
  1045.       errno = eindex;
  1046.       return i;
  1047.   }
  1048. ! #endif    notdef
  1049. ! #endif    SYS5
  1050. --- 593,597 ----
  1051.       errno = eindex;
  1052.       return i;
  1053.   }
  1054. ! #endif /* notdef */
  1055. ! #endif /* SYS5 */
  1056. *** ../mh-6.7.2/conf/doc/ADMIN.rf    Mon Jan  7 16:14:25 1991
  1057. --- conf/doc/ADMIN.rf    Wed Oct 28 08:51:22 1992
  1058. ***************
  1059. *** 1,3 ****
  1060.   .\"    @(MHWARNING)
  1061. ! .\" @(#)$Id: ADMIN.rf,v 2.13 91/01/07 16:14:24 mh Exp $
  1062.   .po +.75i
  1063. --- 1,3 ----
  1064.   .\"    @(MHWARNING)
  1065. ! .\" @(#)$Id: ADMIN.rf,v 2.16 1992/05/19 21:48:37 jromine Exp $
  1066.   .po +.75i
  1067. ***************
  1068. *** 177,179 ****
  1069.   .ti .25i
  1070. ! .b "\\$1"
  1071.   .sp
  1072. --- 177,179 ----
  1073.   .ti .25i
  1074. ! .b "\\s-2\\$1\\s0"
  1075.   .sp
  1076. ***************
  1077. *** 500,502 ****
  1078.   For historical reasons, many sites are using port \*(lq109\*(rq
  1079. ! which is the port assigned to the \*(lqPOP\*(rq (ver. 1) protocol.
  1080.   The configuration option \*(lqPOPSERVICE\*(rq is the name of the
  1081. --- 500,502 ----
  1082.   For historical reasons, many sites are using port \*(lq109\*(rq
  1083. ! which is the port assigned to the \*(lqPOP\*(rq (version 1 and 2) protocol.
  1084.   The configuration option \*(lqPOPSERVICE\*(rq is the name of the
  1085. ***************
  1086. *** 587,594 ****
  1087.   .pp
  1088. ! These two different philosophies are compatible on the same POP service host:
  1089. ! to selectively disable RPOP for hosts which aren't trusted,
  1090. ! either modify the \fI\&.rhosts\fR file in the case of POP subscribers being
  1091. ! UNIX logins,
  1092. ! or zero the contents of network address field of the \fIpop\fR\0(5) file for
  1093. ! the desired POP subscribers.
  1094.   .if t \{
  1095. --- 587,631 ----
  1096.   .pp
  1097. ! Authentication for POP subscribers differs
  1098. ! depending on the two methods.
  1099. ! When the user supplies a password for the POP session:
  1100. ! under the first method,
  1101. ! the contents of the password field for the user's entry in the
  1102. ! \fIpasswd\fR\0(5) is consulted;
  1103. ! under the second method,
  1104. ! the contents of the password field for the subscriber's entry in the
  1105. ! \fIpop\fR\0(5) file is consulted.
  1106. ! (To set this field, the \fIpopwrd\fR\0(8) program is used.)
  1107. ! .pp
  1108. ! If you are allowing RPOP,
  1109. ! under the first method,
  1110. ! the user's \fI\&.rhosts\fR file is consulted;
  1111. ! under the second method,
  1112. ! the contents of the network address field for the subscriber's entry
  1113. ! in the \fIpop\fR\0(5) file is consulted.
  1114. ! .pp
  1115. ! In addition,
  1116. ! a third authentication scheme is available.
  1117. ! When the APOP configuration option is given,
  1118. ! e.g.,
  1119. ! .sp
  1120. ! .ti +.5i
  1121. ! options    APOP='\*(lq/etc/pop.auth\*(rq'
  1122. ! .sp
  1123. ! In this case,
  1124. ! the server also allows a client to supply authentication
  1125. ! credentials to provide for origin authentication and reply protection,
  1126. ! but which do not involve sending a password in the clear over the network.
  1127. ! A POP authorization DB,
  1128. ! having as its name the value of APOP configuration option,
  1129. ! is used to keep track of this information.
  1130. ! This file is created and manipulated by the \fIpopauth\fR\0(8) program.
  1131. ! Because this file contains secret information,
  1132. ! it must be protected mode 0600 and owned by the super-user.
  1133. ! Hence,
  1134. ! your first step after installing the software is to issue
  1135. ! .sp
  1136. ! .ti +.5i
  1137. ! # popauth -init
  1138. ! .sp
  1139. ! which creates and initalizes the POP authorization DB.
  1140.   .if t \{
  1141. ***************
  1142. *** 602,603 ****
  1143. --- 639,641 ----
  1144.   .so popaka.me
  1145. + .so popauth.me
  1146.   .so popd.me
  1147. *** ../mh-6.7.2/conf/doc/MH.rf    Wed Jan 29 14:51:23 1992
  1148. --- conf/doc/MH.rf    Wed Dec  2 11:03:24 1992
  1149. ***************
  1150. *** 1,3 ****
  1151.   .\"    @(MHWARNING)
  1152. ! .\" @(#)$Id: MH.rf,v 1.15 1991/01/25 15:49:34 mh Exp jromine $
  1153.   .po +.75i
  1154. --- 1,3 ----
  1155.   .\"    @(MHWARNING)
  1156. ! .\" @(#)$Id: MH.rf,v 1.26 1992/12/02 19:03:15 jromine Exp $
  1157.   .po +.75i
  1158. ***************
  1159. *** 768,769 ****
  1160. --- 768,770 ----
  1161.   ^Editor:\0/usr/ucb/ex~^\fIcomp, dist, forw, repl\fR
  1162. + ^Inbox:\0inbox~^\fIinc, rmf\fR
  1163.   ^Msg\-Protect:\0644~^\fIinc\fR
  1164. ***************
  1165. *** 978,980 ****
  1166.   .ti -.25i
  1167. ! .b "\\$1"
  1168.   .sp
  1169. --- 979,981 ----
  1170.   .ti -.25i
  1171. ! .b "\\s-2\\$1\\s0"
  1172.   .sp
  1173. ***************
  1174. *** 1069,1071 ****
  1175.   .so dist.me
  1176. - .so fmtdump.me
  1177.   .so folder.me
  1178. --- 1070,1071 ----
  1179. ***************
  1180. *** 1076,1078 ****
  1181. --- 1076,1082 ----
  1182.   .so mhmail.me
  1183. + @BEGIN: MIME
  1184. + .so mhn.me
  1185. + @END: MIME
  1186.   .so mhook.me
  1187. + .so mhparam.me
  1188.   .so mhpath.me
  1189. ***************
  1190. *** 1083,1084 ****
  1191. --- 1087,1091 ----
  1192.   .so pick.me
  1193. + @BEGIN: MPOP
  1194. + .so popi.me
  1195. + @END: MPOP
  1196.   .so prev.me
  1197. ***************
  1198. *** 1093,1094 ****
  1199. --- 1100,1102 ----
  1200.   .so show.me
  1201. + .so slocal.me
  1202.   .so sortm.me
  1203. ***************
  1204. *** 1129,1132 ****
  1205.   .so dp.me
  1206. - .so install-mh.me
  1207.   .so fmtdump.me
  1208.   .so post.me
  1209. --- 1137,1140 ----
  1210.   .so dp.me
  1211.   .so fmtdump.me
  1212. + .so install-mh.me
  1213.   .so post.me
  1214. ***************
  1215. *** 1337,1339 ****
  1216.   Otherwise, \fIprivate\fR sequences are created.
  1217. ! This can be overridden with the `\-public' and `\-private' switches.
  1218.   .UH "Sequence Negation"
  1219. --- 1345,1347 ----
  1220.   Otherwise, \fIprivate\fR sequences are created.
  1221. ! This can be overridden with the `\-public' and `\-nopublic' switches.
  1222.   .UH "Sequence Negation"
  1223. ***************
  1224. *** 2089,2093 ****
  1225.   1.  If you can FTP to the ARPA Internet, use anonymous FTP to
  1226. ! ics.uci.edu [128.195.1.1] and retrieve the file pub/mh/mh-6.7.tar.Z.
  1227.   This is a tar image after being run through the compress program
  1228. ! (approximately 1.5MB).  There should also be a \fBREADME\fR file in
  1229.   that directory which tells what the current release of \fIMH\fP
  1230. --- 2097,2101 ----
  1231.   1.  If you can FTP to the ARPA Internet, use anonymous FTP to
  1232. ! ics.uci.edu [128.195.1.1] and retrieve the file pub/mh/mh-6.8.tar.Z.
  1233.   This is a tar image after being run through the compress program
  1234. ! (approximately 1.8MB).  There should also be a \fBREADME\fR file in
  1235.   that directory which tells what the current release of \fIMH\fP
  1236. ***************
  1237. *** 2096,2098 ****
  1238.   This tar file is also available on louie.udel.edu 
  1239. ! [128.175.1.3] in portal/mh-6.7.tar.Z.  You may also find MH on
  1240.   various other hosts; to make sure you get the latest version and
  1241. --- 2104,2106 ----
  1242.   This tar file is also available on louie.udel.edu 
  1243. ! [128.175.1.3] in portal/mh-6.8.tar.Z.  You may also find MH on
  1244.   various other hosts; to make sure you get the latest version and
  1245. *** ../mh-6.7.2/conf/doc/ali.rf    Thu Apr  5 16:04:34 1990
  1246. --- conf/doc/ali.rf    Mon Feb 10 16:48:04 1992
  1247. ***************
  1248. *** 1,3 ****
  1249.   .\"    @(MHWARNING)
  1250. ! .\" @(#)$Id: ali.rf,v 1.6 90/04/05 15:09:39 sources Exp $
  1251.   .SC ALI 1
  1252. --- 1,3 ----
  1253.   .\"    @(MHWARNING)
  1254. ! .\" @(#)$Id: ali.rf,v 1.7 1992/02/11 00:47:53 jromine Exp $
  1255.   .SC ALI 1
  1256. ***************
  1257. *** 29,31 ****
  1258.   
  1259. ! The file specified by the profile entry \*(lqAliasfile:\*(rq and any
  1260.   additional alias files given by the `\-alias aliasfile' switch will be read.
  1261. --- 29,31 ----
  1262.   
  1263. ! The files specified by the profile entry \*(lqAliasfile:\*(rq and any
  1264.   additional alias files given by the `\-alias aliasfile' switch will be read.
  1265. *** ../mh-6.7.2/conf/doc/ap.rf    Thu Apr  5 16:04:38 1990
  1266. --- conf/doc/ap.rf    Tue May 12 15:23:59 1992
  1267. ***************
  1268. *** 1,3 ****
  1269.   .\"    @(MHWARNING)
  1270. ! .\" @(#)$Id: ap.rf,v 1.6 90/04/05 15:10:21 sources Exp $
  1271.   .SC AP 8
  1272. --- 1,3 ----
  1273.   .\"    @(MHWARNING)
  1274. ! .\" @(#)$Id: ap.rf,v 1.7 1992/05/12 22:23:34 jromine Exp $
  1275.   .SC AP 8
  1276. ***************
  1277. *** 4,6 ****
  1278.   .NA
  1279. ! ap \- parse addresses 822\-style
  1280.   .SY
  1281. --- 4,6 ----
  1282.   .NA
  1283. ! ap \- parse addresses 822-style
  1284.   .SY
  1285. *** ../mh-6.7.2/conf/doc/bbc.rf    Thu Apr  5 16:04:23 1990
  1286. --- conf/doc/bbc.rf    Wed Feb  5 13:00:43 1992
  1287. ***************
  1288. *** 1,3 ****
  1289.   .\"    @(MHWARNING)
  1290. ! .\" @(#)$Id: bbc.rf,v 2.4 90/04/05 15:07:52 sources Exp $
  1291.   .SC BBC 1
  1292. --- 1,3 ----
  1293.   .\"    @(MHWARNING)
  1294. ! .\" @(#)$Id: bbc.rf,v 2.5 1992/02/05 21:00:33 jromine Exp $
  1295.   .SC BBC 1
  1296. ***************
  1297. *** 132,135 ****
  1298.   
  1299.   The `\-rcfile\ rcfile' switch overrides the use of \fI\&.bbrc\fR for
  1300. ! user\-specific BBoards information.
  1301.   If the value given to the switch is not absolute,
  1302. --- 132,138 ----
  1303.   
  1304. + The \fI\&.bbrc\fR file in the 
  1305. + user's \fB$HOME\fR directory
  1306. + is used to keep track of what messages have been read.
  1307.   The `\-rcfile\ rcfile' switch overrides the use of \fI\&.bbrc\fR for
  1308. ! this purpose.
  1309.   If the value given to the switch is not absolute,
  1310. ***************
  1311. *** 140,143 ****
  1312.   and honors it similarly.
  1313. - If this envariable is not set,
  1314. - then the file \fI\&.bbrc\fR in the user's \fB$HOME\fR directory is used.
  1315.   .Fi
  1316. --- 143,144 ----
  1317. ***************
  1318. *** 144,146 ****
  1319.   ^$HOME/\&.mh\(ruprofile~^The user profile
  1320. ! ^$HOME/\&.bbrc~^BBoard information
  1321.   .Pr
  1322. --- 145,147 ----
  1323.   ^$HOME/\&.mh\(ruprofile~^The user profile
  1324. ! ^$HOME/\&.bbrc~^BBoard \*(lqcurrent\*(rq message information
  1325.   .Pr
  1326. *** ../mh-6.7.2/conf/doc/bbleader.rf    Thu Apr  5 16:04:44 1990
  1327. --- conf/doc/bbleader.rf    Tue May 12 15:23:54 1992
  1328. ***************
  1329. *** 1,3 ****
  1330.   .\"    @(MHWARNING)
  1331. ! .\" @(#)$Id: bbleader.rf,v 1.5 90/04/05 15:11:34 sources Exp $
  1332.   .SC BBLEADER 1
  1333. --- 1,3 ----
  1334.   .\"    @(MHWARNING)
  1335. ! .\" @(#)$Id: bbleader.rf,v 1.6 1992/05/12 22:23:34 jromine Exp $
  1336.   .SC BBLEADER 1
  1337. ***************
  1338. *** 4,6 ****
  1339.   .NA
  1340. ! BBleader \- responsiblities of a BBoard\-leader
  1341.   .SY
  1342. --- 4,6 ----
  1343.   .NA
  1344. ! BBleader \- responsiblities of an MH BBoard-leader
  1345.   .SY
  1346. *** ../mh-6.7.2/conf/doc/comp.rf    Mon Dec 17 16:29:37 1990
  1347. --- conf/doc/comp.rf    Tue Sep 15 09:58:11 1992
  1348. ***************
  1349. *** 1,3 ****
  1350.   .\"    @(MHWARNING)
  1351. ! .\" @(#)$Id: comp.rf,v 1.6 90/12/17 16:29:30 mh Exp $
  1352.   .SC COMP 1
  1353. --- 1,3 ----
  1354.   .\"    @(MHWARNING)
  1355. ! .\" @(#)$Id: comp.rf,v 1.6 1990/12/17 16:29:30 mh Exp $
  1356.   .SC COMP 1
  1357. *** ../mh-6.7.2/conf/doc/dp.rf    Thu Apr  5 16:04:30 1990
  1358. --- conf/doc/dp.rf    Tue May 12 15:24:00 1992
  1359. ***************
  1360. *** 1,3 ****
  1361.   .\"    @(MHWARNING)
  1362. ! .\" @(#)$Id: dp.rf,v 1.6 90/04/05 15:08:58 sources Exp $
  1363.   .SC DP 8
  1364. --- 1,3 ----
  1365.   .\"    @(MHWARNING)
  1366. ! .\" @(#)$Id: dp.rf,v 1.7 1992/05/12 22:23:34 jromine Exp $
  1367.   .SC DP 8
  1368. ***************
  1369. *** 4,6 ****
  1370.   .NA
  1371. ! dp \- parse dates 822\-style
  1372.   .SY
  1373. --- 4,6 ----
  1374.   .NA
  1375. ! dp \- parse dates 822-style
  1376.   .SY
  1377. *** ../mh-6.7.2/conf/doc/fmtdump.rf    Fri Jan 25 15:47:32 1991
  1378. --- conf/doc/fmtdump.rf    Wed Dec  2 13:48:51 1992
  1379. ***************
  1380. *** 1,3 ****
  1381.   .\"    @(MHWARNING)
  1382. ! .\" @(#)$Id: fmtdump.rf,v 1.2 91/01/25 15:47:30 mh Exp $
  1383.   .SC FMTDUMP 8
  1384. --- 1,3 ----
  1385.   .\"    @(MHWARNING)
  1386. ! .\" @(#)$Id: fmtdump.rf,v 1.6 1992/12/02 21:38:37 jromine Exp $
  1387.   .SC FMTDUMP 8
  1388. ***************
  1389. *** 4,8 ****
  1390.   .NA
  1391. ! fmtdump \- decode \fIMH\fP format files
  1392.   .SY
  1393. ! @(MHETCPATH)/fmtdump formatfile
  1394.   .DE
  1395. --- 4,11 ----
  1396.   .NA
  1397. ! fmtdump \- decode MH format files
  1398.   .SY
  1399. ! @(MHETCPATH)/fmtdump
  1400. ! \%[\-form\ formatfile]
  1401. ! \%[\-format\ string]
  1402. ! \%[\-help]
  1403.   .DE
  1404. ***************
  1405. *** 11,14 ****
  1406.   interprets the file.
  1407.   .Sa
  1408. ! mh-format(8), mh-sequences(8)
  1409.   .Co
  1410. --- 14,27 ----
  1411.   interprets the file.
  1412. + 
  1413. + The `\-format\ string' and `\-form\ formatfile' switches may be used
  1414. + to specify a format string or format file to read.
  1415. + The string is simply a format string and the file is simply a format file.
  1416. + See \fImh-format\fR\|(5) for the details.
  1417. + .Fi
  1418. + ^$HOME/\&.mh\(ruprofile~^The user profile
  1419. + ^@(MHETCPATH)/scan.default~^The default format file
  1420. + .Pr
  1421. + ^Path:~^To determine the user's MH directory
  1422.   .Sa
  1423. ! mh-format(5), mh-sequences(8)
  1424.   .Co
  1425. *** ../mh-6.7.2/conf/doc/folder.rf    Tue Dec 18 14:28:15 1990
  1426. --- conf/doc/folder.rf    Thu Oct 29 13:50:31 1992
  1427. ***************
  1428. *** 1,3 ****
  1429.   .\"    @(MHWARNING)
  1430. ! .\" @(#)$Id: folder.rf,v 1.6 90/12/18 14:28:05 mh Exp $
  1431.   .SC FOLDER 1
  1432. --- 1,3 ----
  1433.   .\"    @(MHWARNING)
  1434. ! .\" @(#)$Id: folder.rf,v 1.11 1992/10/29 21:50:27 jromine Exp $
  1435.   .SC FOLDER 1
  1436. ***************
  1437. *** 9,10 ****
  1438. --- 9,12 ----
  1439.   \%[\-all]
  1440. + \%[\-print]
  1441. + .\" \%[\-noprint]
  1442.   \%[\-fast] \%[\-nofast]
  1443. ***************
  1444. *** 11,13 ****
  1445.   \%[\-header] \%[\-noheader]
  1446. - \%[\-pack] \%[\-nopack]
  1447.   \%[\-recurse] \%[\-norecurse]
  1448. --- 13,14 ----
  1449. ***************
  1450. *** 14,16 ****
  1451.   \%[\-total] \%[\-nototal]
  1452. - \%[\-print] \%[\-noprint]
  1453.   \%[\-list] \%[\-nolist]
  1454. --- 15,16 ----
  1455. ***************
  1456. *** 17,18 ****
  1457. --- 17,20 ----
  1458.   \%[\-push] \%[\-pop]
  1459. + \%[\-pack] \%[\-nopack]
  1460. + \%[\-verbose] \%[\-noverbose]
  1461.   \%[\-help]
  1462. ***************
  1463. *** 24,35 ****
  1464.   track of the current folder from day to day.
  1465. - 
  1466.   When \fIfolder\fR is given the `\-print' switch (the default),
  1467. ! the current folder and/or message may be set,
  1468. ! or all folders may be listed.
  1469. ! When a `+folder' argument is given,
  1470. ! this corresponds to a \*(lqcd\*(rq operation in the \fICShell\fR;
  1471. ! when no `+folder' argument is given,
  1472. ! this corresponds roughly to a \*(lqpwd\*(rq operation in the \fICShell\fR.
  1473. ! 
  1474. ! \fIFolder\fR will
  1475.   list the current folder, the number of messages in it, the
  1476. --- 26,29 ----
  1477.   track of the current folder from day to day.
  1478.   When \fIfolder\fR is given the `\-print' switch (the default),
  1479. ! \fIfolder\fR will
  1480.   list the current folder, the number of messages in it, the
  1481. ***************
  1482. *** 37,39 ****
  1483.   the folder, and will flag extra files if they exist.
  1484. ! An example of the output is:
  1485.   
  1486. --- 31,33 ----
  1487.   the folder, and will flag extra files if they exist.
  1488. ! An example of this summary is:
  1489.   
  1490. ***************
  1491. *** 49,54 ****
  1492.   become the current folder and/or message.
  1493.   Specifying `\-all'
  1494. ! will produce a line for each folder in the user's MH directory,
  1495. ! sorted alphabetically.
  1496. ! These folders are preceded by the read\-only folders,
  1497.   which occur as \*(lqatr\-cur\-\*(rq entries in the user's \fIMH\fR context.
  1498. --- 43,72 ----
  1499.   become the current folder and/or message.
  1500. + If the specified (or default) folder doesn't exist,
  1501. + the user will be queried as to whether the folder should be created.
  1502. + When standard input is not a tty, the folder is
  1503. + created without any query.
  1504. + (This is the easy way to create an empty folder for use later.)
  1505. + 
  1506. + By comparison,
  1507. + when a `+folder' argument is given,
  1508. + this corresponds to a \*(lqcd\*(rq operation in the \fIshell\fR;
  1509. + when no `+folder' argument is given,
  1510. + this corresponds roughly to a \*(lqpwd\*(rq operation in the \fIshell\fR.
  1511. + 
  1512. + .\" note - this doesn't work at present
  1513. + .\" If `\-noprint' is specified, 
  1514. + .\" a `+folder' and/or `msg' may still be specified
  1515. + .\" to set the current folder and/or message,
  1516. + .\" but the folder summary will not be printed.
  1517. + 
  1518. + .Uh "Multiple Folders"
  1519.   Specifying `\-all'
  1520. ! will produce a summary line for each top-level
  1521. ! folder in the user's MH directory, sorted alphabetically.
  1522. ! (If \fIfolder\fR
  1523. ! is invoked by a name ending with \*(lqs\*(rq (e.g., \fIfolders\fR\0),
  1524. ! `\-all' is assumed).
  1525. ! Specifying `\-recurse' with `\-all' will also 
  1526. ! produce a line for all sub-folders.
  1527. ! These folders are all preceded by the read\-only folders,
  1528.   which occur as \*(lqatr\-cur\-\*(rq entries in the user's \fIMH\fR context.
  1529. ***************
  1530. *** 56,57 ****
  1531. --- 74,76 ----
  1532.   
  1533. + .ne 9
  1534.   .nf
  1535. ***************
  1536. *** 79,85 ****
  1537.   
  1538. ! The header is output if either an `\-all' or a `\-header' switch
  1539.   is specified; it is suppressed by `\-noheader'.
  1540. - Also, if \fIfolder\fR
  1541. - is invoked by a name ending with \*(lqs\*(rq (e.g., \fIfolders\fR\0),
  1542. - `\-all' is assumed.
  1543.   A `\-total' switch will produce only the
  1544. --- 98,101 ----
  1545.   
  1546. ! The header is output if either a `\-all' or a `\-header' switch
  1547.   is specified; it is suppressed by `\-noheader'.
  1548.   A `\-total' switch will produce only the
  1549. ***************
  1550. *** 87,94 ****
  1551.   
  1552. - If a `+folder' and/or `msg' is given along with the `\-all' switch,
  1553. - \fIfolder\fR will,
  1554. - in addition to setting the current folder and/or message,
  1555. - list the top\-level folders for the current folder (with `\-norecurse')
  1556. - or list all folders under the current folder recursively (with `\-recurse').
  1557. - 
  1558.   If `\-fast' is given, only the folder name (or names in the
  1559. --- 103,104 ----
  1560. ***************
  1561. *** 98,104 ****
  1562.   
  1563. ! The `\-pack' switch will compress the message names in a folder, removing
  1564. ! holes in message numbering.
  1565.   
  1566. ! The `\-recurse' switch will list each folder recursively.
  1567. ! Use of this option effectively defeats the speed enhancement of the `\-fast'
  1568.   option,
  1569. --- 108,120 ----
  1570.   
  1571. ! If a `+folder' 
  1572. ! is given along with the `\-all' switch,
  1573. ! \fIfolder\fR will,
  1574. ! in addition to setting the current folder,
  1575. ! list the top\-level folders for the current folder (with `\-norecurse')
  1576. ! or list all sub-folders under the current folder recursively (with `\-recurse').
  1577. ! In this case, if a `msg' is also supplied,
  1578. ! it will become the current message of `+folder'.
  1579.   
  1580. ! The `\-recurse' switch lists each folder recursively, so
  1581. ! use of this option effectively defeats the speed enhancement of the `\-fast'
  1582.   option,
  1583. ***************
  1584. *** 107,114 ****
  1585.   
  1586. ! If the specified (or default) folder doesn't exist,
  1587. ! the user will be queried as to whether the folder should be created.
  1588. ! When standard input is not a tty, the folder is
  1589. ! created without any query.
  1590. ! (This is the easy way to create an empty folder for use later.)
  1591.   
  1592.   The `\-push' switch directs \fIfolder\fR to push the current folder onto the
  1593. --- 123,131 ----
  1594.   
  1595. ! .Uh "Compacting a Folder"
  1596. ! The `\-pack' switch will compress the message names in the
  1597. ! designated folders, removing holes in message numbering.
  1598. ! The `\-verbose' switch directs \fIfolder\fR to tell the user the general
  1599. ! actions that it is taking to compress the folder.
  1600.   
  1601. + .Uh "The Folder Stack"
  1602.   The `\-push' switch directs \fIfolder\fR to push the current folder onto the
  1603. ***************
  1604. *** 127,129 ****
  1605.   the last occurrence of either one overrides any previous occurrence of the
  1606. ! other.
  1607.   
  1608. --- 144,146 ----
  1609.   the last occurrence of either one overrides any previous occurrence of the
  1610. ! other.  Both of these switches also set `\-list' by default.
  1611.   
  1612. ***************
  1613. *** 132,135 ****
  1614.   No `+folder' argument is allowed.
  1615. ! After a successful `\-push' or `\-pop', the `\-list' action is taken.
  1616.   This corresponds to the \*(lqdirs\*(rq operation in the \fICShell\fR.
  1617.   .Fi
  1618. --- 149,155 ----
  1619.   No `+folder' argument is allowed.
  1620. ! After a successful `\-push' or `\-pop', the `\-list' action is taken,
  1621. ! unless a `\-nolist' switch follows them on the command line.
  1622.   This corresponds to the \*(lqdirs\*(rq operation in the \fICShell\fR.
  1623. + The `\-push', `\-pop', and `\-list' switches turn
  1624. + off `\-print'.
  1625.   .Fi
  1626. ***************
  1627. *** 144,147 ****
  1628.   ^Folder\-Stack:~^To determine the folder stack
  1629. ! .Ps
  1630. ! ^lsproc:~^Program to list the contents of a folder
  1631.   .Sa
  1632. --- 164,167 ----
  1633.   ^Folder\-Stack:~^To determine the folder stack
  1634. ! .\" .Ps
  1635. ! .\" ^lsproc:~^Program to list the contents of a folder
  1636.   .Sa
  1637. ***************
  1638. *** 163,165 ****
  1639. --- 183,189 ----
  1640.   .Ds
  1641. + `\-noverbose'
  1642. + .Ds
  1643.   `\-print' is the default if no `\-list', `\-push', or `\-pop' is specified
  1644. + .Ds
  1645. + `\-list' is the default if `\-push', or `\-pop' is specified
  1646.   .Co
  1647. ***************
  1648. *** 173,174 ****
  1649. --- 197,200 ----
  1650.   then \fIfolder\fR will always change the current folder to that.
  1651. + .Bu
  1652. + `\-all' forces `\-header'.
  1653.   .En
  1654. *** ../mh-6.7.2/conf/doc/forw.rf    Tue Dec 18 14:40:13 1990
  1655. --- conf/doc/forw.rf    Fri Oct 16 14:36:07 1992
  1656. ***************
  1657. *** 1,3 ****
  1658.   .\"    @(MHWARNING)
  1659. ! .\" @(#)$Id: forw.rf,v 1.10 90/12/18 14:40:06 mh Exp $
  1660.   .SC FORW 1
  1661. --- 1,3 ----
  1662.   .\"    @(MHWARNING)
  1663. ! .\" @(#)$Id: forw.rf,v 1.11 1992/10/16 21:36:02 jromine Exp $
  1664.   .SC FORW 1
  1665. ***************
  1666. *** 15,16 ****
  1667. --- 15,19 ----
  1668.   \%[\-inplace] \%[\-noinplace]
  1669. + @BEGIN: MIME
  1670. + \%[\-mime] \%[\-nomime]
  1671. + @END: MIME
  1672.   \%[\-whatnowproc\ program] \%[\-nowhatnowproc]
  1673. ***************
  1674. *** 121,122 ****
  1675. --- 124,182 ----
  1676.   
  1677. + @BEGIN: MIME
  1678. + To use the MIME rules for encapsulation,
  1679. + specify the `\-mime' switch.
  1680. + This directs \fIforw\fR to generate an \fImhn\fR composition file.
  1681. + Note that MH will not invoke \fImhn\fR automatically,
  1682. + unless you  add this line to your \&.mh\(ruprofile file:
  1683. + .sp
  1684. + .in +.5i
  1685. + automhnproc: mhn
  1686. + .in -.5i
  1687. + .sp
  1688. + Otherwise,
  1689. + you must specifically give the command
  1690. + .sp
  1691. + .in +.5i
  1692. + What now? edit mhn
  1693. + .in -.5i
  1694. + .sp
  1695. + prior to sending the draft.
  1696. + 
  1697. + To automate this somewhat,
  1698. + create a link to \fIprompter\fR called \fIrapid\fR
  1699. + and put these lines in your \&.mh\(ruprofile file:
  1700. + .sp
  1701. + .in +.5i
  1702. + .nf
  1703. + forw: -editor rapid -mime
  1704. + rapid: -rapid
  1705. + rapid-next: mhn
  1706. + .fi
  1707. + .in -.5i
  1708. + .sp
  1709. + Then,
  1710. + you can simply do:
  1711. + .sp
  1712. + .in +.5i
  1713. + .nf
  1714. + \fIforw msgs\fR
  1715. + To: \fImailbox\fR
  1716. + cc:
  1717. + Subject: \fIwhatever\fR
  1718. + 
  1719. + --------Enter initial text
  1720. + 
  1721. + \fIblah, blah, blah.\fR
  1722. + <CTRL-D>
  1723. + --------
  1724. + 
  1725. + What now? \fIedit\fR
  1726. + What now? \fIsend\fR
  1727. + ...
  1728. + .fi
  1729. + .in -.5i
  1730. + .sp
  1731. + The \fIedit\fR command invokes \fImhn\fR automatically.
  1732. + 
  1733. + @END: MIME
  1734.   The `\-draftfolder\ +folder' and `\-draftmessage\ msg' switches invoke the
  1735. ***************
  1736. *** 191,192 ****
  1737. --- 251,256 ----
  1738.   `\-noinplace'
  1739. + @BEGIN: MIME
  1740. + .Ds
  1741. + `\-nomime'
  1742. + @END: MIME
  1743.   .Co
  1744. *** ../mh-6.7.2/conf/doc/inc.rf    Mon Apr  9 20:22:46 1990
  1745. --- conf/doc/inc.rf    Wed May 20 09:24:26 1992
  1746. ***************
  1747. *** 1,3 ****
  1748.   .\"    @(MHWARNING)
  1749. ! .\" @(#)$Id: inc.rf,v 1.6 90/04/09 20:22:39 sources Exp $
  1750.   .SC INC 1
  1751. --- 1,3 ----
  1752.   .\"    @(MHWARNING)
  1753. ! .\" @(#)$Id: inc.rf,v 1.8 1992/02/04 21:41:21 jromine Exp $
  1754.   .SC INC 1
  1755. ***************
  1756. *** 24,27 ****
  1757.   \%[\-host\ host] \%[\-user\ user]
  1758. ! \%[\-pack\ file] \%[\-nopack]
  1759.   \%[\-rpop] \%[\-norpop]
  1760.   @END: POP
  1761. --- 24,28 ----
  1762.   \%[\-host\ host] \%[\-user\ user]
  1763. ! \%[\-apop] \%[\-noapop]
  1764.   \%[\-rpop] \%[\-norpop]
  1765. + \%[\-pack\ file] \%[\-nopack]
  1766.   @END: POP
  1767. ***************
  1768. *** 32,34 ****
  1769.   If `+folder' isn't specified,
  1770. ! the folder named \*(lqinbox\*(rq in the user's \fIMH\fR directory will be used.
  1771.   The
  1772. --- 33,37 ----
  1773.   If `+folder' isn't specified,
  1774. ! a folder in the user's \fIMH\fR directory will be used, either that
  1775. ! specified by the \*(lqInbox:\*(rq entry in the user's profile, or
  1776. ! the folder named \*(lqinbox\*(rq.
  1777.   The
  1778. ***************
  1779. *** 124,131 ****
  1780.   waiting.
  1781. ! The `\-user\ user' switch may be given to specify the name of the POP
  1782. ! subscriber you wish to check mail for on the POP service host.
  1783. ! The `\-rpop' switch uses the UNIX \fIrPOP\fR
  1784. ! (authentication done via trusted connections).
  1785. ! In contrast, the `\-norpop' switch uses the ARPA \fIPOP\fR
  1786. ! (in which case \fIinc\fR will prompt for a password).
  1787.   
  1788. --- 127,141 ----
  1789.   waiting.
  1790. ! If the `\-user\ user' switch is not given,
  1791. ! then the current username is used.
  1792. ! Normally,
  1793. ! \fIinc\fR will prompt for a password to use.
  1794. ! However,
  1795. ! if the `\-apop' switch is given,
  1796. ! \fIinc\fR will generate authentication credentials to provide
  1797. ! for origin authentication and replay protection,
  1798. ! but which do not involve sending a password in the clear over the network.
  1799. ! Otherwise,
  1800. ! if the `\-rpop' switch is given,
  1801. ! then \fIinc\fR will try to use a \*(lqtrusted\*(rq connection
  1802. ! (ala the BSD r-commands).
  1803.   
  1804. ***************
  1805. *** 148,149 ****
  1806. --- 158,161 ----
  1807.   .Ps
  1808. + ^Inbox:~^To determine the inbox, default \*(lqinbox\*(rq
  1809. + .Ps
  1810.   ^Folder\-Protect:~^To set mode when creating a new folder
  1811. ***************
  1812. *** 160,162 ****
  1813.   .De
  1814. ! `+folder' defaults to \*(lqinbox\*(rq
  1815.   .Ds
  1816. --- 172,174 ----
  1817.   .De
  1818. ! `+folder' defaulted by \*(lqInbox\*(rq above
  1819.   .Ds
  1820. *** ../mh-6.7.2/conf/doc/install-mh.rf    Thu Apr  5 16:04:50 1990
  1821. --- conf/doc/install-mh.rf    Wed Dec  2 13:38:50 1992
  1822. ***************
  1823. *** 1,3 ****
  1824.   .\"    @(MHWARNING)
  1825. ! .\" @(#)$Id: install-mh.rf,v 1.5 90/04/05 15:12:44 sources Exp $
  1826.   .SC INSTALL-MH 8
  1827. --- 1,3 ----
  1828.   .\"    @(MHWARNING)
  1829. ! .\" @(#)$Id: install-mh.rf,v 1.6 1992/12/02 21:38:49 jromine Exp $
  1830.   .SC INSTALL-MH 8
  1831. ***************
  1832. *** 4,6 ****
  1833.   .NA
  1834. ! install\-mh \- initialize the MH environment
  1835.   .SY
  1836. --- 4,6 ----
  1837.   .NA
  1838. ! install-mh \- initialize the MH environment
  1839.   .SY
  1840. *** ../mh-6.7.2/conf/doc/maildelivery.5    Thu Oct 29 14:55:12 1987
  1841. --- conf/doc/maildelivery.5    Mon Oct 26 09:02:26 1992
  1842. ***************
  1843. *** 69,71 ****
  1844.   the address that was used to mail to you, normally 'yourname' or 
  1845. ! 'yourname=string' (see below).
  1846.   .II default
  1847. --- 69,71 ----
  1848.   the address that was used to mail to you, normally 'yourname' or 
  1849. ! \&'yourname=string' (see below).
  1850.   .II default
  1851. ***************
  1852. *** 106,108 ****
  1853.   went well. An exit status of octal 0300-0377 indicates that a permanent
  1854. ! failure occured and the message should be rejected, these error codes
  1855.   are given in mmdf.h. Any other exit
  1856. --- 106,108 ----
  1857.   went well. An exit status of octal 0300-0377 indicates that a permanent
  1858. ! failure occured and the message should be rejected; these error codes
  1859.   are given in mmdf.h. Any other exit
  1860. ***************
  1861. *** 169,171 ****
  1862.   creation mask.
  1863. ! Initgroups is called if 4.2 version of UNIX is running.
  1864.   If further requirements are needed, then a shell script
  1865. --- 169,171 ----
  1866.   creation mask.
  1867. ! Initgroups is called if the 4.2 version of UNIX is running.
  1868.   If further requirements are needed, then a shell script
  1869. ***************
  1870. *** 214,216 ****
  1871.   # if the address is jpo=ack \- send an acknowledgement copy back
  1872. ! Addr~~~~jpo=ack~~~~|~~~~R~~~~resend~~\-r~~$(reply-to)
  1873.   # anything from steve \- destroy!
  1874. --- 214,216 ----
  1875.   # if the address is jpo=ack \- send an acknowledgement copy back
  1876. ! Addr~~~~jpo=ack~~~~|~~~~R~~~~"resend~~\-r~~$(reply-to)"
  1877.   # anything from steve \- destroy!
  1878. ***************
  1879. *** 225,227 ****
  1880.   $HOME/.maildelivery
  1881. ! \- the files normal location.
  1882.   .br
  1883. --- 225,227 ----
  1884.   $HOME/.maildelivery
  1885. ! \- the file's normal location.
  1886.   .br
  1887. ***************
  1888. *** 237,240 ****
  1889.   .sp
  1890. ! This alows interfacing to non-standard mail systems,
  1891. ! ones that don't believe in delimiter-separated mailboxes
  1892.   .SH "SEE ALSO"
  1893. --- 237,240 ----
  1894.   .sp
  1895. ! This allows interfacing to non-standard mail systems,
  1896. ! ones that don't believe in delimiter-separated mailboxes.
  1897.   .SH "SEE ALSO"
  1898. *** ../mh-6.7.2/conf/doc/mark.rf    Wed Dec 26 17:03:35 1990
  1899. --- conf/doc/mark.rf    Tue Feb 11 16:23:18 1992
  1900. ***************
  1901. *** 1,3 ****
  1902.   .\"    @(MHWARNING)
  1903. ! .\" @(#)$Id: mark.rf,v 1.6 90/12/26 17:03:28 mh Exp $
  1904.   .SC MARK 1
  1905. --- 1,3 ----
  1906.   .\"    @(MHWARNING)
  1907. ! .\" @(#)$Id: mark.rf,v 1.7 1992/02/12 00:23:13 jromine Exp $
  1908.   .SC MARK 1
  1909. ***************
  1910. *** 72,76 ****
  1911.   for the folder and the messages associated with those sequences.
  1912. ! \fIMark\fR will list each sequence named via `\-sequence\ name'
  1913. ! (or all of them if `\-sequence' isn't used),
  1914. ! and the messages associated with that sequence.
  1915.   The `\-zero' switch does not affect the operation of `\-list'.
  1916. --- 72,77 ----
  1917.   for the folder and the messages associated with those sequences.
  1918. ! \fIMark\fR will list the name of each sequence given by
  1919. ! `\-sequence\ name' and the messages associated with that sequence.
  1920. ! If `\-sequence' isn't used, all sequences will be listed,
  1921. ! with private sequences being so indicated.
  1922.   The `\-zero' switch does not affect the operation of `\-list'.
  1923. ***************
  1924. *** 87,89 ****
  1925.   Only a certain number of sequences may be defined for a given folder.
  1926. ! This number is usually limited to 10.
  1927.   
  1928. --- 88,90 ----
  1929.   Only a certain number of sequences may be defined for a given folder.
  1930. ! This number is usually limited to 26 (10 on small systems).
  1931.   
  1932. ***************
  1933. *** 102,104 ****
  1934.   .Sa
  1935. ! pick (1)
  1936.   .De
  1937. --- 103,105 ----
  1938.   .Sa
  1939. ! pick (1), mh-sequence (5)
  1940.   .De
  1941. ***************
  1942. *** 115,116 ****
  1943. --- 116,121 ----
  1944.   If a folder is given, it will become the current folder.
  1945. + .Hh
  1946. + Use \*(lqpick sequence \-list\*(rq
  1947. + to enumerate the messages in a sequence (such as for use 
  1948. + by a shell script).
  1949.   .En
  1950. *** ../mh-6.7.2/conf/doc/mh-alias.rf    Thu Jan 30 11:05:17 1992
  1951. --- conf/doc/mh-alias.rf    Fri Dec 11 13:44:29 1992
  1952. ***************
  1953. *** 1,6 ****
  1954.   .\"    @(MHWARNING)
  1955. ! .\" @(#)$Id: mh-alias.rf,v 1.8 1992/01/30 19:05:13 jromine Exp $
  1956. ! .SC MH\-ALIAS 5
  1957.   .NA
  1958. ! mh\-alias \- alias file for MH message system
  1959.   .SY
  1960. --- 1,6 ----
  1961.   .\"    @(MHWARNING)
  1962. ! .\" @(#)$Id: mh-alias.rf,v 1.11 1992/12/11 21:44:16 jromine Exp $
  1963. ! .SC MH-ALIAS 5
  1964.   .NA
  1965. ! mh-alias \- alias file for MH message system
  1966.   .SY
  1967. ***************
  1968. *** 114,115 ****
  1969. --- 114,116 ----
  1970.   
  1971. + .ne 10
  1972.   \fBExample:\fR
  1973. ***************
  1974. *** 135,136 ****
  1975. --- 136,138 ----
  1976.   the three names \*(lqfrated@UCI\*(rq, \*(rqfear\*(rq, and \*(rqfreida\*(rq.
  1977. + .sp
  1978.   The alias \*(lqb-people\*(rq is a blind list which includes the
  1979. ***************
  1980. *** 139,140 ****
  1981. --- 141,143 ----
  1982.   message header will  show only \*(lqBlind List: ;\*(rq (not the addresses).
  1983. + .sp
  1984.   Next, the definition of \*(lqUNIX\-committee\*(rq is given by reading
  1985. ***************
  1986. *** 145,146 ****
  1987. --- 148,150 ----
  1988.   \fI/etc/passwd\fR is equivalent to the \*(lqwheel\*(rq group.
  1989. + .sp
  1990.   Finally, \*(lqeveryone\*(rq is defined as all users with a user\-id in
  1991. ***************
  1992. *** 167,169 ****
  1993.   First, in your \fI\&.mh\(ruprofile\fR,
  1994. ! choose a name for your primary alias file, say \*(lqaliases\*(rq,
  1995.   and add the line:
  1996. --- 171,173 ----
  1997.   First, in your \fI\&.mh\(ruprofile\fR,
  1998. ! choose a name for your alias file, say \*(lqaliases\*(rq,
  1999.   and add the line:
  2000. ***************
  2001. *** 220,222 ****
  2002.   .Bu
  2003. ! Although the forward\-referencing semantics of \fImh\-alias\fR files prevent
  2004.   recursion, the \*(lq<\ alias\-file\*(rq command may defeat this.  Since the
  2005. --- 224,226 ----
  2006.   .Bu
  2007. ! Although the forward-referencing semantics of \fImh\-alias\fR files prevent
  2008.   recursion, the \*(lq<\ alias\-file\*(rq command may defeat this.  Since the
  2009. ***************
  2010. *** 225,226 ****
  2011. --- 229,232 ----
  2012.   used up.
  2013. + .sp
  2014. + Forward references do not work correctly inside blind lists.
  2015.   .En
  2016. *** ../mh-6.7.2/conf/doc/mh-chart.rf    Wed Jan 29 14:50:54 1992
  2017. --- conf/doc/mh-chart.rf    Wed Nov 11 09:34:16 1992
  2018. ***************
  2019. *** 1,7 ****
  2020.   .\"    @(MHWARNING)
  2021. ! .\" @(#)$Id: mh-chart.rf,v 2.11 1992/01/29 22:50:50 jromine Exp $
  2022.   .if '\*(ZZ'-man' \{\
  2023. ! .SC MH\-CHART 1
  2024.   .NA
  2025. ! mh\-chart \- Chart of \fIMH\fR Commands
  2026.   .SY
  2027. --- 1,7 ----
  2028.   .\"    @(MHWARNING)
  2029. ! .\" @(#)$Id: mh-chart.rf,v 2.18 1992/11/11 17:34:01 jromine Exp $
  2030.   .if '\*(ZZ'-man' \{\
  2031. ! .SC MH-CHART 1
  2032.   .NA
  2033. ! mh-chart \- Chart of MH Commands
  2034.   .SY
  2035. ***************
  2036. *** 120,124 ****
  2037.   .ti .5i
  2038. ! .ne 3
  2039. ! fmtdump
  2040. ! \%[filename]
  2041.   
  2042. --- 120,126 ----
  2043.   .ti .5i
  2044. ! .ne 4
  2045. ! @(MHETCPATH)/fmtdump
  2046. ! \%[\-form\ formatfile]
  2047. ! \%[\-format\ string]
  2048. ! \%[\-help]
  2049.   
  2050. ***************
  2051. *** 153,154 ****
  2052. --- 155,159 ----
  2053.   \%[\-inplace] \%[\-noinplace]
  2054. + @BEGIN: MIME
  2055. + \%[\-mime] \%[\-nomime]
  2056. + @END: MIME
  2057.   \%[\-whatnowproc\ program] \%[\-nowhatnowproc]
  2058. ***************
  2059. *** 190,193 ****
  2060.   \%[\-host\ host] \%[\-user\ user]
  2061. ! \%[\-pack\ file] \%[\-nopack]
  2062.   \%[\-rpop] \%[\-norpop]
  2063.   @END: POP
  2064. --- 195,199 ----
  2065.   \%[\-host\ host] \%[\-user\ user]
  2066. ! \%[\-apop] \%[\-noapop]
  2067.   \%[\-rpop] \%[\-norpop]
  2068. + \%[\-pack\ file] \%[\-nopack]
  2069.   @END: POP
  2070. ***************
  2071. *** 227,228 ****
  2072. --- 233,235 ----
  2073.   \%[\-help]
  2074. + @BEGIN: MIME
  2075.   
  2076. ***************
  2077. *** 229,230 ****
  2078. --- 236,267 ----
  2079.   .ti .5i
  2080. + .ne 9
  2081. + mhn
  2082. + \%[+folder] \%[msgs] \%[\-part\0number]... \%[\-type\0content]...
  2083. + .br
  2084. + \%[\-list\0\%[\-header]\0\%[\-noheader]
  2085. + .br
  2086. +        \%[\-realsize]\0\%[\-norealsize]] \%[-nolist]
  2087. + .br
  2088. + \%[\-show\0\%[\-serialonly]\0\%[\-noserialonly]]
  2089. + .br
  2090. +        \%[\-form\0formfile]] \%[\-noshow]
  2091. + .br
  2092. + \%[\-store\0\%[\-auto]\0\%[\-noauto]] \%[\-nostore]
  2093. + .br
  2094. + \%[\-verbose] \%[\-noverbose]
  2095. + \%[\-rfc934mode] \%[\-norfc934mode]
  2096. + \%[\-ebcdic] \%[\-noebcdicsafe]
  2097. + .br
  2098. + \%[\-help]
  2099. + @END: MIME
  2100. + 
  2101. + .ti .5i
  2102. + .ne 5
  2103. + mhparam
  2104. + \%[profile-components]
  2105. + \%[\-components] \%[\-nocomponents]
  2106. + \%[\-all]
  2107. + \%[\-help]
  2108. + 
  2109. + .ti .5i
  2110.   .ne 3
  2111. ***************
  2112. *** 244,245 ****
  2113. --- 281,283 ----
  2114.   \%[\-host\ host] \%[\-user\ user]
  2115. + \%[\-apop] \%[\-noapop]
  2116.   \%[\-rpop] \%[\-norpop]
  2117. ***************
  2118. *** 304,305 ****
  2119. --- 342,344 ----
  2120.   .\}
  2121. + @BEGIN: MPOP
  2122.   
  2123. ***************
  2124. *** 306,307 ****
  2125. --- 345,364 ----
  2126.   .ti .5i
  2127. + .ne 11
  2128. + popi
  2129. + \%[+folder]
  2130. + \%[\-host\ host] \%[\-user\ user]
  2131. + \%[\-apop] \%[\-noapop]
  2132. + \%[\-rpop] \%[\-norpop]
  2133. + @BEGIN: BPOP
  2134. + \%[\-auto] \%[\-noauto]
  2135. + \%[\-mshproc\ program]
  2136. + @END: BPOP
  2137. + \%[\-form\ formatfile]
  2138. + \%[\-format\ string]
  2139. + \%[\-width\ columns]
  2140. + \%[\-help]
  2141. + @END: MPOP
  2142. + 
  2143. + 
  2144. + .ti .5i
  2145.   .ne 6
  2146. ***************
  2147. *** 403,404 ****
  2148. --- 460,464 ----
  2149.   \%[\-forward] \%[\-noforward]
  2150. + @BEGIN: MIME
  2151. + \%[\-mime] \%[\-nomime]
  2152. + @END: MIME
  2153.   \%[\-msgid] \%[\-nomsgid]
  2154. ***************
  2155. *** 405,406 ****
  2156. --- 465,469 ----
  2157.   \%[\-push] \%[\-nopush]
  2158. + @BEGIN: MIME
  2159. + \%[\-split\ seconds]
  2160. + @END: MIME
  2161.   \%[\-verbose] \%[\-noverbose]
  2162. ***************
  2163. *** 507,508 ****
  2164. --- 570,572 ----
  2165.   \%[\-compat]
  2166. + @BEGIN: APOP
  2167.   
  2168. ***************
  2169. *** 509,510 ****
  2170. --- 573,581 ----
  2171.   .ti .5i
  2172. + .ne 3
  2173. + popauth
  2174. + \%[\-init] \%[\-list] \%[\-user\ name]
  2175. + \%[\-help]
  2176. + @END: APOP
  2177. + 
  2178. + .ti .5i
  2179.   .ne 11
  2180. ***************
  2181. *** 517,518 ****
  2182. --- 588,592 ----
  2183.   \%[\-format] \%[\-noformat]
  2184. + @BEGIN: MIME
  2185. + \%[\-mime] \%[\-nomime]
  2186. + @END: MIME
  2187.   \%[\-msgid] \%[\-nomsgid]
  2188. ***************
  2189. *** 522,523 ****
  2190. --- 596,611 ----
  2191.   file
  2192. + \%[\-help]
  2193. + 
  2194. + .ti .5i
  2195. + .ne 10
  2196. + @(MHETCPATH)/slocal \%[address\ info\ sender]
  2197. + \%[\-addr\ address]
  2198. + \%[\-info\ data]
  2199. + \%[\-sender\ sender]
  2200. + \%[\-user\ username]
  2201. + \%[\-mailbox\ mbox]
  2202. + \%[\-file\ file]
  2203. + \%[\-maildelivery\ deliveryfile]
  2204. + \%[\-verbose] \%[\-noverbose]
  2205. + \%[\-debug]
  2206.   \%[\-help]
  2207. *** ../mh-6.7.2/conf/doc/mh-format.rf    Wed Jan 29 14:57:07 1992
  2208. --- conf/doc/mh-format.rf    Wed Dec  2 10:41:53 1992
  2209. ***************
  2210. *** 1,6 ****
  2211.   .\"    @(MHWARNING)
  2212. ! .\" @(#)$Id: mh-format.rf,v 1.30 1992/01/29 22:55:31 jromine Exp $
  2213. ! .SC MH\-FORMAT 5
  2214.   .NA
  2215. ! mh\-format \- format file for MH message system
  2216.   .SY
  2217. --- 1,6 ----
  2218.   .\"    @(MHWARNING)
  2219. ! .\" @(#)$Id: mh-format.rf,v 1.43 1992/12/02 18:41:50 jromine Exp $
  2220. ! .SC MH-FORMAT 5
  2221.   .NA
  2222. ! mh-format \- format file for MH message system
  2223.   .SY
  2224. ***************
  2225. *** 39,41 ****
  2226.   There are three types of \fIescape\fR sequences:
  2227. ! header \fIcomponents\fR, built-in \fIfunctions\fR, and, flow \fIcontrol\fR.
  2228.   
  2229. --- 39,41 ----
  2230.   There are three types of \fIescape\fR sequences:
  2231. ! header \fIcomponents\fR, built-in \fIfunctions\fR, and flow \fIcontrol\fR.
  2232.   
  2233. ***************
  2234. *** 101,104 ****
  2235.   Next,
  2236. ! all format text up to the corresponding `%>' control
  2237. ! escape (if any) is skipped.
  2238.   The `%>' control escape is not interpreted;
  2239. --- 101,104 ----
  2240.   Next,
  2241. ! all format text (if any) up to the corresponding `%>' control
  2242. ! escape is skipped.
  2243.   The `%>' control escape is not interpreted;
  2244. ***************
  2245. *** 172,173 ****
  2246. --- 172,174 ----
  2247.   values 0=false and 1=true.)
  2248. + Control escapes return a \fIboolean\fP value, and set \fInum\fP.
  2249.   
  2250. ***************
  2251. *** 179,182 ****
  2252.   unless called as part of an argument to another escape sequence.
  2253. ! Function escapes which return a \fIboolean\fR value do pass this value
  2254. ! back to their caller, but will never print out the value.
  2255.   
  2256. --- 180,183 ----
  2257.   unless called as part of an argument to another escape sequence.
  2258. ! Escapes which return a \fIboolean\fR value do pass this value
  2259. ! back to their caller in \fInum\fP, but will never print out the value.
  2260.   
  2261. ***************
  2262. *** 187,188 ****
  2263. --- 188,190 ----
  2264.   cur        integer    message is current
  2265. + .\" unseen        integer    message is unseen
  2266.   size        integer    size of message
  2267. ***************
  2268. *** 201,202 ****
  2269. --- 203,205 ----
  2270.   divide    literal    integer    \fInum\fR divided by \fIarg\fR
  2271. + modulo    literal    integer    \fInum\fR modulo \fIarg\fR
  2272.   num    literal    integer    Set \fInum\fR to \fIarg\fR
  2273. ***************
  2274. *** 204,206 ****
  2275.   getenv     literal    string    Set \fIstr\fR to environment value of \fIarg\fR
  2276. ! .\" dat    literal    int    ?
  2277.   nonzero    expr    boolean    \fInum\fR is non-zero
  2278. --- 207,209 ----
  2279.   getenv     literal    string    Set \fIstr\fR to environment value of \fIarg\fR
  2280. ! .\" dat    literal    int    return value of dat[arg]
  2281.   nonzero    expr    boolean    \fInum\fR is non-zero
  2282. ***************
  2283. *** 211,213 ****
  2284.   comp    comp    string    Set \fIstr\fR to component text
  2285. ! compval    comp    integer    \fInum\fR set to \*(lq\fBatoi\fR(\fIstr\fR\^)\*(rq
  2286.   .\" compflag    comp    integer    Set \fInum\fR to component flags bits
  2287. --- 214,216 ----
  2288.   comp    comp    string    Set \fIstr\fR to component text
  2289. ! compval    comp    integer    \fInum\fR set to \*(lq\fBatoi\fR(\fIcomp\fR\^)\*(rq
  2290.   .\" compflag    comp    integer    Set \fInum\fR to component flags bits
  2291. ***************
  2292. *** 218,219 ****
  2293. --- 221,223 ----
  2294.   putnumf    expr        print \fInum\fR in a fixed width
  2295. + .\" addtoseq literal    add msg to sequence (LBL option)
  2296.   .re    
  2297. ***************
  2298. *** 239,241 ****
  2299.   lmonth    date    string    month of the year
  2300. ! year    date    integer    year of the century
  2301.   zone    date    integer    timezone in hours
  2302. --- 243,245 ----
  2303.   lmonth    date    string    month of the year
  2304. ! year    date    integer    year (may be > 100)
  2305.   zone    date    integer    timezone in hours
  2306. ***************
  2307. *** 292,294 ****
  2308.   
  2309. ! writes the value of the header component \*(lqFrom:\*(rq to \fIstr\fR;
  2310.   then (\fImymbox\fR\^) reads \fIstr\fR 
  2311. --- 296,298 ----
  2312.   
  2313. ! writes the value of the header component \*(lqFrom:\*(rq to \fIstr\fR\^;
  2314.   then (\fImymbox\fR\^) reads \fIstr\fR 
  2315. ***************
  2316. *** 342,343 ****
  2317. --- 346,351 ----
  2318.   
  2319. + Comments may be inserted in most places where a function argument
  2320. + is not expected.  A comment begins with `%;' and ends with
  2321. + a (non-escaped) newline.
  2322. + 
  2323.   With all this in mind,
  2324. ***************
  2325. *** 348,350 ****
  2326.   .ti +.5i
  2327. ! %4(putnumf(msg))%<(cur)+%| %>%<{replied}\-%| %>
  2328.   
  2329. --- 356,358 ----
  2330.   .ti +.5i
  2331. ! %4(msg)%<(cur)+%| %>%<{replied}\-%?{encrypted}E%| %>
  2332.   
  2333. ***************
  2334. *** 353,356 ****
  2335.   printed,
  2336. ! and if a \*(lqReplied:\*(rq field is present then a `\-' else a space should
  2337. ! be printed.
  2338.   Next:
  2339. --- 361,365 ----
  2340.   printed,
  2341. ! and if a \*(lqReplied:\*(rq field is present then a `\-' else 
  2342. ! if an \*(lqEncrypted:\*(rq field is present then an `E' otherwise
  2343. ! a space should be printed.
  2344.   Next:
  2345. ***************
  2346. *** 358,360 ****
  2347.   .ti +.5i
  2348. ! %02(putnumf(mon{date}))/%02(putnumf(mday{date}))
  2349.   
  2350. --- 367,369 ----
  2351.   .ti +.5i
  2352. ! %02(mon{date})/%02(mday{date})
  2353.   
  2354. ***************
  2355. *** 372,374 ****
  2356.   .ti +.5i
  2357. ! %<(mymbox{from})To:%14(putstrf(friendly{to}))
  2358.   
  2359. --- 381,383 ----
  2360.   .ti +.5i
  2361. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>
  2362.   
  2363. ***************
  2364. *** 375,376 ****
  2365. --- 384,386 ----
  2366.   if the message is from me,
  2367. + and there is a \*(lqTo:\*(rq header,
  2368.   print `To:' followed by a \*(lquser-friendly\*(rq rendering of the 
  2369. ***************
  2370. *** 380,385 ****
  2371.   .ti +.5i
  2372. ! %|%17(putstrf(friendly{from}))%>
  2373.   
  2374. ! if the message isn't from me,
  2375. ! then the print the \*(lqFrom:\*(rq address is printed.
  2376.   And finally,
  2377. --- 390,396 ----
  2378.   .ti +.5i
  2379. ! %<(zero)%17(friendly{from})%>
  2380.   
  2381. ! if either of the above two tests failed,
  2382. ! then the \*(lqFrom:\*(rq address is printed
  2383. ! in a \*(lquser-friendly\*(rq format.
  2384.   And finally,
  2385. ***************
  2386. *** 395,397 ****
  2387.   .ti +.5i
  2388. ! %(lit)%(formataddr %<{reply-to}%|
  2389.   
  2390. --- 406,408 ----
  2391.   .ti +.5i
  2392. ! %(lit)%(formataddr %<{reply-to}
  2393.   
  2394. ***************
  2395. *** 398,400 ****
  2396.   This clears \fIstr\fR and formats the \*(lqReply-To:\*(rq header 
  2397. ! if present.  If not present, the else clause is executed:
  2398.   
  2399. --- 409,411 ----
  2400.   This clears \fIstr\fR and formats the \*(lqReply-To:\*(rq header 
  2401. ! if present.  If not present, the else-if clause is executed.
  2402.   
  2403. ***************
  2404. *** 401,403 ****
  2405.   .ti +.5i
  2406. ! %<{from}%|%<{sender}%|%<{return-path}%>%>%>%>)\\
  2407.   
  2408. --- 412,414 ----
  2409.   .ti +.5i
  2410. ! %?{from}%?{sender}%?{return-path}%>)\\
  2411.   
  2412. ***************
  2413. *** 446,448 ****
  2414.   .ti +.5i
  2415. ! %<(nodate{date})%{date}%|%(tws{date})%>."%<{message-id}
  2416.   .ti +.5i
  2417. --- 457,459 ----
  2418.   .ti +.5i
  2419. ! %<(nodate{date})%{date}%|%(pretty{date})%>."%<{message-id}
  2420.   .ti +.5i
  2421. ***************
  2422. *** 456,458 ****
  2423.   \*(lqYour message of \*(rq.  If the date was parseable, it is
  2424. ! output in official format, otherwise it is output as-is.
  2425.   The message-id is included if present.
  2426. --- 467,469 ----
  2427.   \*(lqYour message of \*(rq.  If the date was parseable, it is
  2428. ! output in a user-friendly format, otherwise it is output as-is.
  2429.   The message-id is included if present.
  2430. ***************
  2431. *** 472,474 ****
  2432.       else
  2433. !         print (rfc822(date.value))
  2434.       endif
  2435. --- 483,485 ----
  2436.       else
  2437. !         print (pretty(date.value))
  2438.       endif
  2439. *** ../mh-6.7.2/conf/doc/mh-hack.rf    Thu Apr  5 16:04:52 1990
  2440. --- conf/doc/mh-hack.rf    Tue May 12 15:23:45 1992
  2441. ***************
  2442. *** 1,6 ****
  2443.   .\"    @(MHWARNING)
  2444. ! .\" @(#)$Id: mh-hack.rf,v 1.5 90/04/05 15:13:03 sources Exp $
  2445. ! .SC MH\-HACK 8
  2446.   .NA
  2447. ! mh\-hack \- how to hack MH
  2448.   .SY
  2449. --- 1,6 ----
  2450.   .\"    @(MHWARNING)
  2451. ! .\" @(#)$Id: mh-hack.rf,v 1.6 1992/05/12 22:23:34 jromine Exp $
  2452. ! .SC MH-HACK 8
  2453.   .NA
  2454. ! mh-hack \- how to hack MH
  2455.   .SY
  2456. *** ../mh-6.7.2/conf/doc/mh-mail.rf    Thu Apr  5 16:04:52 1990
  2457. --- conf/doc/mh-mail.rf    Tue May 12 15:23:47 1992
  2458. ***************
  2459. *** 1,6 ****
  2460.   .\"    @(MHWARNING)
  2461. ! .\" @(#)$Id: mh-mail.rf,v 1.5 90/04/05 15:13:12 sources Exp $
  2462. ! .SC MH\-MAIL 5
  2463.   .NA
  2464. ! mh\-mail \- message format for MH message system
  2465.   .SY
  2466. --- 1,6 ----
  2467.   .\"    @(MHWARNING)
  2468. ! .\" @(#)$Id: mh-mail.rf,v 1.6 1992/05/12 22:23:34 jromine Exp $
  2469. ! .SC MH-MAIL 5
  2470.   .NA
  2471. ! mh-mail \- message format for MH message system
  2472.   .SY
  2473. *** ../mh-6.7.2/conf/doc/mh-mts.rf    Wed Nov 21 10:09:34 1990
  2474. --- conf/doc/mh-mts.rf    Tue May 12 15:23:48 1992
  2475. ***************
  2476. *** 1,6 ****
  2477.   .\"    @(MHWARNING)
  2478. ! .\" @(#)$Id: mh-mts.rf,v 1.7 90/11/21 10:09:32 mh Exp $
  2479. ! .SC MH\-MTS 8
  2480.   .NA
  2481. ! mh\-mts \- the MH interface to the message transport system
  2482.   .SY
  2483. --- 1,6 ----
  2484.   .\"    @(MHWARNING)
  2485. ! .\" @(#)$Id: mh-mts.rf,v 1.10 1992/05/12 22:23:34 jromine Exp $
  2486. ! .SC MH-MTS 8
  2487.   .NA
  2488. ! mh-mts \- the MH interface to the message transport system
  2489.   .SY
  2490. ***************
  2491. *** 9,10 ****
  2492. --- 9,13 ----
  2493.   .ti .5i
  2494. + Zmailer
  2495. + 
  2496. + .ti .5i
  2497.   MMDF (any release)
  2498. ***************
  2499. *** 24,25 ****
  2500. --- 27,36 ----
  2501.   or \fIMH\fR may open a TCP/IP connection to the SMTP server on the localhost.
  2502. + 
  2503. + When communicating with \fIzmailer\fP,
  2504. + the \fISendMail\fP compatibility program is
  2505. + required to be installed in /usr/lib.
  2506. + \fIMH\fP communicates with \fIzmailer\fP
  2507. + by using the SMTP.
  2508. + It does this by invoking the \fB/usr/lib/sendmail\fP
  2509. + compatibility program directly, with the `\-bs' option.
  2510.   
  2511. *** ../mh-6.7.2/conf/doc/mh-profile.rf    Tue Dec 18 12:49:22 1990
  2512. --- conf/doc/mh-profile.rf    Wed Dec  2 14:13:43 1992
  2513. ***************
  2514. *** 1,8 ****
  2515.   .\"    @(MHWARNING)
  2516. ! .\" @(#)$Id: mh-profile.rf,v 1.8 90/12/18 12:49:13 mh Exp $
  2517. ! .SC MH\-PROFILE 5
  2518.   .NA
  2519. !  \&.mh\(ruprofile \- user customization for MH message system
  2520.   .SY
  2521. ! any \fIMH\fR command
  2522.   .DE
  2523. --- 1,8 ----
  2524.   .\"    @(MHWARNING)
  2525. ! .\" @(#)$Id: mh-profile.rf,v 1.19 1992/12/02 22:13:41 jromine Exp $
  2526. ! .SC MH-PROFILE 5
  2527.   .NA
  2528. ! mh-profile \- user profile customization for MH message handler
  2529.   .SY
  2530. ! \&\fI.mh\(ruprofile\fP
  2531.   .DE
  2532. ***************
  2533. *** 42,44 ****
  2534.   Keeps track of the current open folder.
  2535. ! (context, default: +inbox)
  2536.   
  2537. --- 42,44 ----
  2538.   Keeps track of the current open folder.
  2539. ! (context, default: folder specified by \*(lqInbox\*(rq)
  2540.   
  2541. ***************
  2542. *** 45,46 ****
  2543. --- 45,52 ----
  2544.   .ti -1i
  2545. + Inbox:    inbox
  2546. + .br
  2547. + Defines the name of your inbox.
  2548. + (profile, default: inbox)
  2549. + 
  2550. + .ti -1i
  2551.   Previous\-Sequence:\ pseq
  2552. ***************
  2553. *** 74,77 ****
  2554.   Otherwise,
  2555. ! for each name given,
  2556. ! the sequence is first zero'd and then each message is added to the sequence.
  2557.   (profile, no default)
  2558. --- 80,82 ----
  2559.   Otherwise,
  2560. ! each message is added to each sequence name given.
  2561.   (profile, no default)
  2562. ***************
  2563. *** 146,148 ****
  2564.   .br
  2565. ! The contents of the folder\-stack for the \fIfolder\fR command.
  2566.   (context, no default)
  2567. --- 151,153 ----
  2568.   .br
  2569. ! The contents of the folder-stack for the \fIfolder\fR command.
  2570.   (context, no default)
  2571. ***************
  2572. *** 154,156 ****
  2573.   its other tasks.
  2574. ! \fIMHE\fR is Brian Reid's \fIEmacs\fR front\-end for \fIMH\fR.
  2575.   An early version is supplied with the \fImh.6\fR distribution.
  2576. --- 159,161 ----
  2577.   its other tasks.
  2578. ! \fIMHE\fR is Brian Reid's \fIEmacs\fR front-end for \fIMH\fR.
  2579.   An early version is supplied with the \fImh.6\fR distribution.
  2580. ***************
  2581. *** 158,160 ****
  2582.   
  2583. ! .ti \-1i
  2584.   Alternate\-Mailboxes: mh@uci\-750a, bug-mh*
  2585. --- 163,165 ----
  2586.   
  2587. ! .ti -1i
  2588.   Alternate\-Mailboxes: mh@uci\-750a, bug-mh*
  2589. ***************
  2590. *** 173,175 ****
  2591.   an asterisk (`*') may appear at either or both ends of the mailbox and host
  2592. ! to indicate wild\-card matching.
  2593.   (profile, default: your user-id)
  2594. --- 178,180 ----
  2595.   an asterisk (`*') may appear at either or both ends of the mailbox and host
  2596. ! to indicate wild-card matching.
  2597.   (profile, default: your user-id)
  2598. ***************
  2599. *** 177,181 ****
  2600.   .ti -1i
  2601. ! Aliasfile: aliases
  2602.   .br
  2603. ! Indicates a default aliases file for \fIali\fR, \fIwhom\fR, and \fIsend\fR.
  2604.   This may be used instead of the `\-alias file' switch.
  2605. --- 182,186 ----
  2606.   .ti -1i
  2607. ! Aliasfile: aliases other-alias
  2608.   .br
  2609. ! Indicates aliases files for \fIali\fR, \fIwhom\fR, and \fIsend\fR.
  2610.   This may be used instead of the `\-alias file' switch.
  2611. ***************
  2612. *** 207,209 ****
  2613.   Tells \fIinc\fR your maildrop, if different from the default.
  2614. ! This is superceded by the \fB$MAILDROP\fR envariable.
  2615.   (profile, default: @(MHDROPLOC))
  2616. --- 212,214 ----
  2617.   Tells \fIinc\fR your maildrop, if different from the default.
  2618. ! This is superceded by the \fBMAILDROP\fR envariable.
  2619.   (profile, default: @(MHDROPLOC))
  2620. ***************
  2621. *** 214,218 ****
  2622.   Tells \fIsend\fR your mail signature.
  2623. ! This is superceded by the \fB$SIGNATURE\fR envariable.
  2624.   On hosts where \fIMH\fR was configured with the UCI option,
  2625. ! if \fB$SIGNATURE\fR is not set and this profile entry is not present,
  2626.   the file $HOME/.signature is consulted.
  2627. --- 219,223 ----
  2628.   Tells \fIsend\fR your mail signature.
  2629. ! This is superceded by the \fBSIGNATURE\fR envariable.
  2630.   On hosts where \fIMH\fR was configured with the UCI option,
  2631. ! if \fBSIGNATURE\fR is not set and this profile entry is not present,
  2632.   the file $HOME/.signature is consulted.
  2633. ***************
  2634. *** 253,255 ****
  2635.   
  2636. ! If you define the envariable \fB$MH\fR,
  2637.   you can specify a profile other than \fI\&.mh\(ruprofile\fR to be read
  2638. --- 258,260 ----
  2639.   
  2640. ! If you define the envariable \fBMH\fR,
  2641.   you can specify a profile other than \fI\&.mh\(ruprofile\fR to be read
  2642. ***************
  2643. *** 256,258 ****
  2644.   by the \fIMH\fR programs that you invoke.
  2645. ! If the value of \fB$MH\fR is not absolute,
  2646.   (i.e., does not begin with a \fB/\fR\0),
  2647. --- 261,263 ----
  2648.   by the \fIMH\fR programs that you invoke.
  2649. ! If the value of \fBMH\fR is not absolute,
  2650.   (i.e., does not begin with a \fB/\fR\0),
  2651. ***************
  2652. *** 259,261 ****
  2653.   it will be presumed to start from the current working directory.
  2654. ! This is one of the very few exceptions in \fIMH\fR where non\-absolute
  2655.   pathnames are not considered relative to the user's \fIMH\fR directory.
  2656. --- 264,266 ----
  2657.   it will be presumed to start from the current working directory.
  2658. ! This is one of the very few exceptions in \fIMH\fR where non-absolute
  2659.   pathnames are not considered relative to the user's \fIMH\fR directory.
  2660. ***************
  2661. *** 263,265 ****
  2662.   Similarly,
  2663. ! if you define the envariable \fB$MHCONTEXT\fR,
  2664.   you can specify a context other than the normal context file
  2665. --- 268,270 ----
  2666.   Similarly,
  2667. ! if you define the envariable \fBMHCONTEXT\fR,
  2668.   you can specify a context other than the normal context file
  2669. ***************
  2670. *** 267,269 ****
  2671.   As always,
  2672. ! unless the value of \fB$MHCONTEXT\fR is absolute,
  2673.   it will be presumed to start from your \fIMH\fR directory.
  2674. --- 272,274 ----
  2675.   As always,
  2676. ! unless the value of \fBMHCONTEXT\fR is absolute,
  2677.   it will be presumed to start from your \fIMH\fR directory.
  2678. ***************
  2679. *** 274,276 ****
  2680.   .ti -.5i
  2681. ! \fB$MAILDROP\fR\0: tells \fIinc\fR the default maildrop
  2682.   .br
  2683. --- 279,281 ----
  2684.   .ti -.5i
  2685. ! \fBMAILDROP\fR\0: tells \fIinc\fR the default maildrop
  2686.   .br
  2687. ***************
  2688. *** 279,281 ****
  2689.   .ti -.5i
  2690. ! \fB$SIGNATURE\fR\0: tells \fIsend\fR and \fIpost\fR your mail signature
  2691.   .br
  2692. --- 284,286 ----
  2693.   .ti -.5i
  2694. ! \fBSIGNATURE\fR\0: tells \fIsend\fR and \fIpost\fR your mail signature
  2695.   .br
  2696. ***************
  2697. *** 284,286 ****
  2698.   .ti -.5i
  2699. ! \fB$HOME\fR\0: tells all \fIMH\fR programs your home directory
  2700.   
  2701. --- 289,291 ----
  2702.   .ti -.5i
  2703. ! \fBHOME\fR\0: tells all \fIMH\fR programs your home directory
  2704.   
  2705. ***************
  2706. *** 287,289 ****
  2707.   .ti -.5i
  2708. ! \fB$SHELL\fR\0: tells \fIbbl\fR the default shell to run
  2709.   
  2710. --- 292,294 ----
  2711.   .ti -.5i
  2712. ! \fBSHELL\fR\0: tells \fIbbl\fR the default shell to run
  2713.   
  2714. ***************
  2715. *** 290,296 ****
  2716.   .ti -.5i
  2717. ! \fB$TERM\fR\0: tells \fIMH\fR your terminal type
  2718.   .br
  2719. ! The \fB$TERMCAP\fR envariable is also consulted.
  2720.   In particular,
  2721. ! these tells \fIscan\fR and \fImhl\fR how to clear your terminal,
  2722.   and how many columns wide your terminal is.
  2723. --- 295,301 ----
  2724.   .ti -.5i
  2725. ! \fBTERM\fR\0: tells \fIMH\fR your terminal type
  2726.   .br
  2727. ! The \fBTERMCAP\fR envariable is also consulted.
  2728.   In particular,
  2729. ! these tell \fIscan\fR and \fImhl\fR how to clear your terminal,
  2730.   and how many columns wide your terminal is.
  2731. ***************
  2732. *** 299,301 ****
  2733.   .ti -.5i
  2734. ! \fB$editalt\fR\0: the alternate message
  2735.   .br
  2736. --- 304,306 ----
  2737.   .ti -.5i
  2738. ! \fBeditalt\fR\0: the alternate message
  2739.   .br
  2740. ***************
  2741. *** 302,304 ****
  2742.   This is set by \fIdist\fR and \fIrepl\fR during edit sessions
  2743. ! so you can peruse the message being distributed or replied-to.
  2744.   The message is also available through a link called \*(lq@\*(rq
  2745. --- 307,309 ----
  2746.   This is set by \fIdist\fR and \fIrepl\fR during edit sessions
  2747. ! so you can peruse the message being distributed or replied to.
  2748.   The message is also available through a link called \*(lq@\*(rq
  2749. ***************
  2750. *** 308,310 ****
  2751.   .ti -.5i
  2752. ! \fB$mhdraft\fR\0: the path to the working draft
  2753.   .br
  2754. --- 313,315 ----
  2755.   .ti -.5i
  2756. ! \fBmhdraft\fR\0: the path to the working draft
  2757.   .br
  2758. ***************
  2759. *** 314,325 ****
  2760.   In addition,
  2761. ! \fIdist\fR, \fIforw\fR, and \fIrepl\fR set \fB$mhfolder\fR if appropriate.
  2762.   Further,
  2763. ! \fIdist\fR and \fIrepl\fR set \fB$mhaltmsg\fR to tell the
  2764.   \fIwhatnowproc\fR about an alternate message associated with the draft
  2765. ! (the message being distributed or replied\-to),
  2766.   and
  2767. ! \fIdist\fR sets \fB$mhdist\fR to tell the \fIwhatnowproc\fR that
  2768. ! message re\-distribution is occurring.
  2769.   Also,
  2770. ! \fB$mheditor\fR is set to tell the \fIwhatnowproc\fR the user's choice of
  2771.   editor (unless overridden by `\-noedit').
  2772. --- 319,330 ----
  2773.   In addition,
  2774. ! \fIdist\fR, \fIforw\fR, and \fIrepl\fR set \fBmhfolder\fR if appropriate.
  2775.   Further,
  2776. ! \fIdist\fR and \fIrepl\fR set \fBmhaltmsg\fR to tell the
  2777.   \fIwhatnowproc\fR about an alternate message associated with the draft
  2778. ! (the message being distributed or replied to),
  2779.   and
  2780. ! \fIdist\fR sets \fBmhdist\fR to tell the \fIwhatnowproc\fR that
  2781. ! message re-distribution is occurring.
  2782.   Also,
  2783. ! \fBmheditor\fR is set to tell the \fIwhatnowproc\fR the user's choice of
  2784.   editor (unless overridden by `\-noedit').
  2785. ***************
  2786. *** 326,332 ****
  2787.   Similarly,
  2788. ! \fB$mhuse\fR may be set by \fIcomp\fR.
  2789.   Finally,
  2790. ! \fB$mhmessages\fR is set by \fIdist\fR, \fIforw\fR, and \fIrepl\fR
  2791.   if annotations are to occur
  2792. ! (along with \fB$mhannotate\fR, and \fB$mhinplace\fR).
  2793.   It's amazing all the information that has to get passed via envariables to
  2794. --- 331,337 ----
  2795.   Similarly,
  2796. ! \fBmhuse\fR may be set by \fIcomp\fR.
  2797.   Finally,
  2798. ! \fBmhmessages\fR is set by \fIdist\fR, \fIforw\fR, and \fIrepl\fR
  2799.   if annotations are to occur
  2800. ! (along with \fBmhannotate\fR, and \fBmhinplace\fR).
  2801.   It's amazing all the information that has to get passed via envariables to
  2802. ***************
  2803. *** 344,346 ****
  2804.   are not given any `msgs' arguments,
  2805. ! then they will default to using the file indicated by \fB$mhdraft\fR.
  2806.   This is useful for getting the default behavior supplied by the default
  2807. --- 349,351 ----
  2808.   are not given any `msgs' arguments,
  2809. ! then they will default to using the file indicated by \fBmhdraft\fR.
  2810.   This is useful for getting the default behavior supplied by the default
  2811. ***************
  2812. *** 349,351 ****
  2813.   .ti -.5i
  2814. ! \fB$mhfolder\fR\0: the folder containing the alternate message
  2815.   .br
  2816. --- 354,356 ----
  2817.   .ti -.5i
  2818. ! \fBmhfolder\fR\0: the folder containing the alternate message
  2819.   .br
  2820. ***************
  2821. *** 353,356 ****
  2822.   so you can peruse other messages in the current folder
  2823. ! besides the one being distributed or replied-to.
  2824. ! The \fB$mhfolder\fR envariable is also
  2825.   set by \fIshow\fR, \fIprev\fR, and \fInext\fR
  2826. --- 358,361 ----
  2827.   so you can peruse other messages in the current folder
  2828. ! besides the one being distributed or replied to.
  2829. ! The \fBmhfolder\fR envariable is also
  2830.   set by \fIshow\fR, \fIprev\fR, and \fInext\fR
  2831. ***************
  2832. *** 359,363 ****
  2833.   .ti -.5i
  2834. ! \fB$MHBBRC\fR\0: 
  2835.   .br
  2836. ! If you define the envariable \fB$MHBBRC\fR,
  2837.   you can specify a BBoards information file other than \fI\&.bbrc\fR to be
  2838. --- 364,368 ----
  2839.   .ti -.5i
  2840. ! \fBMHBBRC\fR\0: 
  2841.   .br
  2842. ! If you define the envariable \fBMHBBRC\fR,
  2843.   you can specify a BBoards information file other than \fI\&.bbrc\fR to be
  2844. ***************
  2845. *** 364,366 ****
  2846.   read by \fIbbc\fR.
  2847. ! If the value of \fB$MHBBRC\fR is not absolute,
  2848.   (i.e., does not begin with a \fB/\fR\0),
  2849. --- 369,371 ----
  2850.   read by \fIbbc\fR.
  2851. ! If the value of \fBMHBBRC\fR is not absolute,
  2852.   (i.e., does not begin with a \fB/\fR\0),
  2853. ***************
  2854. *** 369,371 ****
  2855.   .ti -.5i
  2856. ! \fB$MHFD\fR\0: 
  2857.   .br
  2858. --- 374,376 ----
  2859.   .ti -.5i
  2860. ! \fBMHFD\fR\0: 
  2861.   .br
  2862. ***************
  2863. *** 374,380 ****
  2864.   then if this envariable is set,
  2865. ! \fIMH\fR considers it to be the number of a file\-descriptor which is opened,
  2866. ! read\-only to the \fIMH\fR profile.
  2867.   Similarly,
  2868. ! if the envariable \fB$MHCONTEXTFD\fR is set,
  2869. ! this is the number of a file\-descriptor which is opened read\-only
  2870.   to the \fIMH\fR context.
  2871. --- 379,385 ----
  2872.   then if this envariable is set,
  2873. ! \fIMH\fR considers it to be the number of a file descriptor which is opened,
  2874. ! read-only to the \fIMH\fR profile.
  2875.   Similarly,
  2876. ! if the envariable \fBMHCONTEXTFD\fR is set,
  2877. ! this is the number of a file descriptor which is opened read-only
  2878.   to the \fIMH\fR context.
  2879. ***************
  2880. *** 382,384 ****
  2881.   and is used to examine possible speed improvements for \fIMH\fR startup.
  2882. ! Note that these envariables must be set and non\-empty to enable this feature.
  2883.   However,
  2884. --- 387,389 ----
  2885.   and is used to examine possible speed improvements for \fIMH\fR startup.
  2886. ! Note that these envariables must be set and non-empty to enable this feature.
  2887.   However,
  2888. ***************
  2889. *** 387,389 ****
  2890.   this scheme is used.
  2891. ! These file\-descriptors are not closed throughout the execution of the
  2892.   \fIMH\fR program,
  2893. --- 392,394 ----
  2894.   this scheme is used.
  2895. ! These file descriptors are not closed throughout the execution of the
  2896.   \fIMH\fR program,
  2897. ***************
  2898. *** 403,405 ****
  2899.   .Sa
  2900. ! mh(1), environ(5)
  2901.   .De
  2902. --- 408,410 ----
  2903.   .Sa
  2904. ! mh(1), environ(5), mh-sequence(5)
  2905.   .De
  2906. ***************
  2907. *** 410,412 ****
  2908.   In previous versions of \fIMH\fR,
  2909. ! the current\-message value of a writable folder was kept in a file
  2910.   called \*(lqcur\*(rq in the folder itself.
  2911. --- 415,417 ----
  2912.   In previous versions of \fIMH\fR,
  2913. ! the current-message value of a writable folder was kept in a file
  2914.   called \*(lqcur\*(rq in the folder itself.
  2915. ***************
  2916. *** 413,415 ****
  2917.   In \fImh.3\fR,
  2918. ! the \fI\&.mh\(ruprofile\fR contained the current\-message values for
  2919.   all folders, regardless of their writability.
  2920. --- 418,420 ----
  2921.   In \fImh.3\fR,
  2922. ! the \fI\&.mh\(ruprofile\fR contained the current-message values for
  2923.   all folders, regardless of their writability.
  2924. ***************
  2925. *** 476,478 ****
  2926.   
  2927. ! In this way, the user can avoid lengthy type\-in to the shell,
  2928.   and still give \fIMH\fR commands safely.  (Recall that some \fIMH\fR
  2929. --- 481,483 ----
  2930.   
  2931. ! In this way, the user can avoid lengthy type-in to the shell,
  2932.   and still give \fIMH\fR commands safely.  (Recall that some \fIMH\fR
  2933. *** ../mh-6.7.2/conf/doc/mh-sequence.rf    Wed Jan 29 15:43:10 1992
  2934. --- conf/doc/mh-sequence.rf    Tue May 12 15:23:52 1992
  2935. ***************
  2936. *** 1,6 ****
  2937.   .\"    @(MHWARNING)
  2938. ! .\" @(#)$Id: mh-sequence.rf,v 1.9 1991/01/09 11:34:34 mh Exp jromine $
  2939. ! .SC MH\-SEQUENCE 5
  2940.   .NA
  2941. ! mh\-sequence \- sequence specification for MH message system
  2942.   .SY
  2943. --- 1,6 ----
  2944.   .\"    @(MHWARNING)
  2945. ! .\" @(#)$Id: mh-sequence.rf,v 1.11 1992/05/12 22:23:34 jromine Exp $
  2946. ! .SC MH-SEQUENCE 5
  2947.   .NA
  2948. ! mh-sequence \- sequence specification for MH message system
  2949.   .SY
  2950. *** ../mh-6.7.2/conf/doc/mh-tailor.rf    Mon Jan  7 16:13:31 1991
  2951. --- conf/doc/mh-tailor.rf    Wed Dec  2 14:16:22 1992
  2952. ***************
  2953. *** 1,10 ****
  2954.   .\"    @(MHWARNING)
  2955. ! .\" @(#)$Id: mh-tailor.rf,v 2.11 91/01/07 16:13:27 mh Exp $
  2956. ! .SC MH\-TAILOR 5
  2957.   .NA
  2958. ! @(MHETCPATH)/mtstailor \- system customization for MH message system
  2959.   .SY
  2960. ! any \fIMH\fR command that interacts with the MTS
  2961.   .DE
  2962. ! The file @(MHETCPATH)/mtstailor defines run\-time options for those \fIMH\fR
  2963.   programs which interact (in some form) with the message transport system.
  2964. --- 1,11 ----
  2965.   .\"    @(MHWARNING)
  2966. ! .\" @(#)$Id: mh-tailor.rf,v 2.19 1992/12/02 22:16:12 jromine Exp $
  2967. ! .SC MH-TAILOR 5
  2968.   .NA
  2969. ! mh-tailor, mtstailor \- system customization for MH message handler
  2970. ! 
  2971.   .SY
  2972. ! \fI@(MHETCPATH)/mtstailor\fP
  2973.   .DE
  2974. ! The file @(MHETCPATH)/mtstailor defines run-time options for those \fIMH\fR
  2975.   programs which interact (in some form) with the message transport system.
  2976. ***************
  2977. *** 14,15 ****
  2978. --- 15,18 ----
  2979.   
  2980. + Each option should be given on a single line.  Blank lines
  2981. + and lines which begin with `#' are ignored.
  2982.   The options available along with default values and a description of their
  2983. ***************
  2984. *** 29,30 ****
  2985. --- 32,44 ----
  2986.   .ti -.5i
  2987. + localdomain:
  2988. + .br
  2989. + If this is set, a `.' followed by this string will be
  2990. + appended to your host name.
  2991. + This might be useful for sites
  2992. + where the host name returned by the system
  2993. + (e.g., <whoami.h>, gethostname, etc.), 
  2994. + is not a \*(lqfully qualified domain name\*(rq
  2995. + (i.e., does not contain a `.').
  2996. + 
  2997. + .ti -.5i
  2998.   systemname:
  2999. ***************
  3000. *** 53,55 ****
  3001.   .br
  3002. ! The beginning\-of\-message delimiter for maildrops.
  3003.   
  3004. --- 67,69 ----
  3005.   .br
  3006. ! The beginning-of-message delimiter for maildrops.
  3007.   
  3008. ***************
  3009. *** 58,60 ****
  3010.   .br
  3011. ! The end\-of\-message delimiter for maildrops.
  3012.   
  3013. --- 72,74 ----
  3014.   .br
  3015. ! The end-of-message delimiter for maildrops.
  3016.   
  3017. ***************
  3018. *** 75,80 ****
  3019.   .br
  3020. ! The locking\-discipline to perform.
  3021. ! A value of \*(lq0\*(rq means to use \fIflock\fR if available,
  3022. ! or \fIlockf\fR if \fBLOCKF\fP was defined when building \fIMH\fP.
  3023. ! On non-\fBBSD42\fP systems,
  3024.   standard \fIBellMail\fR locking is used.
  3025. --- 89,95 ----
  3026.   .br
  3027. ! The locking discipline to perform.
  3028. ! A value of \*(lq0\*(rq means to use kernel-level locking
  3029. ! if available.
  3030. ! (See below for more details.)
  3031. ! On systems compiled without kernel-level locking,
  3032.   standard \fIBellMail\fR locking is used.
  3033. ***************
  3034. *** 89,91 ****
  3035.   The name of the directory for making locks.
  3036. ! If your system doesn't have the \fIflock\fR or \fIlockf\fP syscalls,
  3037.   then this directory is used when creating locks.
  3038. --- 104,106 ----
  3039.   The name of the directory for making locks.
  3040. ! If your system isn't configured to use kernel-level locking,
  3041.   then this directory is used when creating locks.
  3042. ***************
  3043. *** 97,99 ****
  3044.   .br
  3045. ! The name of the system\-wide default \fI\&.maildelivery\fR file.
  3046.   See \fImhook\fR\0(1) for the details.
  3047. --- 112,114 ----
  3048.   .br
  3049. ! The name of the system-wide default \fI\&.maildelivery\fR file.
  3050.   See \fImhook\fR\0(1) for the details.
  3051. ***************
  3052. *** 103,105 ****
  3053.   .br
  3054. ! The highest user\-id which should NOT receive mail addressed to
  3055.   \*(lqeveryone\*(rq.
  3056. --- 118,120 ----
  3057.   .br
  3058. ! The highest user-id which should NOT receive mail addressed to
  3059.   \*(lqeveryone\*(rq.
  3060. ***************
  3061. *** 144,147 ****
  3062.   .br
  3063. ! The path to the program that filters \fIUUCP\fR\-style maildrops to
  3064. ! \fIMMDF\fR\-style maildrops.
  3065.   .\" @END: MF
  3066. --- 159,162 ----
  3067.   .br
  3068. ! The path to the program that filters \fIUUCP\fR\^-style maildrops to
  3069. ! \fIMMDF\fR\^-style maildrops.
  3070.   .\" @END: MF
  3071. ***************
  3072. *** 202,204 ****
  3073.   .br
  3074. ! A file containing a list of hosts that can sent ARPAnet mail.
  3075.   
  3076. --- 217,219 ----
  3077.   .br
  3078. ! A file containing a list of hosts that can send ARPAnet mail.
  3079.   
  3080. ***************
  3081. *** 226,228 ****
  3082.   .br
  3083. ! 2. Words are surrounded by whitespace.
  3084.   .br
  3085. --- 241,243 ----
  3086.   .br
  3087. ! 2. Words are surrounded by white space.
  3088.   .br
  3089. ***************
  3090. *** 309,311 ****
  3091.   user.
  3092. ! (The user\-id \*(lqftp\*(rq is highly recommended.)
  3093.   This variable should be set on both the POP BBoards client and service hosts.
  3094. --- 324,326 ----
  3095.   user.
  3096. ! (The user-id \*(lqftp\*(rq is highly recommended.)
  3097.   This variable should be set on both the POP BBoards client and service hosts.
  3098. ***************
  3099. *** 342,348 ****
  3100.   the second says where lock files should be created.
  3101.   The \*(lqlockstyle\*(rq variable can take on three values: 0, 1, 2.
  3102. ! A value of 0 is useful on \fBBSD42\fP systems.
  3103. ! If you included the \fBLOCKF\fP option when building \fIMH\fP, the
  3104. ! \fIlockf\fP syscall is used, otherwise the \fIflock\fP syscall is used.
  3105. ! If you're not on a 4.2BSD system,
  3106.   a locking style of 0 is considered the same as locking style 1.
  3107. --- 357,369 ----
  3108.   the second says where lock files should be created.
  3109. + 
  3110.   The \*(lqlockstyle\*(rq variable can take on three values: 0, 1, 2.
  3111. ! A value of 0 is useful on systems with kernel-level locking.
  3112. ! If you are on a \fBBSD42\fP system, \fIMH\fP assumes
  3113. ! you have the \fIflock\fR system call.
  3114. ! On other systems:
  3115. ! define \fBFLOCK\fP if you want to use the \fIflock\fP system call;
  3116. ! define \fBLOCKF\fP if you want to use the \fIlockf\fP system call;
  3117. ! or define \fBFCNTL\fP if you want to use the \fIfcntl\fP system call
  3118. ! for kernel-level locking.
  3119. ! If you haven't configured \fIMH\fP to use kernel-level locking,
  3120.   a locking style of 0 is considered the same as locking style 1.
  3121. ***************
  3122. *** 350,352 ****
  3123.   A value of 1 or 2 specifies that a file should be created whose existence
  3124. ! means \*(lqlocked\*(rq and whose non\-existence means \*(lqunlocked\*(rq.
  3125.   A value of 1 says to construct the lockname by appending \*(lq.lock\*(rq to
  3126. --- 371,373 ----
  3127.   A value of 1 or 2 specifies that a file should be created whose existence
  3128. ! means \*(lqlocked\*(rq and whose non-existence means \*(lqunlocked\*(rq.
  3129.   A value of 1 says to construct the lockname by appending \*(lq.lock\*(rq to
  3130. *** ../mh-6.7.2/conf/doc/mh.rf    Mon Jan  7 16:56:42 1991
  3131. --- conf/doc/mh.rf    Wed Oct 28 09:00:35 1992
  3132. ***************
  3133. *** 1,3 ****
  3134.   .\"    @(MHWARNING)
  3135. ! .\" @(#)$Id: mh.rf,v 1.10 91/01/07 16:56:36 mh Exp $
  3136.   .if '\*(ZZ'-man' \{\
  3137. --- 1,3 ----
  3138.   .\"    @(MHWARNING)
  3139. ! .\" @(#)$Id: mh.rf,v 1.12 1992/10/28 17:00:27 jromine Exp $
  3140.   .if '\*(ZZ'-man' \{\
  3141. ***************
  3142. *** 172,173 ****
  3143. --- 172,174 ----
  3144.   ^mhook (1)~^\- MH receive\-mail hooks
  3145. + ^mhparam (1)~^\- print MH profile components
  3146.   ^mhpath (1)~^\- print full pathnames of MH messages and folders
  3147. ***************
  3148. *** 188,189 ****
  3149. --- 189,191 ----
  3150.   ^show (1)~^\- show (list) messages
  3151. + ^slocal (1)~^\- special local mail delivery
  3152.   ^sortm (1)~^\- sort messages
  3153. ***************
  3154. *** 206,207 ****
  3155. --- 208,210 ----
  3156.   ^dp (8)~^\- parse dates 822\-style
  3157. + ^fmtdump (8)~^\- decode \fIMH\fP format files
  3158.   ^install\-mh (8)~^\- initialize the MH environment
  3159. *** ../mh-6.7.2/conf/doc/mhl.rf    Thu Apr  5 16:04:38 1990
  3160. --- conf/doc/mhl.rf    Fri Dec  4 10:59:24 1992
  3161. ***************
  3162. *** 1,3 ****
  3163.   .\"    @(MHWARNING)
  3164. ! .\" @(#)$Id: mhl.rf,v 1.7 90/04/05 15:10:28 sources Exp $
  3165.   .SC MHL 1
  3166. --- 1,3 ----
  3167.   .\"    @(MHWARNING)
  3168. ! .\" @(#)$Id: mhl.rf,v 1.11 1992/12/04 18:59:22 jromine Exp $
  3169.   .SC MHL 1
  3170. ***************
  3171. *** 158,159 ****
  3172. --- 158,161 ----
  3173.   nosplit    flag    combine multiple fields into a single field
  3174. + newline    flag    print newline at end of components (default)
  3175. + nonewline    flag    don't print newline at end of components
  3176.   formatfield    string    format string for this component (see below)
  3177. ***************
  3178. *** 168,170 ****
  3179.   Integer\-valued variables are given decimal values,
  3180. ! while string\-valued variables are given arbirtray text bracketed by
  3181.   double\-quotes.
  3182. --- 170,172 ----
  3183.   Integer\-valued variables are given decimal values,
  3184. ! while string\-valued variables are given arbitrary text bracketed by
  3185.   double\-quotes.
  3186. ***************
  3187. *** 250,251 ****
  3188. --- 252,256 ----
  3189.   address parsing is not enabled.
  3190. + 
  3191. + The \*(lqnonewline\*(rq option interacts badly 
  3192. + with \*(lqcompress\*(rq and \*(lqsplit\*(rq.
  3193.   .En
  3194. *** /dev/null    Tue Dec 15 08:01:10 1992
  3195. --- conf/doc/mhn.rf    Thu Dec 10 15:59:13 1992
  3196. ***************
  3197. *** 0 ****
  3198. --- 1,1025 ----
  3199. + .\"    @(MHWARNING)
  3200. + .\" @(#)$Id: mhn.rf,v 1.8 1992/12/10 23:59:10 jromine Exp $
  3201. + .SC MHN 1
  3202. + .NA
  3203. + mhn \- multi-media MH
  3204. + .SY
  3205. + mhn
  3206. + \%[+folder] \%[msgs] \%[\-part\0number]... \%[\-type\0content]...
  3207. + .br
  3208. + \%[\-list\0\%[\-headers]\0\%[\-noheaders]
  3209. + .br
  3210. +        \%[\-realsize]\0\%[\-norealsize]] \%[-nolist]
  3211. + .br
  3212. + \%[\-show\0\%[\-serialonly]\0\%[\-noserialonly]]
  3213. + .br
  3214. +        \%[\-form\0formfile]] \%[\-noshow]
  3215. + .br
  3216. + \%[\-store\0\%[\-auto]\0\%[\-noauto]] \%[\-nostore]
  3217. + .br
  3218. + \%[\-verbose] \%[\-noverbose]
  3219. + \%[\-rfc934mode] \%[\-norfc934mode]
  3220. + \%[\-ebcdicsafe] \%[\-noebcdicsafe]
  3221. + .br
  3222. + \%[\-help]
  3223. + .DE
  3224. + The \fImhn\fR command manipulates multi-media messages as specified in
  3225. + RFC 1341.
  3226. + 
  3227. + Three action switches direct the operation of \fImhn\fR,
  3228. + namely `\-list', `\-show', and `\-store'.
  3229. + Any of these switches may be used concurrently.
  3230. + Normally these action switches will operate on the content of each of the
  3231. + named messages.
  3232. + However,
  3233. + by using the `\-part' and `\-type' switches,
  3234. + the scope of the operation can be focused on particular
  3235. + subparts (of a multipart content) and/or particular content types.
  3236. + 
  3237. + A part specification consists of a series of numbers separated by dots.
  3238. + For example,
  3239. + in a multipart content containing three parts,
  3240. + these would be named as 1, 2, and 3, respectively.
  3241. + If part 2 was also a multipart content containing two parts,
  3242. + these would be named as 2.1 and 2.2, respectively.
  3243. + Note that the `\-part' switch is effective for only messages
  3244. + containing a multipart content.
  3245. + If a message has some other kind of content,
  3246. + or if the part is itself another multipart content,
  3247. + the `\-part' switch will not prevent the content from being acted upon.
  3248. + 
  3249. + A content specification consists of a content type and a subtype.
  3250. + The initial list of \*(lqstandard\*(rq content types and subtypes can be found
  3251. + in RFC 1341.
  3252. + .ne 18
  3253. + A list of commonly used contents is briefly reproduced here:
  3254. + .sp
  3255. + .nf
  3256. + .in +.5i
  3257. + .ta \w'application  'u
  3258. + Type    Subtypes
  3259. + ----    --------
  3260. + text    plain, richtext
  3261. + multipart    mixed, alternative, digest, parallel
  3262. + message    rfc822, partial, external-body
  3263. + application    octet-stream, oda, postscript
  3264. + image    jpeg, gif, x-pbm, x-pgm, x-ppm, x-xwd
  3265. + audio    basic
  3266. + video    mpeg
  3267. + .re
  3268. + .in -.5i
  3269. + .fi
  3270. + .sp
  3271. + Subtypes are mandatory.
  3272. + .PP
  3273. + To specify a content,
  3274. + regardless of its subtype,
  3275. + just use the name of the content,
  3276. + e.g.,
  3277. + \*(lqaudio\*(rq.
  3278. + To specify a specific subtype,
  3279. + separate the two with a slash,
  3280. + e.g.,
  3281. + \*(lqaudio/basic\*(rq.
  3282. + Note that regardless of the values given to the `\-type' switch,
  3283. + a multipart content is always acted upon.
  3284. + Further note that if the `\-type' switch is used,
  3285. + and it is desirable to act on a message/external-body content,
  3286. + then the `\-type' switch must be used twice:
  3287. + once for message/external-body and once for the content externally referenced.
  3288. + 
  3289. + .Uh "Listing the Contents"
  3290. + The `\-list' switch tells \fImhn\fR to list the table of contents
  3291. + associated with the named messages.
  3292. + The `\-headers' switch indicates that a one-line banner should be
  3293. + displayed above the listing.
  3294. + The `\-realsize' switch tells \fImhn\fR to evaluate the \*(lqnative\*(rq
  3295. + (decoded) format of each content prior to listing.
  3296. + This provides an accurate count at the expense of a small delay.
  3297. + 
  3298. + .Uh "Showing the Contents"
  3299. + The `\-show' switch tells \fImhn\fR to display the contents of the named
  3300. + messages.
  3301. + The headers of the message are displayed with the \fImhlproc\fR,
  3302. + using format file \fImhl.headers\fR.
  3303. + (The choice of format file can be overridden by the `\-form\0formfile' switch.)
  3304. + 
  3305. + \fImhn\fR will look for information in the user's profile to determine
  3306. + how the different contents should be displayed.
  3307. + This is accomplished by consulting a display string,
  3308. + and executing it under \fB/bin/sh\fR,
  3309. + with the standard input set to the content.
  3310. + .ne 16
  3311. + The display string may contain these escapes:
  3312. + .sp
  3313. + .nf
  3314. + .in +.5i
  3315. + .ta \w'%F  'u
  3316. + %a    additional arguments
  3317. + %e    exclusive execution
  3318. + %f    filename containing content
  3319. + %F    %e, %f, and stdin is terminal not content
  3320. + %l    display listing prior to displaying content
  3321. + %p    %l, and ask for confirmation
  3322. + %s    subtype
  3323. + .re
  3324. + .in -.5i
  3325. + .fi
  3326. + .sp
  3327. + For those display strings containing the e- or F-escape,
  3328. + \fImhn\fR will execute at most one of these at any given time.
  3329. + Although the F-escape expands to be the filename containing the content,
  3330. + the e-escape has no expansion as far as the shell is concerned.
  3331. + 
  3332. + When the p-escape prompts for confirmation,
  3333. + typing INTR (usually control-C) will tell \fImhn\fR not to display
  3334. + that content.
  3335. + Further,
  3336. + when \fImhn\fR is display a content,
  3337. + typing QUIT (usually control-\\) will tell \fImhn\fR to wrap things up
  3338. + immediately.
  3339. + 
  3340. + First,
  3341. + \fImhn\fR will look for an entry of the form:
  3342. + .sp
  3343. + .in +.5i
  3344. + mhn-show-<type>/<subtype>
  3345. + .in -.5i
  3346. + .sp
  3347. + to determine the command to use to display the content.
  3348. + If this isn't found,
  3349. + \fImhn\fR will look for an entry of the form:
  3350. + .sp
  3351. + .in +.5i
  3352. + mhn-show-<type>
  3353. + .in -.5i
  3354. + .sp
  3355. + to determine the display command.
  3356. + .ne 10
  3357. + If this isn't found,
  3358. + \fImhn\fR has two default values:
  3359. + .sp
  3360. + .nf
  3361. + .in +.5i
  3362. + mhn-show-text/plain: %pmoreproc '%F'
  3363. + mhn-show-message/rfc822: %pshow -file '%F'
  3364. + .in -.5i
  3365. + .fi
  3366. + .sp
  3367. + If neither apply,
  3368. + \fImhn\fR will check to see if the message has a application/octet-stream
  3369. + content with parameter \*(lqtype=tar\*(rq.
  3370. + If so,
  3371. + \fImhn\fR will use an appropriate command.
  3372. + If not,
  3373. + \fImhn\fR will complain.
  3374. + 
  3375. + .ne 10
  3376. + Example entries might be:
  3377. + .sp
  3378. + .nf
  3379. + .in +.5i
  3380. + mhn-show-audio/basic: raw2audio 2>/dev/null | play
  3381. + mhn-show-image: xv '%f'
  3382. + mhn-show-application/PostScript: lpr -Pps
  3383. + .in -.5i
  3384. + .fi
  3385. + .sp
  3386. + Note that when using the f- or F-escape,
  3387. + it's a good idea to use single-quotes around the escape.
  3388. + This prevents misinterpretation by the shell of any funny characters
  3389. + that might be present in the filename.
  3390. + 
  3391. + Because the text content might be in a non-ASCII character set,
  3392. + when \fImhn\fR encounters a \*(lqcharset\*(rq parameter for this content,
  3393. + it checks to see whether the environment variable $MM_CHARSET is set
  3394. + and whether the value of this environment variable is equal to the value of
  3395. + the charset parameter.
  3396. + If not,
  3397. + then
  3398. + \fImhn\fR will look for an entry of the form:
  3399. + .sp
  3400. + .in +.5i
  3401. + mhn-charset-<charset>
  3402. + .in -.5i
  3403. + .sp
  3404. + which should contain a command creating an environment to render the
  3405. + character set.
  3406. + This command string should containing a single \*(lq%s\*(rq,
  3407. + which will be filled-in with the command to display the content.
  3408. + 
  3409. + An example entry might be:
  3410. + .sp
  3411. + .in +.5i
  3412. + mhn-charset-iso-8859-1: xterm -fn '-*-*-medium-r-normal-*-*-120-*-*-c-*-iso8859-*' -e %s
  3413. + .in -.5i
  3414. + .sp
  3415. + Note that many pagination programs strip off the high-order bit.
  3416. + However,
  3417. + newer releases of the \fIless\fR program have modest support for
  3418. + single-octet character sets.
  3419. + The source to \fIless\fR version 177,
  3420. + which has such support,
  3421. + is found in the MH source tree under \fBmiscellany/less-177\fR.
  3422. + In order to view messages sent in the ISO 8859/1 character set using
  3423. + \fIless\fR,
  3424. + .ne 9
  3425. + put these lines in your \&.login file:
  3426. + .sp
  3427. + .nf
  3428. + .in +.5i
  3429. + setenv LESSCHARSET latin1
  3430. + setenv LESS "-f"
  3431. + .in -.5i
  3432. + .fi
  3433. + .sp
  3434. + The first line tells \fIless\fR to use 8859/1 definition for determing
  3435. + whether a character is \*(lqnormal\*(rq, \*(lqcontrol\*(lq, or
  3436. + \*(lqbinary\*(rq.
  3437. + The second line tells \fIless\fR not to warn you if it encounters a
  3438. + file that has non-ASCII characters.
  3439. + Then,
  3440. + simply set the \fBmoreproc\fR profile entry to \fIless\fR,
  3441. + and it will get called automatically.
  3442. + (To handle other single-octet character sets,
  3443. + look at the \fIless\fR\0(1) manual entry for information about the
  3444. + \fBLESSCHARDEF\fR environment variable.)
  3445. + 
  3446. + Finally,
  3447. + \fImhn\fR will process each message serially\0--\0it won't start showing
  3448. + the next message until all the commands executed to display the
  3449. + current message have terminated.
  3450. + In the case of a multipart content,
  3451. + the content contains advice indicating if the parts should be
  3452. + displayed serially or in parallel.
  3453. + Because this may cause confusion,
  3454. + particularly on uni-window displays,
  3455. + the `\-serialonly' switch can be given to tell \fImhn\fR to never
  3456. + display parts in parallel.
  3457. + 
  3458. + .Uh "Storing the Contents"
  3459. + The `\-store' switch tells \fImhn\fR to store the contents of the
  3460. + named messages in \*(lqnative\*(rq (decoded) format.
  3461. + Two things must be determined:
  3462. + the directory to store the content,
  3463. + and the filenames.
  3464. + Files are written in the directory given by the \fBmhn-storage\fR
  3465. + profile entry,
  3466. + e.g.,
  3467. + .sp
  3468. + .in +.5i
  3469. + mhn-storage: /tmp
  3470. + .in -.5i
  3471. + .sp
  3472. + If this entry isn't present,
  3473. + the current working directory is used.
  3474. + 
  3475. + \fImhn\fR will look for information in the user's profile to determine
  3476. + how the different contents should be stored.
  3477. + This is achieved through the use of a formatting string,
  3478. + .ne 13
  3479. + which may contain these escapes:
  3480. + .sp
  3481. + .nf
  3482. + .in +.5i
  3483. + .ta \w'%P  'u
  3484. + %m    message number
  3485. + %P    .part
  3486. + %p    part
  3487. + %s    subtype
  3488. + .re
  3489. + .in -.5i
  3490. + .fi
  3491. + .sp
  3492. + If the content isn't part of a multipart content,
  3493. + the p-escapes are ignored.
  3494. + Note that if the formatting string starts with a \*(lq+\*(rq character,
  3495. + then these escapes are ignored,
  3496. + and the content is stored in the named folder.
  3497. + (A formatting string consisting solely of a \*(lq+\*(rq character
  3498. + indicates the current folder.)
  3499. + Further,
  3500. + a formatting string consisting solely of a \*(lq-\*(rq character
  3501. + indicates the standard-output.
  3502. + 
  3503. + First,
  3504. + \fImhn\fR will look for an entry of the form:
  3505. + .sp
  3506. + .in +.5i
  3507. + mhn-store-<type>/<subtype>
  3508. + .in -.5i
  3509. + .sp
  3510. + to determine the formatting string.
  3511. + If this isn't found,
  3512. + \fImhn\fR will look for an entry of the form:
  3513. + .sp
  3514. + .in +.5i
  3515. + mhn-store-<type>
  3516. + .in -.5i
  3517. + .sp
  3518. + to determine the formatting string.
  3519. + If this isn't found,
  3520. + \fImhn\fR will check to see if the content is application/octet-stream
  3521. + with parameter \*(lqtype=tar\*(rq.
  3522. + If so,
  3523. + \fImhn\fR will choose an appropriate filename.
  3524. + If the content is not application/octet-stream,
  3525. + then \fImhn\fR will check to see if the content is a message.
  3526. + If so,
  3527. + \fImhn\fR will use the value \*(lq+\*(rq.
  3528. + If not,
  3529. + \fImhn\fR will use the value \*(lq%m%P.%s\*(rq.
  3530. + 
  3531. + Note that if the formatting string starts with a '/',
  3532. + then content will be stored in the full path given
  3533. + (rather than using the value of \fBmhn-storage\fR or the current working
  3534. + directory.)
  3535. + Similarly,
  3536. + if the formatting string starts with a '|',
  3537. + then \fImhn\fR will execute a command which should ultimately store
  3538. + the content.
  3539. + Note that before executing the command,
  3540. + \fImhn\fR will change to the appropriate directory.
  3541. + Also note that if the formatting string starts with a '|',
  3542. + then \fImhn\fR will also honor the a-escape when processing the
  3543. + formatting string.
  3544. + 
  3545. + .ne 10
  3546. + Example entries might be:
  3547. + .sp
  3548. + .nf
  3549. + .in +.5i
  3550. + mhn-store-text: %m%P.txt
  3551. + mhn-store-audio/basic: | raw2audio -e ulaw -s 8000 -c 1 > %m%P.au
  3552. + mhn-store-application/PostScript: %m%P.ps
  3553. + .in -.5i
  3554. + .fi
  3555. + .sp
  3556. + Further,
  3557. + note that when asked to store a content containing a partial message,
  3558. + \fImhn\fR will try to locate all of the portions and combine them accordingly.
  3559. + Thus,
  3560. + if someone's sent you a message in several parts,
  3561. + you might put them all in their own folder and do:
  3562. + .sp
  3563. + .in +.5i
  3564. + mhn all -store
  3565. + .in -.5i
  3566. + .sp
  3567. + This will store exactly one message,
  3568. + containing the sum of the parts.
  3569. + Note that if \fImhn\fR can not locate each part,
  3570. + it will not store anything.
  3571. + 
  3572. + Finally,
  3573. + if the `\-auto' switch is given and the content contains information
  3574. + indicating the filename the content should be stored as
  3575. + (and if the filename doesn't begin with a '/'),
  3576. + then the filename from the content will be used instead.
  3577. + 
  3578. + .Uh "External Access"
  3579. + For contents of type message/external-body,
  3580. + .ne 12
  3581. + \fImhn\fR supports these access-types:
  3582. + .sp
  3583. + .nf
  3584. + .in +.5i
  3585. + afs
  3586. + anon-ftp
  3587. + ftp
  3588. + local-file
  3589. + mail-server
  3590. + .in -.5i
  3591. + .fi
  3592. + .sp
  3593. + If your system supports a SOCKETs interface to TCP/IP,
  3594. + then \fImhn\fR will use a built-in FTP client.
  3595. + Otherwise,
  3596. + \fImhn\fR will look for the \fBmhn-access-ftp\fR profile entry,
  3597. + e.g.,
  3598. + .sp
  3599. + .in +.5i
  3600. + mhn-access-ftp: myftp.sh
  3601. + .in -.5i
  3602. + .sp
  3603. + to determine the pathname of a program to perform the FTP retrieval.
  3604. + .ne 14
  3605. + This program is invoked with these arguments:
  3606. + .sp
  3607. + .nf
  3608. + .in +.5i
  3609. + domain name of FTP-site
  3610. + username
  3611. + password
  3612. + remote directory
  3613. + remote filename
  3614. + local filename
  3615. + \*(lqascii\*(rq or \*(lqbinary\*(rq
  3616. + .in -.5i
  3617. + .fi
  3618. + .sp
  3619. + The program should terminate with a zero-valued exit-status if the
  3620. + retrieval is success.
  3621. + 
  3622. + .Uh "The Content Cache"
  3623. + When \fImhn\fR encounters an external content containing a
  3624. + \*(lqContent-ID:\*(rq field,
  3625. + and if the content allows caching,
  3626. + then \fImhn\fR looks for the profile entry \fBmhn-cache\fR to
  3627. + determine if the content should be read from/written to a cache.
  3628. + Any content written to the cache will,
  3629. + by default,
  3630. + be world-readable.
  3631. + (To prevent this,
  3632. + use a directory name with the desired read and execute permissions.)
  3633. + The \fBmhn-cache\fR profile entry names the directory used for caching,
  3634. + e.g.,
  3635. + .sp
  3636. + .in +.5i
  3637. + mhn-cache: /tmp
  3638. + .in -.5i
  3639. + .sp
  3640. + might be used if you didn't care that the cache got wiped after each reboot
  3641. + of the system.
  3642. + 
  3643. + .Uh "Composing the Contents"
  3644. + The \fImhn\fR program can also be used as a simple editor to aid in
  3645. + composing multi-media messages.
  3646. + When invoked by a \fIwhatnow\fR program,
  3647. + \fImhn\fR will expect the body of the draft to be formatted as an
  3648. + \*(lq\fImhn\fR composition file.\*(rq
  3649. + 
  3650. + .ne 54
  3651. + The syntax of this is straight-forward:
  3652. + .sp
  3653. + .nf
  3654. + .in +.5i
  3655. +    body         ::=     1*(content | EOL)
  3656. + 
  3657. +    content      ::=     directive | plaintext
  3658. + 
  3659. +    directive    ::=     "#" type "/" subtype
  3660. +                             0*(";" attribute "=" value)
  3661. +                             [ "(" comment ")" ]
  3662. +                             [ "[" description "]" ]
  3663. +                             [ filename ]
  3664. +                             EOL
  3665. + 
  3666. +                       | "#@" type "/" subtype
  3667. +                             0*(";" attribute "=" value)
  3668. +                             [ "(" comment ")" ]
  3669. +                             [ "[" description "]" ]
  3670. +                             external-parameters
  3671. +                             EOL
  3672. + 
  3673. +                       | "#forw"
  3674. +                             [ "[" description "]" ]
  3675. +                             [ "+"folder ] [ 0*msg ]
  3676. +                             EOL
  3677. + 
  3678. +                       | "#begin"
  3679. +                               [ "[" description "]" ]
  3680. +                               [   "alternative"
  3681. +                                 | "parallel"    ]
  3682. +                               EOL
  3683. +                             1*body
  3684. +                         "#end" EOL
  3685. + 
  3686. +    plaintext    ::=     [ "Content-Description:"
  3687. +                               description EOL EOL ]
  3688. +                             1*line
  3689. +                         [ "#" EOL ]
  3690. + 
  3691. +                       | "#<" type "/" subtype
  3692. +                             0*(";" attribute "=" value)
  3693. +                             [ "(" comment ")" ]
  3694. +                             [ "[" description "]" ]
  3695. +                             EOL
  3696. +                             1*line
  3697. +                         [ "#" EOL ]
  3698. + 
  3699. +    line         ::=     "##" text EOL
  3700. +                         -- interpreted as "#"text EOL
  3701. +                       | text EOL
  3702. + .in -.5i
  3703. + .fi
  3704. + .sp
  3705. + Basically,
  3706. + the body contains one or more contents.
  3707. + A content consists of either a directive,
  3708. + indicated with a \*(lq#\*(rq as the first character of a line;
  3709. + or,
  3710. + plaintext (one or more lines of text).
  3711. + The continuation character, \*(lq\\\*(lq, may be used to enter a single
  3712. + .ne 11
  3713. + directive on more than one line,
  3714. + e.g.,
  3715. + .sp
  3716. + .nf
  3717. + .in +.5i
  3718. + #@application/octet-stream; \\
  3719. +     type=tar; \\
  3720. +     conversions=x-compress
  3721. + .in -.5i
  3722. + .fi
  3723. + .sp
  3724. + There are four kinds of directives:
  3725. + \*(lqtype\*(rq directives,
  3726. + which name the type and subtype of the content;
  3727. + \*(lqexternal-type\*(rq directives,
  3728. + which also name the type and subtype of the content;
  3729. + the \*(lqforw\*(rq directive,
  3730. + which is used to forward a digest of messages;
  3731. + and,
  3732. + the \*(lqbegin\*(rq directive,
  3733. + which is used to create a multipart content.
  3734. + 
  3735. + For the type directives,
  3736. + the user may optionally specify the name of a file containing the
  3737. + contents in \*(lqnative\*(rq (decoded) format.
  3738. + (If the filename starts with the \*(lq|\*(rq character,
  3739. + then this gives a command whose output is captured accordingly.)
  3740. + If a filename is not given,
  3741. + \fImhn\fR will look for information in the user's profile to determine
  3742. + how the different contents should be composed.
  3743. + This is accomplished by consulting a composition string,
  3744. + and executing it under \fB/bin/sh\fR,
  3745. + with the standard output set to the content.
  3746. + .ne 13
  3747. + The composition string may contain these escapes:
  3748. + .sp
  3749. + .nf
  3750. + .in +.5i
  3751. + .ta \w'%P  'u
  3752. + %a    additional arguments
  3753. + %f    filename containing content
  3754. + %F    %f, and stdout is not re-directed
  3755. + %s    subtype
  3756. + .re
  3757. + .in -.5i
  3758. + .fi
  3759. + .sp
  3760. + First,
  3761. + \fImhn\fR will look for an entry of the form:
  3762. + .sp
  3763. + .in +.5i
  3764. + mhn-compose-<type>/<subtype>
  3765. + .in -.5i
  3766. + .sp
  3767. + to determine the command to use to compose the content.
  3768. + If this isn't found,
  3769. + \fImhn\fR will look for an entry of the form:
  3770. + .sp
  3771. + .in +.5i
  3772. + mhn-compose-<type>
  3773. + .in -.5i
  3774. + .sp
  3775. + to determine the composition command.
  3776. + If this isn't found,
  3777. + \fImhn\fR will complain.
  3778. + 
  3779. + An example entry might be:
  3780. + .sp
  3781. + .in +.5i
  3782. + mhn-compose-audio/basic: record | raw2audio -F
  3783. + .in -.5i
  3784. + .sp
  3785. + Because commands like these will vary,
  3786. + depending on the display environment used for login,
  3787. + composition strings for different contents should probably be put in
  3788. + the file specified by the \fB$MHN\fR environment variable,
  3789. + instead of directly in your user profile.
  3790. + 
  3791. + The external-type directives are used to provide a reference to a content,
  3792. + rather than enclosing the contents itself.
  3793. + Hence,
  3794. + instead of providing a filename as with the type directives,
  3795. + external-parameters are supplied.
  3796. + These look like regular parameters,
  3797. + .ne 15
  3798. + so they must be separated accordingly,
  3799. + e.g.,
  3800. + .sp
  3801. + .nf
  3802. + .in +.5i
  3803. + #@application/octet-stream; \\
  3804. +     type=tar; \\
  3805. +     conversions=x-compress [] \\
  3806. +     access-type=anon-ftp; \\
  3807. +     name="mh-mime.tar.Z"; \\
  3808. +     directory="mrose/mh-mime"; \\
  3809. +     site="ftp.ics.uci.edu"
  3810. + .in -.5i
  3811. + .fi
  3812. + .sp
  3813. + By specifying \*(lq[]\*(rq,
  3814. + an empty description string is given,
  3815. + and the start of the external-parameters is identified.
  3816. + .ne 16
  3817. + These parameters are of the form:
  3818. + .sp
  3819. + .nf
  3820. + .in +.5i
  3821. + .ta \w'access-type=  'u
  3822. + access-type=    usually \fIanon-ftp\fR or \fImail-server\fR
  3823. + name=    filename
  3824. + directory=    directoryname (optional)
  3825. + site=    hostname
  3826. + mode=    usually \fIascii\fR or \fIimage\fR (optional)
  3827. + server=    mailbox
  3828. + body=    command to send for retrieval
  3829. + .re
  3830. + .in -.5i
  3831. + .fi
  3832. + .sp
  3833. + 
  3834. + For the forw directive,
  3835. + the user may optionally specify the name of the folder and which
  3836. + messages are to be forwarded.
  3837. + if a folder is not given,
  3838. + it defaults to the current folder.
  3839. + Similarly,
  3840. + if a message is not given,
  3841. + it defaults to the current message.
  3842. + Hence,
  3843. + the forw directive is similar to the \fIforw\fR\0(1) command,
  3844. + except that the former uses the MIME rules for encapsulation
  3845. + rather than those specified in RFC 934.
  3846. + Usage of the `\-rfc934mode' switch indicates whether \fImhn\fR should
  3847. + attempt to utilize the encapsulation rules in such a way as to appear
  3848. + that RFC 934 is being used.
  3849. + If given,
  3850. + then RFC 934-compliant user-agents should be able to burst the message on
  3851. + reception\0--\0providing that the messages being encapsulated do not
  3852. + contain encapsulated messages themselves.
  3853. + The drawback of this approach is that the encapsulations are generated
  3854. + by placing an extra newline at the end of the body of each message.
  3855. + 
  3856. + For the begin directive,
  3857. + the user must specify at least one content between
  3858. + the begin and end pairs.
  3859. + 
  3860. + For all of these directives,
  3861. + the user may include a brief description of the content between
  3862. + the \*(lq[\*(rq character and the \*(lq]\*(rq character.
  3863. + Putting this all together,
  3864. + .ne 15
  3865. + here is a brief example of what a user's components file might look like:
  3866. + .sp
  3867. + .nf
  3868. + .in +.5i
  3869. + To:
  3870. + cc:
  3871. + Subject:
  3872. + --------
  3873. + #audio/basic [Flint phone]  \\
  3874. +     |raw2audio -F < /home/mrose/lib/multi-media/flint.au
  3875. + #image/gif   [MTR's photo] \\
  3876. +                     /home/mrose/lib/multi-media/mrose.gif
  3877. + .in -.5i
  3878. + .fi
  3879. + .sp
  3880. + For a later example,
  3881. + we'll call this components file \fImhncomps\fR.
  3882. + 
  3883. + As noted earlier,
  3884. + in addition to directives,
  3885. + plaintext can be present.
  3886. + Plaintext is gathered,
  3887. + until a directive is found or the draft is exhausted,
  3888. + and this is made to form a text content.
  3889. + If the plaintext must contain a \*(lq#\*(rq at the beginning of a line,
  3890. + simply double it,
  3891. + e.g.,
  3892. + .sp
  3893. + .in +.5i
  3894. + ##when sent, this line will start with only one #
  3895. + .in -.5i
  3896. + .sp
  3897. + If you want to end the plaintext prior to a directive,
  3898. + e.g.,
  3899. + to have two plaintext contents adjacent,
  3900. + simply insert a line containing a single \*(lq#\*(rq character,
  3901. + .ne 10
  3902. + e.g.,
  3903. + .sp
  3904. + .nf
  3905. + .in +.5i
  3906. + this is the first content
  3907. + #
  3908. + and this is the second
  3909. + .in -.5i
  3910. + .fi
  3911. + .sp
  3912. + Finally,
  3913. + if the plaintext starts with a line of the form:
  3914. + .sp
  3915. + .in +.5i
  3916. + Content-Description: text
  3917. + .in -.5i
  3918. + .sp
  3919. + then this will be used to describe the plaintext content.
  3920. + \fBNOTE WELL:\fR you must follow this line with a blank line before
  3921. + starting your text.
  3922. + 
  3923. + By default,
  3924. + plaintext is captured as a text/plain content.
  3925. + You can override this by starting the plaintext with \*(lq#<\*(rq
  3926. + followed by a content-type specification,
  3927. + .ne 11
  3928. + e.g.,
  3929. + .sp
  3930. + .nf
  3931. + .in +.5i
  3932. + #<text/richtext
  3933. + this content will be tagged as text/richtext
  3934. + #
  3935. + and this content will be tagged as text/plain
  3936. + .in -.5i
  3937. + .fi
  3938. + .sp
  3939. + Note that if you use the \*(lq#<\*(rq plaintext-form,
  3940. + then the content-description must be on the same line which identifies
  3941. + the content type of the plaintext.
  3942. + 
  3943. + If \fImhn\fR is successful,
  3944. + it renames the original draft to start with the \*(lq,\*(rq character
  3945. + and end with the string \*(lq.orig\*(rq,
  3946. + e.g.,
  3947. + if you are editing the file \*(lqdraft\*(rq,
  3948. + it will be renamed to \*(lq,draft.orig\*(rq.
  3949. + This allows you to easily recover the \fImhn\fR composition file.
  3950. + 
  3951. + .Uh "Automatic Composition"
  3952. + Note that MH will not invoke \fImhn\fR automatically,
  3953. + unless you add this line to your \&.mh\(ruprofile file:
  3954. + .sp
  3955. + .in +.5i
  3956. + automhnproc: mhn
  3957. + .in -.5i
  3958. + .sp
  3959. + Otherwise,
  3960. + you must specifically give the command
  3961. + .sp
  3962. + .in +.5i
  3963. + What now? edit mhn
  3964. + .in -.5i
  3965. + .sp
  3966. + prior to sending the draft.
  3967. + 
  3968. + You can easily tailor MH to help you remember to do this.
  3969. + .ne 10
  3970. + Suppose you have these lines in your profile:
  3971. + .sp
  3972. + .nf
  3973. + .in +.5i
  3974. + mcomp:          -editor mprompter -form mhncomps
  3975. + mprompter:      -noprepend -norapid
  3976. + mprompter-next: mhn
  3977. + .in -.5i
  3978. + .fi
  3979. + .sp
  3980. + where \fImcomp\fR is a link to \fIcomp\fR\0(1),
  3981. + and \fImprompter\fR is a link to \fIprompter\fR\0(1).
  3982. + Then to send a message using the \fImhncomps\fR components file above,
  3983. + .ne 26
  3984. + the sequence is:
  3985. + .sp
  3986. + .nf
  3987. + .in +.5i
  3988. + % \fBmcomp\fR
  3989. + To: \fBuser@host\fR
  3990. + cc:
  3991. + Subject: \fBmulti-media message\fR
  3992. + --------
  3993. + #audio/basic [Flint phone]  \\
  3994. +     |raw2audio -F < /home/mrose/lib/multi-media/flint.au
  3995. + #image/gif   [MTR's photo] \\
  3996. +                     /home/mrose/lib/multi-media/mrose.gif
  3997. + 
  3998. + --------Enter additional text
  3999. + 
  4000. + \fBThis message contains three contents.\fR
  4001. + \fB<CTRL-D>\fR
  4002. + --------
  4003. + 
  4004. + What now? \fBedit\fR (this invokes \fImhn\fR)
  4005. + 
  4006. + What now? \fBsend\fR
  4007. + .in -.5i
  4008. + .fi
  4009. + .sp
  4010. + You have to remember to type the additional edit command,
  4011. + but it should be fairly obvious from the interaction.
  4012. + 
  4013. + Finally,
  4014. + you should consider adding this line to your profile:
  4015. + .sp
  4016. + .in +.5i
  4017. + lproc: show
  4018. + .in -.5i
  4019. + .sp
  4020. + This way,
  4021. + if you decide to \fBlist\fR after invoking \fImhn\fR as your editor,
  4022. + the command
  4023. + .sp
  4024. + .in +.5i
  4025. + What now? list
  4026. + .in -.5i
  4027. + .sp
  4028. + will work as you expect.
  4029. + 
  4030. + .Uh "Sending Files via Mail"
  4031. + When you want to send a bunch of files to someone,
  4032. + you can run the \fIviamail\fR shell script,
  4033. + which is similar the tarmail command:
  4034. + .sp
  4035. + .in +.5i
  4036. + @(MHETCPATH)/viamail mailpath \*(lqsubject\*(rq files\0...
  4037. + .in -.5i
  4038. + .sp
  4039. + \fIviamail\fR will archive the directories/files you name with \fItar\fR\0(1),
  4040. + and then mail the compressed archive to the `mailpath' with the given
  4041. + `subject'.
  4042. + The archive will be automatically split up into as many messages as
  4043. + necessary in order to get past most mailers.
  4044. + 
  4045. + Sometimes you want \fIviamail\fR to pause after posting a partial message.
  4046. + This is usually the case when you are running \fIsendmail\fR and
  4047. + expect to generate a lot of partial messages.
  4048. + If the first argument given to \fIviamail\fR starts with a dash,
  4049. + then it is interpreted as the number of seconds to pause in between postings,
  4050. + e.g.,
  4051. + .sp
  4052. + .in +.5i
  4053. + @(MHETCPATH)/viamail -300 mailpath \*(lqsubject\*(rq files\0...
  4054. + .in -.5i
  4055. + .sp
  4056. + will pause 5 minutes in between each posting.
  4057. + 
  4058. + When these messages are received,
  4059. + invoke \fImhn\fR once,
  4060. + with the list of messages,
  4061. + and the `\-store' command.
  4062. + The \fImhn\fR program will then store exactly one message containing the
  4063. + archive.
  4064. + You can then use `\-show' to find out what's inside;
  4065. + possibly  followed by `\-store' to write the archive to a file where you
  4066. + .ne 26
  4067. + can subsequently uncompress and untar it, e.g.,
  4068. + .sp
  4069. + .nf
  4070. + .in +.5i
  4071. + % mhn -list all
  4072. +  msg part  type/subtype             size description
  4073. +    1       message/partial           47K part 1 of 4
  4074. +    2       message/partial           47K part 2 of 4
  4075. +    3       message/partial           47K part 3 of 4
  4076. +    4       message/partial           18K part 4 of 4
  4077. + % mhn -store all
  4078. + % mhn -list -verbose last
  4079. +  msg part  type/subtype             size description
  4080. +    5       application/octet-stream 118K
  4081. +              (extract with uncompress | tar xvpf -)
  4082. +              type=tar
  4083. +              conversions=x-compress
  4084. + % mhn -show last
  4085. +  msg part  type/subtype             size description
  4086. +    5       application/octet-stream 118K
  4087. + -- headers of message, followed by \fItar\fR listing appears here
  4088. + % mhn -store last
  4089. + % uncompress < 5.tar.Z | tar xvpf -
  4090. + .in -.5i
  4091. + .fi
  4092. + .sp
  4093. + Alternately,
  4094. + by using the `\-auto' switch,
  4095. + \fImhn\fR will automatically do the extraction for you,
  4096. + .ne 26
  4097. + e.g.,
  4098. + .sp
  4099. + .nf
  4100. + .in +.5i
  4101. + % mhn -list all
  4102. +  msg part  type/subtype             size description
  4103. +    1       message/partial           47K part 1 of 4
  4104. +    2       message/partial           47K part 2 of 4
  4105. +    3       message/partial           47K part 3 of 4
  4106. +    4       message/partial           18K part 4 of 4
  4107. + % mhn -store all
  4108. + % mhn -list -verbose last
  4109. +  msg part  type/subtype             size description
  4110. +    5       application/octet-stream 118K
  4111. +              (extract with uncompress | tar xvpf -)
  4112. +              type=tar
  4113. +              conversions=x-compress
  4114. + % mhn -show last
  4115. +  msg part  type/subtype             size description
  4116. +    5       application/octet-stream 118K
  4117. + -- headers of message, followed by \fItar\fR listing appears here
  4118. + % mhn -store -auto last
  4119. + -- \fItar\fR listing appears here as files are extracted
  4120. + .in -.5i
  4121. + .fi
  4122. + .sp
  4123. + As the second \fItar\fR listing is generated,
  4124. + the files are extracted.
  4125. + A prudent user will never put `\-auto' in the \&.mh\(ruprofile file.
  4126. + The correct procedure is to first use `\-show',
  4127. + to find out what will be extracted.
  4128. + Then \fImhn\fR can be invoked with  `\-store' and `\-auto' to perform
  4129. + the extraction.
  4130. + 
  4131. + .Uh "User Environment"
  4132. + Because the display environment in which \fImhn\fR operates may vary
  4133. + for a user,
  4134. + \fImhn\fR will look for the environment variable \fB$MHN\fR.
  4135. + If present,
  4136. + this specifies the name of an additional user profile which should be read.
  4137. + Hence,
  4138. + when a user logs in on a particular display device,
  4139. + this environment variable should be set to refer to a file containing
  4140. + definitions useful for the display device.
  4141. + Normally,
  4142. + only entries of the form
  4143. + .sp
  4144. + .in +.5i
  4145. + mhn-show-<type>/<subtype>
  4146. + .br
  4147. + mhn-show-<type>
  4148. + .in -.5i
  4149. + .sp
  4150. + need be present.
  4151. + Finally,
  4152. + \fImhn\fR will attempt to consult one other additional user profile,
  4153. + e.g.,
  4154. + .sp
  4155. + .in +.5i
  4156. + @(MHETCPATH)/mhn_defaults
  4157. + .in -.5i
  4158. + .sp
  4159. + which is created automatically during MH installation.
  4160. + .Fi
  4161. + ^$HOME/\&.mh\(ruprofile~^The user profile
  4162. + ^$MHN~^Additional profile entries
  4163. + ^@(MHETCPATH)/mhn_defaults~^System-default profile entries
  4164. + ^@(MHETCPATH)/mhl.headers~^The headers template
  4165. + .Pr
  4166. + ^Path:~^To determine the user's MH directory
  4167. + .Ps
  4168. + ^Current\-Folder:~^To find the default current folder
  4169. + .Ps
  4170. + ^mhlproc:~^Default program to display message headers
  4171. + .Ps
  4172. + ^mhn-access-ftp:~^Program to retrieve contents via FTP
  4173. + .Ps
  4174. + ^mhn-cache~^Directory to store cached external contents
  4175. + .Ps
  4176. + ^mhn-charset-<charset>~^Template for environment to render character sets
  4177. + .Ps
  4178. + ^mhn-compose-<type>*~^Template for composing contents
  4179. + .Ps
  4180. + ^mhn-show-<type>*~^Template for displaying contents
  4181. + .Ps
  4182. + ^mhn-storage~^Directory to store contents
  4183. + .Ps
  4184. + ^mhn-store-<type>*~^Template for storing contents
  4185. + .Ps
  4186. + ^moreproc:~^Default program to display text/plain content
  4187. + .Sa
  4188. + mhl(1)
  4189. + .br
  4190. + \fIMIME: Mechanisms for Specifying and Describing the Format of
  4191. + Internet Message Bodies\fR
  4192. + (RFC 1341),
  4193. + .br
  4194. + \fIProposed Standard for Message Encapsulation\fR
  4195. + (RFC 934).
  4196. + .De
  4197. + `+folder' defaults to the current folder
  4198. + .Ds
  4199. + `\-noauto'
  4200. + .Ds
  4201. + `\-noebcdicsafe'
  4202. + .Ds
  4203. + `\-form\0mhl.headers'
  4204. + .Ds
  4205. + `\-headers'
  4206. + .Ds
  4207. + `\-realsize'
  4208. + .Ds
  4209. + `\-rfc934mode'
  4210. + .Ds
  4211. + `\-noserialonly'
  4212. + .Ds
  4213. + `\-show'
  4214. + .Ds
  4215. + `\-noverbose'
  4216. + .Co
  4217. + If a folder is given,
  4218. + it will become the current folder.
  4219. + The last message selected will become the current message.
  4220. + .Bu
  4221. + Partial messages contained within a multipart content are not reassembled
  4222. + with the `\-store' switch.
  4223. + .En
  4224. *** ../mh-6.7.2/conf/doc/mhook.rf    Thu Apr  5 22:18:47 1990
  4225. --- conf/doc/mhook.rf    Thu Oct 29 14:03:51 1992
  4226. ***************
  4227. *** 1,3 ****
  4228.   .\"    @(MHWARNING)
  4229. ! .\" @(#)$Id: mhook.rf,v 1.8 90/04/05 22:18:43 sources Exp $
  4230.   .SC MHOOK 1
  4231. --- 1,3 ----
  4232.   .\"    @(MHWARNING)
  4233. ! .\" @(#)$Id: mhook.rf,v 1.15 1992/10/29 22:03:44 jromine Exp $
  4234.   .SC MHOOK 1
  4235. ***************
  4236. *** 4,25 ****
  4237.   .NA
  4238. ! mhook \- MH receive\-mail hooks
  4239.   .SY
  4240. ! $HOME/\&.maildelivery
  4241. ! @BEGIN: MHMTS
  4242. ! .ds SL \fIpost\fR
  4243. ! .ds ZS slocal
  4244. ! @END: MHMTS
  4245. ! @BEGIN: MMDFIMTS
  4246. ! .ds SL \fIslocal\fR
  4247. ! .ds ZS slocal
  4248. ! @END: MMDFIMTS
  4249. ! @BEGIN: MMDFIIMTS
  4250. ! .ds SL the local channel
  4251. ! .ds ZS mmdfII
  4252. ! @END: MMDFIIMTS
  4253. ! @BEGIN: SENDMTS
  4254. ! .ds SL \fIslocal\fR
  4255. ! .ds ZS slocal
  4256. ! @END: SENDMTS
  4257. ! 
  4258.   .ti .5i
  4259. --- 4,8 ----
  4260.   .NA
  4261. ! mhook, rcvdist, rcvpack, rcvtty  \- MH receive-mail hooks
  4262.   .SY
  4263. ! .na
  4264.   .ti .5i
  4265. ***************
  4266. *** 45,46 ****
  4267. --- 28,30 ----
  4268.   \%[\-help]
  4269. + .ad
  4270.   .DE
  4271. ***************
  4272. *** 49,287 ****
  4273.   You do \fBNOT\fR invoke the hook yourself,
  4274. ! @BEGIN: MHMTS
  4275. ! rather the hook is invoked on your behalf by \fIMH\fR.
  4276. ! @END: MHMTS
  4277. ! @BEGIN: MMDFIMTS
  4278. ! rather the hook is invoked on your behalf by \fIMMDF\fR
  4279. ! when you (symbolically) link @(MHETCPATH)/slocal to the file
  4280. ! bin/rcvmail in your home directory.
  4281. ! @END: MMDFIMTS
  4282. ! @BEGIN: MMDFIIMTS
  4283. ! rather the hook is invoked on your behalf by \fIMMDF\fR.
  4284. ! @END: MMDFIIMTS
  4285. ! @BEGIN: SENDMTS
  4286. ! rather the hook is invoked on your behalf by \fISendMail\fR,
  4287. ! when you include the line
  4288. ! .nf
  4289. ! .in +.5i
  4290. !     \*(lq| @(MHETCPATH)/slocal -user $USER\*(rq
  4291. ! .in -.5i
  4292. ! .fi
  4293. ! in your \&.forward file in your home directory.
  4294. ! @END: SENDMTS
  4295.   
  4296. ! The \fI\&.maildelivery\fR file,
  4297. ! which is an ordinary ASCII file,
  4298. ! controls how local delivery is performed.
  4299. ! This file is read by \*(SL.
  4300. ! .if '\*(ZS'slocal' \{\
  4301. ! 
  4302. ! The format of each line in the \fI\&.maildelivery\fR file is
  4303. ! 
  4304. ! .ti +.5i
  4305. ! \fBfield pattern action result string\fR
  4306. ! 
  4307. ! where
  4308. ! 
  4309. ! .in +.5i
  4310. ! .ti -.25i
  4311. ! \fBfield\fR:
  4312. ! .br
  4313. ! The name of a field that is to be searched for a pattern.
  4314. ! This is any field in the headers of the message that might be present.
  4315. ! In addition, the following special fields are also defined:
  4316. ! .in +.25i
  4317. ! \fIsource\fR: the out\-of\-band sender information
  4318. ! .br
  4319. ! \fIaddr\fR: the address that was used to cause delivery to the recipient
  4320. ! .br
  4321. ! \fIdefault\fR: this matches \fIonly\fR if the message hasn't been delivered yet
  4322. ! .br
  4323. ! \fI*\fR: this always matches
  4324. ! .in -.25i
  4325. ! 
  4326. ! .ti -.25i
  4327. ! \fBpattern\fR:
  4328. ! .br
  4329. ! The sequence of characters to match in the specified field.
  4330. ! Matching is case\-insensitive but not RE\-based.
  4331. ! 
  4332. ! .ti -.25i
  4333. ! \fBaction\fR:
  4334. ! .br
  4335. ! The action to take to deliver the message.
  4336. ! This is one of
  4337. ! 
  4338. ! .in +.5i
  4339. ! .ti -.5i
  4340. ! \fIfile\fR or \fI>\fR:
  4341. ! .br
  4342. ! Append the message to the file named by \fBstring\fR.
  4343. ! The standard maildrop delivery process is used.
  4344. ! If the message can be appended to the file,
  4345. ! then this action succeeds.
  4346. ! 
  4347. ! When writing to the file,
  4348. ! a new field is added:
  4349. ! 
  4350. ! .ti +.5i
  4351. ! Delivery\-Date:\ date
  4352. ! 
  4353. ! which indicates the date and time that message was appended to the file.
  4354. ! 
  4355. ! .ti -.5i
  4356. ! \fIpipe\fR or \fI|\fR:
  4357. ! .br
  4358. ! Pipe the message as the standard input to the command named by \fBstring\fR,
  4359. ! using the Bourne shell \fIsh\fR\0(1) to interpret the string.
  4360. ! Prior to giving the string to the shell,
  4361. ! it is expanded with the following built\-in variables:
  4362. ! .in +.25i
  4363. ! $(sender): the return address for the message
  4364. ! .br
  4365. ! $(address): the address that was used to cause delivery to the recipient
  4366. ! .br
  4367. ! $(size): the size of the message in bytes
  4368. ! .br
  4369. ! $(reply\-to): either the \*(lqReply\-To:\*(rq or \*(lqFrom:\*(rq field
  4370. ! of the message
  4371. ! .br
  4372. ! $(info): miscellaneous out\-of\-band information
  4373. ! .in -.25i
  4374. ! 
  4375. ! When a process is invoked, its environment is:
  4376. ! the user/group id:s are set to recipient's id:s;
  4377. ! the working directory is the recipient's directory;
  4378. ! the umask is 0077;
  4379. ! the process has no /dev/tty;
  4380. ! the standard input is set to the message;
  4381. ! the standard output and diagnostic output are set to /dev/null;
  4382. ! all other file\-descriptors are closed;
  4383. ! the envariables \fB$USER\fR, \fB$HOME\fR, \fB$SHELL\fR are set
  4384. ! appropriately,
  4385. ! and no other envariables exist.
  4386. ! 
  4387. ! The process is given a certain amount of time to execute.
  4388. ! If the process does not exit within this limit,
  4389. ! the process will be terminated with extreme prejudice.
  4390. ! The amount of time is calculated as ((size x 60) + 300) seconds,
  4391. ! where size is the number of bytes in the message.
  4392. ! 
  4393. ! The exit status of the process is consulted in determining the success of the
  4394. ! action.
  4395. ! An exit status of zero means that the action succeeded.
  4396. ! Any other exit status (or abnormal termination) means that the action failed.
  4397. ! 
  4398. ! In order to avoid any time limitations,
  4399. ! you might implement a process that began by \fIforking\fR.
  4400. ! The parent would return the appropriate value immediately,
  4401. ! and the child could continue on,
  4402. ! doing whatever it wanted for as long as it wanted.
  4403. ! This approach is somewhat risky if the parent is going to return an
  4404. ! exit status of zero.
  4405. ! If the parent is going to return a non\-zero exit status,
  4406. ! then this approach can lead to quicker delivery into your maildrop.
  4407. ! 
  4408. ! .ti -.5i
  4409. ! \fIqpipe\fR or \fI<caret>\fR:
  4410. ! .br
  4411. ! Similar to \fIpipe\fR,
  4412. ! but executes the command directly,
  4413. ! after built\-in variable expansion,
  4414. ! without assistance from the shell.
  4415. ! 
  4416. ! .ti -.5i
  4417. ! \fIdestroy\fR:
  4418. ! .br
  4419. ! This action always succeeds.
  4420. ! .in -.5i
  4421. ! 
  4422. ! .ti -.25i
  4423. ! \fBresult\fR:
  4424. ! .br
  4425. ! Indicates how the action should be performed:
  4426. ! 
  4427. ! .in +.5i
  4428. ! .ti -.5i
  4429. ! \fIA\fR:
  4430. ! .br
  4431. ! Perform the action.
  4432. ! If the action succeeds, then the message is considered delivered.
  4433. ! 
  4434. ! .ti -.5i
  4435. ! \fIR\fR:
  4436. ! .br
  4437. ! Perform the action.
  4438. ! Regardless of the outcome of the action,
  4439. ! the message is not considered delivered.
  4440. ! 
  4441. ! .ti -.5i
  4442. ! \fI?\fR:
  4443. ! .br
  4444. ! Perform the action only if the message has not been delivered.
  4445. ! If the action succeeds, then the message is considered delivered.
  4446. ! 
  4447. ! .ti -.5i
  4448. ! \fIN\fR:
  4449. ! .br
  4450. ! Perform the action only if the message has not been delivered
  4451. ! and the previous action succeeded.
  4452. ! If this action succeeds, then the message is considered delivered.
  4453. ! .in -.5i
  4454. ! .in -.5i
  4455. ! 
  4456. ! The file is always read completely,
  4457. ! so that several matches can be made and several actions can be taken.
  4458. ! The \fI\&.maildelivery\fR file must be owned either by the user or by root,
  4459. ! and must be writable only by the owner.
  4460. ! If the \fI\&.maildelivery\fR file can not be found,
  4461. ! or does not perform an action which delivers the message,
  4462. ! then the file @(MHETCPATH)/maildelivery is read according to the same rules.
  4463. ! This file must be owned by the root and must be writable only by the root.
  4464. ! If this file can not be found
  4465. ! or does not perform an action which delivers the message,
  4466. ! then standard delivery to the user's maildrop, @(MHDROPLOC), is performed.
  4467. ! 
  4468. ! Arguments in the \fI\&.maildelivery\fR file are separated by white\-space or
  4469. ! comma.
  4470. ! Since double\-quotes are honored,
  4471. ! these characters may be included in a single argument by enclosing the
  4472. ! entire argument in double\-quotes.
  4473. ! A double\-quote can be included by preceeding it with a backslash.
  4474. ! 
  4475. ! To summarize, here's an example:
  4476. ! 
  4477. ! .nf
  4478. ! .in +.5i
  4479. ! .ta \w'default  'u +\w'uk-mmdf-workers  'u +\w'action  'u +\w'result  'u
  4480. ! #\fIfield\fR    \fIpattern\fR    \fIaction\fR    \fIresult\fR    \fIstring\fR
  4481. ! # lines starting with a '#' are ignored, as are blank lines
  4482. ! #
  4483. ! # file mail with mmdf2 in the \*(lqTo:\*(rq line into file mmdf2.log
  4484. ! To    mmdf2    file    A    mmdf2.log
  4485. ! # Messages from mmdf pipe to the program err-message-archive
  4486. ! From    mmdf    pipe    A    err-message-archive
  4487. ! # Anything with the \*(lqSender:\*(rq address \*(lquk-mmdf-workers\*(rq
  4488. ! # file in mmdf2.log if not filed already
  4489. ! Sender    uk-mmdf-workers    file    ?    mmdf2.log
  4490. ! # \*(lqTo:\*(rq unix \- put in file unix-news
  4491. ! To    Unix    >    A    unix-news
  4492. ! # if the address is jpo=mmdf \- pipe into mmdf-redist
  4493. ! addr    jpo=mmdf    |    A    mmdf-redist
  4494. ! # if the address is jpo=ack \- send an acknowledgement copy back
  4495. ! addr    jpo=ack    |    R    \*(lqresend\0\-r\0$(reply-to)\*(rq
  4496. ! # anything from steve \- destroy!
  4497. ! From    steve    destroy    A    \-
  4498. ! # anything not matched yet \- put into mailbox
  4499. ! default    \-    >    ?    mailbox
  4500. ! # always run rcvalert
  4501. ! *    \-    |    R    rcvalert
  4502. ! .re
  4503. ! .in -.5i
  4504. ! .fi
  4505. ! .\}
  4506. ! .if '\*(ZS'mmdfII' \{\
  4507. ! See \fImaildelivery\fR\0(5) for the details.
  4508. ! .\}
  4509. ! 
  4510. ! Four programs are currently standardly available,
  4511.   \fIrcvdist\fR (redistribute incoming messages to additional recipients),
  4512. --- 33,39 ----
  4513.   You do \fBNOT\fR invoke the hook yourself,
  4514. ! rather the hook is invoked on your behalf by your
  4515. ! system's Message Transport Agent.  See \fIslocal\fP\0(1)
  4516. ! for details on how to activate receive\-mail hooks on your system.
  4517.   
  4518. ! Four programs are currently available as part of \fIMH\fP,
  4519.   \fIrcvdist\fR (redistribute incoming messages to additional recipients),
  4520. ***************
  4521. *** 299,301 ****
  4522.   on its command line.
  4523. ! Its use is obsoleted by the \fI\&.maildelivery\fR.
  4524.   
  4525. --- 51,53 ----
  4526.   on its command line.
  4527. ! Its use is obsoleted by the \*(lqfile\*(rq action of \fIslocal\fR.
  4528.   
  4529. ***************
  4530. *** 315,316 ****
  4531. --- 67,81 ----
  4532.   
  4533. + In addition to the standard \fImh\-format\fR\0(5) escapes,
  4534. + \fIrcvtty\fR also recognizes the following additional \fIcomponent\fR escapes:
  4535. + .sp 1
  4536. + .ne 5
  4537. + .nf
  4538. + .ta \w'Dtimenow  'u +\w'Returns  'u
  4539. + \fIEscape\fR    \fIReturns\fR    \fIDescription\fR
  4540. + body    string    the (compressed) first part of the body
  4541. + dtimenow    date    the current date
  4542. + folder    string    the name of the current folder
  4543. + .re
  4544. + .fi
  4545. + 
  4546.   Normally, \fIrcvtty\fP obeys
  4547. ***************
  4548. *** 318,320 ****
  4549.   With the `\-biff' option, \fIrcvtty\fP will obey the notification
  4550. ! status set by \fIbiff\fP\0(1).
  4551.   If the terminal access daemon (TTYD) is available on your system,
  4552. --- 83,85 ----
  4553.   With the `\-biff' option, \fIrcvtty\fP will obey the notification
  4554. ! status set by \fIbiff\fP\0(1) instead.
  4555.   If the terminal access daemon (TTYD) is available on your system,
  4556. ***************
  4557. *** 327,371 ****
  4558.   .Sa
  4559. ! .if '\*(ZS'slocal' \{\
  4560. ! rcvstore (1), mh\-format(5)
  4561. ! .\}
  4562. ! .if '\*(ZS'mmdfII' \{\
  4563. ! rcvstore (1), maildelivery(5), mh\-format(5)
  4564. ! .\}
  4565. ! .Co
  4566. ! None
  4567. ! .if '\*(ZS'slocal' \{\
  4568. ! .Hi
  4569. ! For compatibility with older versions of \fIMH\fR,
  4570. ! if \fIslocal\fR can't find the user's \fI\&.maildelivery\fR file,
  4571. ! it will attempt to execute an old\-style rcvmail hook in the user's $HOME
  4572. ! directory.
  4573. ! In particular,
  4574. ! it will first attempt to execute
  4575. ! 
  4576. ! .ti +.5i
  4577. ! \&.mh\(rureceive file maildrop directory user
  4578. ! 
  4579. ! failing that it will attempt to execute
  4580. ! 
  4581. ! .ti +.5i
  4582. ! $HOME/bin/rcvmail user file sender
  4583. ! 
  4584. ! before giving up and writing to the user's maildrop.
  4585. ! 
  4586. ! In addition,
  4587. ! whenever a hook or process is invoked,
  4588. ! file\-descriptor three (3) is set to the message in addition to the standard
  4589. ! input.
  4590. ! 
  4591. ! @BEGIN: MMDFIMTS
  4592. ! In addition to an exit status of zero,
  4593. ! the \fIMMDF\fR values \fIRP_MOK\fR (32) and \fIRP_OK\fR (9)
  4594. ! mean that the message has been fully delivered.
  4595. ! All other non\-zero exit status,
  4596. ! including abnormal termination,
  4597. ! is interpreted as the \fIMMDF\fR value \fIRP_MECH\fR (200),
  4598. ! which means \*(lquse an alternate route\*(rq
  4599. ! (deliver the message to the maildrop).
  4600. ! @END: MMDFIMTS
  4601. ! .\}
  4602.   .Bu
  4603. --- 92,94 ----
  4604.   .Sa
  4605. ! rcvstore (1), mh\-format(5), slocal(1)
  4606.   .Bu
  4607. ***************
  4608. *** 372,383 ****
  4609.   Only two return codes are meaningful, others should be.
  4610. - 
  4611. - .if '\*(ZS'mmdfII' \{\
  4612. - Versions of \fIMMDF\fR with the \fImaildelivery\fR mechanism aren't
  4613. - entirely backwards\-compatible with earlier versions.
  4614. - If you have an old\-style hook, the best you can do is to have a one\-line
  4615. - \fI\&.maildelivery\fR file:
  4616. - 
  4617. - .ti +.15i
  4618. - default \- pipe A \*(lqbin/rcvmail $(address) $(info) $(sender)\*(rq
  4619. - .\}
  4620.   .En
  4621. --- 95,96 ----
  4622. *** /dev/null    Tue Dec 15 08:01:10 1992
  4623. --- conf/doc/mhparam.rf    Mon Nov 16 14:27:31 1992
  4624. ***************
  4625. *** 0 ****
  4626. --- 1,70 ----
  4627. + .\"    @(MHWARNING)
  4628. + .\" @(#)$Id: mhparam.rf,v 1.2 1992/11/16 22:27:09 jromine Exp $
  4629. + .SC MHPARAM 1
  4630. + .NA
  4631. + mhparam \- print MH profile components
  4632. + .SY
  4633. + mhparam
  4634. + \%[components]
  4635. + \%[-all]
  4636. + \%[-component] \%[-nocomponent]
  4637. + \%[\-help]
  4638. + .DE
  4639. + \fIMhparam\fR writes the value of the specified profile component to
  4640. + the standard output separated by newlines.  If the profile component
  4641. + is not present, the default value (or nothing if there is no default)
  4642. + is printed.
  4643. + 
  4644. + If more than one component is specified in the `components' list, the component value is
  4645. + preceded by the component name.  If `\-component' is specified, the
  4646. + component name is displayed even when only one component is specified.
  4647. + If `\-nocomponent' is specified, the component name is not displayed
  4648. + even when more than one component is specified.
  4649. + 
  4650. + If `\-all' is specified, all components if the MH profile are
  4651. + displayed and other arguments are ignored.
  4652. + 
  4653. + Examples:
  4654. + 
  4655. + .nf
  4656. + .ta \w'AliasFile:'u+2n
  4657. + .in +.5i
  4658. + % mhparam path
  4659. + Mail
  4660. + 
  4661. + % mhparam mhlproc
  4662. + @(MHETCPATH)/mhl
  4663. + 
  4664. + % mhparam \-component path
  4665. + Path:    Mail
  4666. + 
  4667. + % mhparam AliasFile rmmproc
  4668. + AliasFile:    aliases
  4669. + rmmproc:    rmmproc
  4670. + 
  4671. + % mhparam \-nocomponent AliasFile rmmproc
  4672. + aliases
  4673. + rmmproc
  4674. + .in -.5i
  4675. + .fi
  4676. + 
  4677. + \fIMhparam\fR is also useful in back\-quoted operations:
  4678. + 
  4679. + .nf
  4680. + .in +.5i
  4681. + % fgrep cornell.edu `mhpath +`/`mhparam aliasfile`
  4682. + 
  4683. + .in -.5i
  4684. + .fi
  4685. + .Fi
  4686. + ^$HOME/\&.mh\(ruprofile~^The user profile
  4687. + .Sa
  4688. + mh-profile\|(5)
  4689. + .De
  4690. + `\-nocomponent' if only one component is specified
  4691. + `\-component' if more than one component is specified
  4692. + .Ds
  4693. + `components' defaults to none
  4694. + .Co
  4695. + None
  4696. + .En
  4697. *** ../mh-6.7.2/conf/doc/mhpath.rf    Thu Apr  5 16:04:27 1990
  4698. --- conf/doc/mhpath.rf    Tue Feb 11 14:40:28 1992
  4699. ***************
  4700. *** 1,3 ****
  4701.   .\"    @(MHWARNING)
  4702. ! .\" @(#)$Id: mhpath.rf,v 1.6 90/04/05 15:08:26 sources Exp $
  4703.   .SC MHPATH 1
  4704. --- 1,3 ----
  4705.   .\"    @(MHWARNING)
  4706. ! .\" @(#)$Id: mhpath.rf,v 1.7 1992/02/11 22:40:23 jromine Exp $
  4707.   .SC MHPATH 1
  4708. ***************
  4709. *** 21,22 ****
  4710. --- 21,23 ----
  4711.   Because of this:
  4712. + .sp
  4713.   1) the name \*(lqnew\*(rq has been added to \fImhpath\fR's list of
  4714. ***************
  4715. *** 29,30 ****
  4716. --- 30,32 ----
  4717.   The \*(lqnew\*(rq message may not be used as part of a message range.
  4718. + .sp
  4719.   2) Within a message list,
  4720. ***************
  4721. *** 35,36 ****
  4722. --- 37,39 ----
  4723.   All other message designations must refer to at least one existing message.
  4724. + .sp
  4725.   3) An empty folder is not in itself an error.
  4726. *** ../mh-6.7.2/conf/doc/msgchk.rf    Mon Apr  9 20:22:48 1990
  4727. --- conf/doc/msgchk.rf    Tue Feb 11 13:18:54 1992
  4728. ***************
  4729. *** 1,3 ****
  4730.   .\"    @(MHWARNING)
  4731. ! .\" @(#)$Id: msgchk.rf,v 1.6 90/04/09 20:22:46 sources Exp $
  4732.   .SC MSGCHK 1
  4733. --- 1,3 ----
  4734.   .\"    @(MHWARNING)
  4735. ! .\" @(#)$Id: msgchk.rf,v 1.7 1992/02/04 21:41:41 jromine Exp $
  4736.   .SC MSGCHK 1
  4737. ***************
  4738. *** 11,12 ****
  4739. --- 11,13 ----
  4740.   \%[\-host\ host] \%[\-user\ user]
  4741. + \%[\-apop] \%[\-noapop]
  4742.   \%[\-rpop] \%[\-norpop]
  4743. ***************
  4744. *** 46,53 ****
  4745.   \fImsgchk\fR will query the POP service host as to the status of mail waiting.
  4746. ! The `\-user\ user' switch may be given to specify the name of the POP
  4747. ! subscriber you wish to check mail for on the POP service host.
  4748. ! The `\-rpop' switch uses the UNIX \fIrPOP\fR
  4749. ! (authentication done via trusted connections).
  4750. ! In contrast, the `\-norpop' switch uses the ARPA \fIPOP\fR
  4751. ! (in which case \fImsgchk\fR will prompt for a password).
  4752.   @END: POP
  4753. --- 47,61 ----
  4754.   \fImsgchk\fR will query the POP service host as to the status of mail waiting.
  4755. ! If the `\-user\ user' switch is not given,
  4756. ! then the current username is used.
  4757. ! Normally,
  4758. ! \fImsgchk\fR will prompt for a password to use.
  4759. ! However,
  4760. ! if the `\-apop' switch is given,
  4761. ! \fImsgchk\fR will generate authentication credentials to provide
  4762. ! for origin authentication and replay protection,
  4763. ! but which do not involve sending a password in the clear over the network.
  4764. ! Otherwise,
  4765. ! if the `\-rpop' switch is given,
  4766. ! then \fImsgchk\fR will try to use a \*(lqtrusted\*(rq connection
  4767. ! (ala the BSD r-commands).
  4768.   @END: POP
  4769. *** ../mh-6.7.2/conf/doc/msh.rf    Thu Apr  5 16:04:57 1990
  4770. --- conf/doc/msh.rf    Fri Oct 16 14:36:19 1992
  4771. ***************
  4772. *** 1,3 ****
  4773.   .\"    @(MHWARNING)
  4774. ! .\" @(#)$Id: msh.rf,v 1.8 90/04/05 15:13:40 sources Exp $
  4775.   .SC MSH 1
  4776. --- 1,3 ----
  4777.   .\"    @(MHWARNING)
  4778. ! .\" @(#)$Id: msh.rf,v 1.9 1992/10/16 21:36:14 jromine Exp $
  4779.   .SC MSH 1
  4780. ***************
  4781. *** 65,66 ****
  4782. --- 65,70 ----
  4783.   .br
  4784. + @BEGIN: MIME
  4785. + mhn
  4786. + .br
  4787. + @END: MIME
  4788.   msgchk
  4789. *** ../mh-6.7.2/conf/doc/packf.rf    Thu Apr  5 16:04:58 1990
  4790. --- conf/doc/packf.rf    Tue May 12 15:25:08 1992
  4791. ***************
  4792. *** 1,3 ****
  4793.   .\"    @(MHWARNING)
  4794. ! .\" @(#)$Id: packf.rf,v 1.5 90/04/05 15:13:54 sources Exp $
  4795.   .SC PACKF 1
  4796. --- 1,3 ----
  4797.   .\"    @(MHWARNING)
  4798. ! .\" @(#)$Id: packf.rf,v 1.8 1992/05/12 22:24:59 jromine Exp $
  4799.   .SC PACKF 1
  4800. ***************
  4801. *** 4,6 ****
  4802.   .NA
  4803. ! packf \- compress a folder into a single file
  4804.   .SY
  4805. --- 4,6 ----
  4806.   .NA
  4807. ! packf \- compress an MH folder into a single file
  4808.   .SY
  4809. ***************
  4810. *** 31,32 ****
  4811. --- 31,33 ----
  4812.   ^$HOME/\&.mh\(ruprofile~^The user profile
  4813. + ^\&.msgbox\&.map~^A binary index of the file
  4814.   .Pr
  4815. ***************
  4816. *** 48,49 ****
  4817. --- 49,57 ----
  4818.   The first message packed will become the current message.
  4819. + .Bu
  4820. + \fIPackf\fP doesn't handle the old UUCP-style \*(lqmbox\*(rq format
  4821. + (used by \fISendMail\fP).
  4822. + To pack messages into this format,
  4823. + use the script \fI@(MHETCPATH)/packmbox\fP.
  4824. + Note that \fIpackmbox\fP does not take the `\-file' option of \fIpackf\fP,
  4825. + and instead writes its output on \fIstdout\fP.
  4826.   .En
  4827. *** ../mh-6.7.2/conf/doc/pick.rf    Tue Dec 18 14:57:43 1990
  4828. --- conf/doc/pick.rf    Mon Oct 26 16:03:59 1992
  4829. ***************
  4830. *** 1,3 ****
  4831.   .\"    @(MHWARNING)
  4832. ! .\" @(#)$Id: pick.rf,v 1.6 90/12/18 14:57:30 mh Exp $
  4833.   .SC PICK 1
  4834. --- 1,3 ----
  4835.   .\"    @(MHWARNING)
  4836. ! .\" @(#)$Id: pick.rf,v 1.9 1992/10/27 00:03:47 jromine Exp $
  4837.   .SC PICK 1
  4838. ***************
  4839. *** 27,28 ****
  4840. --- 27,34 ----
  4841.   \%[\-\|\-component\ pattern]
  4842. + \%[\-cc\ pattern]
  4843. + \%[\-date\ pattern]
  4844. + \%[\-from\ pattern]
  4845. + \%[\-search\ pattern]
  4846. + \%[\-subject\ pattern]
  4847. + \%[\-to\ pattern]
  4848.   \%[\-after\ date] \%[\-before\ date] \%[\-datefield\ field]
  4849. ***************
  4850. *** 137,139 ****
  4851. --- 143,153 ----
  4852.   .ti +.5i
  4853. + .ie t \{\
  4854.   pick\0\-after\0yesterday\0\-and\0\-lbrace\0\-from\0freida\0\-or\0\-from\0fear\0\-rbrace
  4855. + .\}
  4856. + .el \{\
  4857. + pick\0\-after\0yesterday\0\-and
  4858. + .br
  4859. + .ti +1i
  4860. + \-lbrace\0\-from\0freida\0\-or\0\-from\0fear\0\-rbrace
  4861. + .\}
  4862.   
  4863. ***************
  4864. *** 148,149 ****
  4865. --- 162,167 ----
  4866.   
  4867. + If no search criteria are given, all the messages
  4868. + specified on the command
  4869. + line are selected (this defaults to \*(lqall\*(rq).
  4870. + 
  4871.   Once the search has been performed,
  4872. ***************
  4873. *** 244,245 ****
  4874. --- 262,267 ----
  4875.   they aren't any more.
  4876. + .Hh
  4877. + Use \*(lqpick sequence \-list\*(rq
  4878. + to enumerate the messages in a sequence (such as for use 
  4879. + by a shell script).
  4880.   .Bu
  4881. ***************
  4882. *** 259,261 ****
  4883.   
  4884. ! and \fIpick\fR fails (e.g., no messages are from \*(lqjones\*(rq),
  4885.   then the shell will still run the outer command (e.g., \*(lqscan\*(rq).
  4886. --- 281,284 ----
  4887.   
  4888. ! and \fIpick\fR selects no messages
  4889. ! (e.g., no messages are from \*(lqjones\*(rq),
  4890.   then the shell will still run the outer command (e.g., \*(lqscan\*(rq).
  4891. ***************
  4892. *** 273,274 ****
  4893. --- 296,300 ----
  4894.   This lets the outer command fail gracefully as well.
  4895. + .sp
  4896. + The pattern syntax \*(lq[l-r]\*(rq is not supported; each letter
  4897. + to be matched must be included within the square brackets.
  4898.   .En
  4899. *** /dev/null    Tue Dec 15 08:01:10 1992
  4900. --- conf/doc/popauth.rf    Thu Feb  6 14:46:26 1992
  4901. ***************
  4902. *** 0 ****
  4903. --- 1,41 ----
  4904. + .\"    @(MHWARNING)
  4905. + .\" @(#)$Id: popauth.rf,v 1.1 1992/02/06 22:46:24 jromine Exp $
  4906. + .SC POPAUTH 8
  4907. + .NA
  4908. + popauth - manipulate POP authorization DB
  4909. + .SY
  4910. + popauth
  4911. + \%[\-init] \%[\-list] \%[\-user\ name]
  4912. + \%[\-help]
  4913. + .DE
  4914. + The \fIpopauth\fR program allows a POP-subscriber to change the secret
  4915. + value used to generate their authentication credentials.
  4916. + In addition,
  4917. + the super\-user or master POP user may use this program to either
  4918. + initialize the database or to print public information from it.
  4919. + \fIpopauth\fR is useful only when the APOP configuration option is defined.
  4920. + (This configuration option defines the name of the POP authorization DB.)
  4921. + 
  4922. + Under normal usage,
  4923. + \fIpopauth\fR prompts for a new secret,
  4924. + just like the \fIpasswd\fR program.
  4925. + It then updates the POP authorization DB accordingly.
  4926. + 
  4927. + With the `\-init' switch,
  4928. + the super-user or master POP user can create a new (or zero the existing)
  4929. + POP authorization DB.
  4930. + 
  4931. + With the `\-list' switch,
  4932. + the super-user or master POP user can print out public information
  4933. + about the named subscriber (or all subscribers).
  4934. + .Fi
  4935. + ^/etc/pop.auth.*~^POP authorization DB
  4936. + .Pr
  4937. + None
  4938. + .Sa
  4939. + popd(8)
  4940. + .De
  4941. + None
  4942. + .Co
  4943. + None
  4944. + .En
  4945. *** ../mh-6.7.2/conf/doc/popd.rf    Mon Apr  9 20:22:50 1990
  4946. --- conf/doc/popd.rf    Tue Feb  4 13:13:28 1992
  4947. ***************
  4948. *** 1,3 ****
  4949.   .\"    @(MHWARNING)
  4950. ! .\" @(#)$Id: popd.rf,v 1.8 90/04/09 20:22:49 sources Exp $
  4951.   .SC POPD 8
  4952. --- 1,3 ----
  4953.   .\"    @(MHWARNING)
  4954. ! .\" @(#)$Id: popd.rf,v 1.9 1992/02/04 21:13:28 jromine Exp $
  4955.   .SC POPD 8
  4956. ***************
  4957. *** 10,12 ****
  4958.   .DE
  4959. ! The \fIpopd\fR server implements the Post Office protocol,
  4960.   as described in RFC1081 and RFC1082.
  4961. --- 10,12 ----
  4962.   .DE
  4963. ! The \fIpopd\fR server implements the Post Office Protocol (version 3),
  4964.   as described in RFC1081 and RFC1082.
  4965. ***************
  4966. *** 16,17 ****
  4967. --- 16,27 ----
  4968.   The `\-p' option overrides the default TCP port.
  4969. + .PP
  4970. + If the POP2 configuration option is defined,
  4971. + then the server also implements version 2 of the protocol.
  4972. + .PP
  4973. + If the APOP configuration option is defined,
  4974. + then the server supports a non-standard mechanism for identity-establishment
  4975. + in which authentication credentials are used to provide for origin
  4976. + authentication and reply protection,
  4977. + but which do not involve sending a password in the clear over the network.
  4978. + See \fIpopauth\fR(8) for more details.
  4979.   .Fi
  4980. *** /dev/null    Tue Dec 15 08:01:10 1992
  4981. --- conf/doc/popi.rf    Thu Feb  6 14:46:25 1992
  4982. ***************
  4983. *** 0 ****
  4984. --- 1,124 ----
  4985. + .\"    @(MHWARNING)
  4986. + .\" @(#)$Id: popi.rf,v 1.1 1992/02/06 22:46:24 jromine Exp $
  4987. + .SC POPI 1
  4988. + .NA
  4989. + popi \- POP initiator
  4990. + .SY
  4991. + popi
  4992. + \%[+folder]
  4993. + \%[\-host\ host] \%[\-user\ user]
  4994. + \%[\-apop] \%[\-noapop]
  4995. + \%[\-rpop] \%[\-norpop]
  4996. + @BEGIN: BPOP
  4997. + \%[\-auto] \%[\-noauto]
  4998. + \%[\-mshproc\ program]
  4999. + @END: BPOP
  5000. + \%[\-form\ formatfile]
  5001. + \%[\-format\ string]
  5002. + \%[\-width\ columns]
  5003. + \%[\-help]
  5004. + .DE
  5005. + \fIpopi\fR is an interactive program that implements the client side
  5006. + of the Post Office Protocol (version 3).
  5007. + 
  5008. + When invoked,
  5009. + \fIpopi\fR establishes a POP connection,
  5010. + and enters a command loop.
  5011. + The user may type most of the normal POP commands,
  5012. + with a couple of additions:
  5013. + The commands that \fIpop\fR currently supports are:
  5014. + .sp 1
  5015. + .in +.5i
  5016. + dele msg 
  5017. + .br
  5018. + last
  5019. + .br
  5020. + list [msg]
  5021. + .br
  5022. + noop
  5023. + .br
  5024. + quit
  5025. + .br
  5026. + retr msg
  5027. + .br
  5028. + rset
  5029. + .br
  5030. + scan
  5031. + .br
  5032. + stat
  5033. + .br
  5034. + top
  5035. + @BEGIN: BPOP
  5036. + .br
  5037. + msh
  5038. + @END: BPOP
  5039. + .in -.5i
  5040. + .sp
  5041. + The \fIretr\fR command retrieves a message into the folder specified
  5042. + on the command line.
  5043. + The \fIscan\fR command downloads an MH format-string to the server
  5044. + (as determined from the `\-form\ formatfile' and `\-format switches),
  5045. + so that future invocations of the \fIlist\fR command will include a
  5046. + scan listing.
  5047. + The \fIquit\fR command terminates \fIpopi\fR,
  5048. + as does typing CTRL\-D.
  5049. + 
  5050. + @BEGIN: BPOP
  5051. + The \fImsh\fR command invokes the \fImshproc\fR.
  5052. + To override the default \fImshproc\fR and the profile entry,
  5053. + use the `\-mshproc\ program' switch.
  5054. + The `\-auto' switch causes \fIpopi\fR to invoke the \fImshproc\fR directly,
  5055. + and thence terminate when the \fImshproc\fR terminates.
  5056. + @END: BPOP
  5057. + 
  5058. + The `\-host\ host' switch specifies the POP server to use.
  5059. + If the `\-user\ user' switch is not given,
  5060. + then the current username is used.
  5061. + Normally,
  5062. + \fIpopi\fR will prompt for a password to use.
  5063. + However,
  5064. + if the `\-apop' switch is given,
  5065. + \fIpopi\fR will generate authentication credentials to provide
  5066. + for origin authentication and replay protection,
  5067. + but which do not involve sending a password in the clear over the network.
  5068. + Otherwise,
  5069. + if the `\-rpop' switch is given,
  5070. + then \fIpopi\fR will try to use a \*(lqtrusted\*(rq connection
  5071. + (ala the BSD r-commands).
  5072. + .Fi
  5073. + ^$HOME/\&.mh\(ruprofile~^The user profile
  5074. + ^@(MHETCPATH)/mtstailor~^tailor file
  5075. + .Pr
  5076. + ^Path:~^To determine the user's MH directory
  5077. + .Ps
  5078. + ^Msg\-Protect:~^To set mode when creating a new `file'
  5079. + @BEGIN: BPOP
  5080. + .Ps
  5081. + ^mshproc:~^Program to read a given BBoard
  5082. + @END: BPOP
  5083. + .Sa
  5084. + msh(1)
  5085. + .De
  5086. + `+folder' defaults to \*(lqinbox\*(rq
  5087. + .Ds
  5088. + `\-noapop'
  5089. + .Ds
  5090. + `\-norpop'
  5091. + @BEGIN: BPOP
  5092. + .Ds
  5093. + `\-auto'
  5094. + @END: BPOP
  5095. + .Ds
  5096. + `\-format' defaulted as described above
  5097. + .Ds
  5098. + `\-width' defaulted to the width of the terminal
  5099. + .Co
  5100. + The folder into which messages are being incorporated will become the
  5101. + current folder.
  5102. + The current message is unchanged.
  5103. + .Bu
  5104. + The argument to the `\-format' switch must be interpreted as a single token
  5105. + by the shell that invokes \fIinc\fR.
  5106. + Therefore,
  5107. + one must usually place the argument to this switch inside double\-quotes.
  5108. + .En
  5109. *** ../mh-6.7.2/conf/doc/post.rf    Thu Apr  5 16:05:02 1990
  5110. --- conf/doc/post.rf    Thu Oct 29 14:24:52 1992
  5111. ***************
  5112. *** 1,3 ****
  5113.   .\"    @(MHWARNING)
  5114. ! .\" @(#)$Id: post.rf,v 1.5 90/04/05 15:14:35 sources Exp $
  5115.   .SC POST 8
  5116. --- 1,3 ----
  5117.   .\"    @(MHWARNING)
  5118. ! .\" @(#)$Id: post.rf,v 1.7 1992/10/29 22:24:50 jromine Exp $
  5119.   .SC POST 8
  5120. ***************
  5121. *** 13,14 ****
  5122. --- 13,17 ----
  5123.   \%[\-format] \%[\-noformat]
  5124. + @BEGIN: MIME
  5125. + \%[\-mime] \%[\-nomime]
  5126. + @END: MIME
  5127.   \%[\-msgid] \%[\-nomsgid]
  5128. ***************
  5129. *** 62,63 ****
  5130. --- 65,71 ----
  5131.   prior to being sent to the blind recipients.
  5132. + @BEGIN: MIME
  5133. + Otherwise,
  5134. + to use the MIME rules for encapsulation,
  5135. + specify the `\-mime' switch.
  5136. + @END: MIME
  5137.   
  5138. ***************
  5139. *** 100,102 ****
  5140. --- 108,114 ----
  5141.   `\-format'
  5142. + @BEGIN: MIME
  5143.   .Ds
  5144. + `\-nomime'
  5145. + @END: MIME
  5146. + .Ds
  5147.   `\-nomsgid'
  5148. ***************
  5149. *** 105,107 ****
  5150.   .Ds
  5151. ! '\-nowatch'
  5152.   .Ds
  5153. --- 117,119 ----
  5154.   .Ds
  5155. ! `\-nowatch'
  5156.   .Ds
  5157. *** ../mh-6.7.2/conf/doc/prompter.rf    Tue Dec 18 15:12:08 1990
  5158. --- conf/doc/prompter.rf    Tue May 12 15:23:56 1992
  5159. ***************
  5160. *** 1,3 ****
  5161.   .\"    @(MHWARNING)
  5162. ! .\" @(#)$Id: prompter.rf,v 1.7 90/12/18 15:12:01 mh Exp $
  5163.   .SC PROMPTER 1
  5164. --- 1,3 ----
  5165.   .\"    @(MHWARNING)
  5166. ! .\" @(#)$Id: prompter.rf,v 1.8 1992/05/12 22:23:34 jromine Exp $
  5167.   .SC PROMPTER 1
  5168. ***************
  5169. *** 4,6 ****
  5170.   .NA
  5171. ! prompter \- prompting editor front\-end
  5172.   .SY
  5173. --- 4,6 ----
  5174.   .NA
  5175. ! prompter \- prompting editor front-end for MH
  5176.   .SY
  5177. *** ../mh-6.7.2/conf/doc/rcvstore.rf    Thu Apr  5 16:05:04 1990
  5178. --- conf/doc/rcvstore.rf    Thu Nov 19 16:40:45 1992
  5179. ***************
  5180. *** 1,3 ****
  5181.   .\"    @(MHWARNING)
  5182. ! .\" @(#)$Id: rcvstore.rf,v 1.5 90/04/05 15:14:48 sources Exp $
  5183.   .SC RCVSTORE 1
  5184. --- 1,3 ----
  5185.   .\"    @(MHWARNING)
  5186. ! .\" @(#)$Id: rcvstore.rf,v 1.7 1992/11/20 00:40:37 jromine Exp $
  5187.   .SC RCVSTORE 1
  5188. ***************
  5189. *** 17,20 ****
  5190.   If `+folder' isn't specified,
  5191. ! the folder named \*(lqinbox\*(rq in the user's \fIMH\fR directory will be used
  5192. ! instead.
  5193.   The new message being incorporated is assigned the next highest
  5194. --- 17,21 ----
  5195.   If `+folder' isn't specified,
  5196. ! a folder in the user's \fIMH\fR directory will be used, either that
  5197. ! specified by the \*(lqInbox:\*(rq entry in the user's profile, or
  5198. ! the folder named \*(lqinbox\*(rq.
  5199.   The new message being incorporated is assigned the next highest
  5200. ***************
  5201. *** 60,61 ****
  5202. --- 61,64 ----
  5203.   .Ps
  5204. + ^Inbox:~^To find the default inbox
  5205. + .Ps
  5206.   ^Msg\-Protect:~^To set mode when creating a new message
  5207. ***************
  5208. *** 76,77 ****
  5209. --- 79,87 ----
  5210.   with the exception of sequence manipulation.
  5211. + .Bu
  5212. + If you use the \*(lqUnseen\-Sequence\*(rq profile entry,
  5213. + \fIrcvstore\fP could try to update the context while another
  5214. + \fIMH\fP process is also trying to do so.
  5215. + This can cause the context to become corrupted.
  5216. + To avoid this, do not use \fIrcvstore\fP
  5217. + if you use the \*(lqUnseen\-Sequence\*(rq profile entry.
  5218.   .En
  5219. *** ../mh-6.7.2/conf/doc/refile.rf    Wed Jan 29 15:51:18 1992
  5220. --- conf/doc/refile.rf    Mon Feb 10 12:27:40 1992
  5221. ***************
  5222. *** 1,3 ****
  5223.   .\"    @(MHWARNING)
  5224. ! .\" @(#)$Id: refile.rf,v 1.8 1991/01/14 16:43:06 mh Exp $
  5225.   .SC REFILE 1
  5226. --- 1,3 ----
  5227.   .\"    @(MHWARNING)
  5228. ! .\" @(#)$Id: refile.rf,v 1.11 1992/02/10 20:27:30 jromine Exp $
  5229.   .SC REFILE 1
  5230. ***************
  5231. *** 50,51 ****
  5232. --- 50,54 ----
  5233.   A negative response will abort the file operation.
  5234. + If the standard input for \fIrefile\fR is \fInot\fR a tty,
  5235. + then \fIrefile\fR will not ask any questions and will proceed as if
  5236. + the user's answer was \*(lqyes\*(rq for all questions.
  5237.   
  5238. ***************
  5239. *** 111,113 ****
  5240.   \fIrefile\fR will also define those sequences for the destination folders.
  5241. ! See \fImh\-profile\fR\0(1) for information concerning the previous sequence.
  5242.   .Bu
  5243. --- 114,116 ----
  5244.   \fIrefile\fR will also define those sequences for the destination folders.
  5245. ! See \fImh\-sequence\fR\0(5) for information concerning the previous sequence.
  5246.   .Bu
  5247. *** ../mh-6.7.2/conf/doc/repl.rf    Mon Dec 17 16:00:43 1990
  5248. --- conf/doc/repl.rf    Tue Nov 17 17:19:08 1992
  5249. ***************
  5250. *** 1,3 ****
  5251.   .\"    @(MHWARNING)
  5252. ! .\" @(#)$Id: repl.rf,v 1.10 90/12/17 16:00:35 mh Exp $
  5253.   .SC REPL 1
  5254. --- 1,3 ----
  5255.   .\"    @(MHWARNING)
  5256. ! .\" @(#)$Id: repl.rf,v 1.11 1992/11/18 01:18:54 jromine Exp $
  5257.   .SC REPL 1
  5258. ***************
  5259. *** 120,124 ****
  5260.   .in +.5i
  5261. ! message-id:nocomponent,formatfield=\\
  5262. ! "In message %{text}you write:"
  5263. ! body:component=">",overflowtext=">",overflowoffset=0
  5264.   .in -.5i
  5265. --- 120,127 ----
  5266.   .in +.5i
  5267. ! .ie n \{
  5268. ! message-id:nocomponent,\|nonewline,\\
  5269. ! formatfield=\*(lqIn message %{text},\ \*(rq \}
  5270. ! .el message-id:nocomponent,\|nonewline,\|formatfield=\*(lqIn message %{text},\ \*(rq
  5271. ! from:nocomponent,\|formatfield=\*(lq%(friendly{text}) writes:\*(rq
  5272. ! body:component=\*(lq>\*(rq,\|overflowtext=\*(lq>\*(rq,\|overflowoffset=0
  5273.   .in -.5i
  5274. ***************
  5275. *** 126,128 ****
  5276.   
  5277. ! Which cites the Message-ID of the message being replied\-to,
  5278.   and then outputs each line of the body prefaced
  5279. --- 129,132 ----
  5280.   
  5281. ! Which cites the Message-ID and author
  5282. ! of the message being replied\-to,
  5283.   and then outputs each line of the body prefaced
  5284. *** ../mh-6.7.2/conf/doc/rmf.rf    Thu Apr  5 16:05:06 1990
  5285. --- conf/doc/rmf.rf    Tue May 12 15:25:07 1992
  5286. ***************
  5287. *** 1,3 ****
  5288.   .\"    @(MHWARNING)
  5289. ! .\" @(#)$Id: rmf.rf,v 1.5 90/04/05 15:15:06 sources Exp $
  5290.   .SC RMF 1
  5291. --- 1,3 ----
  5292.   .\"    @(MHWARNING)
  5293. ! .\" @(#)$Id: rmf.rf,v 1.7 1992/05/12 22:24:59 jromine Exp $
  5294.   .SC RMF 1
  5295. ***************
  5296. *** 4,6 ****
  5297.   .NA
  5298. ! rmf \- remove folder
  5299.   .SY
  5300. --- 4,6 ----
  5301.   .NA
  5302. ! rmf \- remove an MH folder
  5303.   .SY
  5304. ***************
  5305. *** 20,22 ****
  5306.   If \fIrmf\fR can't find the current folder, for some reason,
  5307. ! the folder to be removed defaults to `+inbox' with confirmation.
  5308.   
  5309. --- 20,23 ----
  5310.   If \fIrmf\fR can't find the current folder, for some reason,
  5311. ! the folder to be removed defaults to `+inbox' (unless overridden by
  5312. ! user's profile entry \*(lqInbox\*(rq) with confirmation.
  5313.   
  5314. ***************
  5315. *** 42,43 ****
  5316. --- 43,46 ----
  5317.   ^Current\-Folder:~^To find the default current folder
  5318. + .Ps
  5319. + ^Inbox:~^To find the default inbox
  5320.   .Sa
  5321. *** ../mh-6.7.2/conf/doc/scan.rf    Wed Jan 29 14:56:25 1992
  5322. --- conf/doc/scan.rf    Thu Oct 29 14:02:01 1992
  5323. ***************
  5324. *** 1,3 ****
  5325.   .\"    @(MHWARNING)
  5326. ! .\" @(#)$Id: scan.rf,v 1.10 1992/01/29 22:56:18 jromine Exp $
  5327.   .SC SCAN 1
  5328. --- 1,3 ----
  5329.   .\"    @(MHWARNING)
  5330. ! .\" @(#)$Id: scan.rf,v 1.11 1992/10/29 22:01:56 jromine Exp $
  5331.   .SC SCAN 1
  5332. ***************
  5333. *** 90,92 ****
  5334.   .nf
  5335. ! .ta \w'Escape  'u +\w'Returns  'u
  5336.   \fIEscape\fR    \fIReturns\fR    \fIDescription\fR
  5337. --- 90,92 ----
  5338.   .nf
  5339. ! .ta \w'Dtimenow  'u +\w'Returns  'u
  5340.   \fIEscape\fR    \fIReturns\fR    \fIDescription\fR
  5341. ***************
  5342. *** 93,94 ****
  5343. --- 93,95 ----
  5344.   body    string    the (compressed) first part of the body
  5345. + dtimenow    date    the current date
  5346.   folder    string    the name of the current folder
  5347. ***************
  5348. *** 100,102 ****
  5349.   date of last modification of the message file itself.
  5350. - 
  5351.   
  5352. --- 101,102 ----
  5353. *** ../mh-6.7.2/conf/doc/send.rf    Thu Apr  5 16:04:35 1990
  5354. --- conf/doc/send.rf    Fri Dec  4 09:30:28 1992
  5355. ***************
  5356. *** 1,3 ****
  5357.   .\"    @(MHWARNING)
  5358. ! .\" @(#)$Id: send.rf,v 1.6 90/04/05 15:09:54 sources Exp $
  5359.   .SC SEND 1
  5360. --- 1,3 ----
  5361.   .\"    @(MHWARNING)
  5362. ! .\" @(#)$Id: send.rf,v 1.12 1992/12/04 17:30:23 jromine Exp $
  5363.   .SC SEND 1
  5364. ***************
  5365. *** 16,17 ****
  5366. --- 16,20 ----
  5367.   \%[\-forward] \%[\-noforward]
  5368. + @BEGIN: MIME
  5369. + \%[\-mime] \%[\-nomime]
  5370. + @END: MIME
  5371.   \%[\-msgid] \%[\-nomsgid]
  5372. ***************
  5373. *** 18,19 ****
  5374. --- 21,25 ----
  5375.   \%[\-push] \%[\-nopush]
  5376. + @BEGIN: MIME
  5377. + \%[\-split\ seconds]
  5378. + @END: MIME
  5379.   \%[\-verbose] \%[\-noverbose]
  5380. ***************
  5381. *** 53,55 ****
  5382. --- 59,75 ----
  5383.   information.
  5384. + @BEGIN: MIME
  5385.   
  5386. + If `\-split' is specified,
  5387. + \fIsend\fR will split the draft into one or more partial messages
  5388. + prior to sending.
  5389. + This makes use of the multi-media content feature in MH.
  5390. + Note however that if \fIsend\fR is invoked under \fIdist\fR\0(1),
  5391. + then this switch is ignored\0--\0it makes no sense to redistribute a
  5392. + message in this fashion.
  5393. + Sometimes you want \fIsend\fR to pause after posting a partial message.
  5394. + This is usually the case when you are running \fIsendmail\fR and
  5395. + expect to generate a lot of partial messages.
  5396. + The argument to `\-split' tells it how long to pause between postings.
  5397. + @END: MIME
  5398. + 
  5399.   \fISend\fR with no \fIfile\fR
  5400. ***************
  5401. *** 76,77 ****
  5402. --- 96,102 ----
  5403.   prior to being sent to the blind recipients.
  5404. + @BEGIN: MIME
  5405. + Otherwise,
  5406. + to use the MIME rules for encapsulation,
  5407. + specify the `-mime' switch.
  5408. + @END: MIME
  5409.   
  5410. ***************
  5411. *** 123,125 ****
  5412.   
  5413. ! The file specified by the profile entry \*(lqAliasfile:\*(rq and any
  5414.   additional alias files given by the `\-alias aliasfile' switch will be read
  5415. --- 148,150 ----
  5416.   
  5417. ! The files specified by the profile entry \*(lqAliasfile:\*(rq and any
  5418.   additional alias files given by the `\-alias aliasfile' switch will be read
  5419. ***************
  5420. *** 158,160 ****
  5421. --- 183,189 ----
  5422.   `\-forward'
  5423. + @BEGIN: MIME
  5424.   .Ds
  5425. + `\-nomime'
  5426. + @END: MIME
  5427. + .Ds
  5428.   `\-nomsgid'
  5429. ***************
  5430. *** 170,171 ****
  5431. --- 199,207 ----
  5432.   None
  5433. + .Bu
  5434. + Under some configurations, it is not possible to mointor the
  5435. + mail delivery transaction; `\-watch' is a no-op on those systems.
  5436. + .sp
  5437. + @BEGIN: MIME
  5438. + Using `\-split\00' doesn't work correctly.
  5439. + @END: MIME
  5440.   .En
  5441. *** ../mh-6.7.2/conf/doc/show.rf    Mon Dec 17 16:03:28 1990
  5442. --- conf/doc/show.rf    Tue May 19 14:57:41 1992
  5443. ***************
  5444. *** 1,3 ****
  5445.   .\"    @(MHWARNING)
  5446. ! .\" @(#)$Id: show.rf,v 1.5 90/04/05 15:15:20 sources Exp $
  5447.   .SC SHOW 1
  5448. --- 1,3 ----
  5449.   .\"    @(MHWARNING)
  5450. ! .\" @(#)$Id: show.rf,v 1.7 1992/05/19 21:57:39 jromine Exp $
  5451.   .SC SHOW 1
  5452. ***************
  5453. *** 33,35 ****
  5454. --- 33,49 ----
  5455.   `/bin/cat' is used instead of \fIshowproc\fR.
  5456. + @BEGIN: MIME
  5457.   
  5458. + If you have messages with multi-media content,
  5459. + you should define the profile entry \fImhnproc\fR,
  5460. + which is the name of a program to manipulate multi-media messages.
  5461. + The \fImhn\fR\0(1) program is suitable for this purpose.
  5462. + Note that if the \fImhnproc\fR profile entry is defined,
  5463. + the `\-noshowproc' option is NOT specified,
  5464. + and if one or more named messages has a multi-media content,
  5465. + then the program indicated by \fImhnproc\fR will be run instead of
  5466. + \fIshowproc\fR.
  5467. + The use of the \fImhnproc\fR can also be disabled if the
  5468. + environment variable \fB$NOMHNPROC\fR is set.
  5469. + @END: MIME
  5470. + 
  5471.   The `\-header' switch tells \fIshow\fR to display a one\-line
  5472. ***************
  5473. *** 71,72 ****
  5474. --- 85,90 ----
  5475.   ^showproc:~^Program to show messages
  5476. + @BEGIN: MIME
  5477. + .Ps
  5478. + ^mhnproc:~^Program to show messages with multi-media content
  5479. + @END: MIME
  5480.   .Sa
  5481. *** /dev/null    Tue Dec 15 08:01:10 1992
  5482. --- conf/doc/slocal.rf    Wed Oct 28 08:53:07 1992
  5483. ***************
  5484. *** 0 ****
  5485. --- 1,377 ----
  5486. + .\"    @(MHWARNING)
  5487. + .\" @(#)$Id: slocal.rf,v 1.15 1992/10/28 16:53:03 jromine Exp $
  5488. + .SC SLOCAL 1
  5489. + .NA
  5490. + slocal \- special local mail delivery
  5491. + .SY
  5492. + @(MHETCPATH)/slocal \%[address\ info\ sender]
  5493. + .na
  5494. + .br
  5495. + \%[\-addr\ address]
  5496. + \%[\-info\ data]
  5497. + \%[\-sender\ sender]
  5498. + .br
  5499. + \%[\-user\ username]
  5500. + \%[\-mailbox\ mbox]
  5501. + \%[\-file\ file]
  5502. + .\" \%[\-home\ homedir]
  5503. + .br
  5504. + \%[\-maildelivery\ deliveryfile]
  5505. + \%[\-verbose] \%[\-noverbose]
  5506. + \%[\-debug]
  5507. + \%[\-help]
  5508. + .ad
  5509. + .DE
  5510. + \fISlocal\fP is a program designed to allow you to have
  5511. + your inbound mail processed according to a complex
  5512. + set of selection criteria.
  5513. + You do not normally invoke \fIslocal\fP yourself,
  5514. + rather \fIslocal\fP is invoked on your behalf by your system's 
  5515. + Message Transfer Agent.
  5516. + 
  5517. + The message selection
  5518. + criteria used by \fIslocal\fP
  5519. + is specified in the file \fI\&.maildelivery\fP
  5520. + in the user's home directory.  The format of this file
  5521. + is given below.
  5522. + 
  5523. + The message delivery address and message sender are
  5524. + determined from the Message Transfer Agent
  5525. + envelope information, if possible.  Under \fISendMail\fP,
  5526. + the sender will obtained from the UUCP \*(lqFrom\ \*(rq
  5527. + line, if present.  The user may override these values
  5528. + with command line arguments, or arguments to 
  5529. + the `\-addr' and `\-sender' switches.
  5530. + 
  5531. + The message is normally read from the standard input.
  5532. + The `\-file' switch sets the name of the file from which
  5533. + the message should be read, instead of reading stdin.
  5534. + The `\-user' switch tells \fIslocal\fP
  5535. + the name of the user for whom it is delivering mail.
  5536. + The `\-mailbox' switch tells \fIslocal\fP the name
  5537. + of the user's maildrop file.
  5538. + 
  5539. + The `\-info' switch may be used to pass an arbitrary
  5540. + argument to sub-processes which \fIslocal\fP may
  5541. + invoke on your behalf.
  5542. + The `\-verbose' switch causes \fIslocal\fP
  5543. + to give information on stdout about its progress.
  5544. + The `\-debug' switch produces more verbose debugging output on stderr.
  5545. + 
  5546. + .Uh "Message Transfer Agents"
  5547. + If your MTA is \fISendMail\fP,
  5548. + you should include the line
  5549. + .sp
  5550. + .nf
  5551. + .in +.5i
  5552. +     \*(lq|\ @(MHETCPATH)/slocal\ \-user\ username\*(rq
  5553. + .in -.5i
  5554. + .fi
  5555. + .sp
  5556. + in your \&.forward file in your home directory.
  5557. + This will cause \fISendMail\fP to invoke \fIslocal\fP on your behalf.
  5558. + 
  5559. + If your MTA is \fIMMDF-I\fP,
  5560. + you should (symbolically) link @(MHETCPATH)/slocal to the file
  5561. + bin/rcvmail in your home directory.
  5562. + This will cause \fIMMDF-I\fP to invoke \fIslocal\fP on your behalf
  5563. + with the correct \*(lq\fIaddress\ info\ sender\fP\*(rq arguments.
  5564. + 
  5565. + If your MTA is \fIMMDF-II\fP,
  5566. + then you should not use \fIslocal\fP.
  5567. + An equivalent functionality is already provided by \fIMMDF-II\fP;
  5568. + see maildelivery(5) for details.
  5569. + 
  5570. + .Uh "The Maildelivery File"
  5571. + 
  5572. + The \fI\&.maildelivery\fR file
  5573. + controls how local delivery is performed.
  5574. + Each line of this file
  5575. + consists of five fields, separated by white-space or comma.
  5576. + Since double-quotes are honored,
  5577. + these characters may be included in a single argument by enclosing the
  5578. + entire argument in double-quotes.
  5579. + A double-quote can be included by preceding it with a backslash.
  5580. + Lines beginning with `#' are ignored.
  5581. + The format of each line in the \fI\&.maildelivery\fR file is:
  5582. + 
  5583. + 
  5584. +     \fBheader    pattern    action    result    string\fR
  5585. + .sp
  5586. + .in +.5i
  5587. + .ti -.5i
  5588. + \fBheader\fP:
  5589. + .br
  5590. + The name of a header field that is to be searched for a pattern.
  5591. + This is any field in the headers of the message that might be present.
  5592. + The following special fields are also defined:
  5593. + .sp
  5594. + .in +1i
  5595. + .ta +1i
  5596. + .ti -1i
  5597. + \fIsource\fR    the out-of-band sender information
  5598. + .ti -1i
  5599. + \fIaddr\fR    the address that was used to cause delivery to the recipient
  5600. + .ti -1i
  5601. + \fIdefault\fR    this matches \fIonly\fR if the message hasn't been delivered yet
  5602. + .ti -1i
  5603. + \fI*\fR    this always matches
  5604. + .in -1i
  5605. + 
  5606. + .ti -.5i
  5607. + \fBpattern\fR:
  5608. + .br
  5609. + The sequence
  5610. + of characters to match in the specified header field.
  5611. + Matching is case-insensitive, but does not use regular expressions.
  5612. + 
  5613. + .ti -.5i
  5614. + \fBaction\fR:
  5615. + .br
  5616. + The action to take to deliver the message:
  5617. + .sp
  5618. + .in +1i
  5619. + .ta +1i
  5620. + .ti -1i
  5621. + \fIdestroy\fR    This action always succeeds.
  5622. + 
  5623. + .ti -1i
  5624. + \fIfile\fR or >    Append
  5625. + the message to the file named by \fBstring\fR.
  5626. + The message is appended to the file in the maildrop 
  5627. + format which is used by your message transport system.
  5628. + If the message can be appended to the file,
  5629. + then this action succeeds.
  5630. + When writing to the file,
  5631. + a \*(lqDelivery\-Date:\ date\*(rq header is added
  5632. + which indicates the date and time that message was appended to the file.
  5633. + 
  5634. + .ti -1i
  5635. + \fImbox\fR    Identical
  5636. + to \fIfile\fR,
  5637. + but always appends the message using the format used by \fIpackf\fR
  5638. + (the MMDF mailbox format).
  5639. + 
  5640. + .ti -1i
  5641. + \fIpipe\fR or |    Pipe
  5642. + the message as the standard input to the command named by \fBstring\fR,
  5643. + using the Bourne shell \fIsh\fR(1) to interpret the string.
  5644. + Prior to giving the string to the shell,
  5645. + it is expanded with the following built-in variables:
  5646. + .sp
  5647. + .in +1i
  5648. + .ta +1i
  5649. + .ti -1i
  5650. + $(sender)     the out-of-band sender information
  5651. + .ti -1i
  5652. + $(address)     the address that was used to cause delivery to the recipient
  5653. + .ti -1i
  5654. + $(size)    the size of the message in bytes
  5655. + .ti -1i
  5656. + $(reply\-to)     either the \*(lqReply\-To:\*(rq or \*(lqFrom:\*(rq field
  5657. + of the message
  5658. + .ti -1i
  5659. + $(info)    the out-of-band information specified
  5660. + .in -1i
  5661. + .ti -1i
  5662. + \fIqpipe\fR or
  5663. + .ti -1i
  5664. + \fI<caret>\fR    Similar to \fIpipe\fR,
  5665. + but executes the command directly,
  5666. + after built-in variable expansion,
  5667. + without assistance from the shell.
  5668. + This action can be used to avoid quoting special characters
  5669. + which your shell might interpret.
  5670. + .in -1i
  5671. + 
  5672. + .ti -.5i
  5673. + \fBresult\fR:
  5674. + .br
  5675. + Indicates how the action should be performed:
  5676. + 
  5677. + .in +1i
  5678. + .ta +1i
  5679. + .ti -1i
  5680. + \fIA\fR    Perform the action.
  5681. + If the action succeeds, then the message is considered delivered.
  5682. + 
  5683. + .ti -1i
  5684. + \fIR\fR    Perform the action.
  5685. + Regardless of the outcome of the action,
  5686. + the message is not considered delivered.
  5687. + 
  5688. + .ti -1i
  5689. + \fI?\fR    Perform
  5690. + the action only if the message has not been delivered.
  5691. + If the action succeeds, then the message is considered delivered.
  5692. + 
  5693. + .ti -1i
  5694. + \fIN\fR    Perform
  5695. + the action only if the message has not been delivered
  5696. + and the previous action succeeded.
  5697. + If this action succeeds, then the message is considered delivered.
  5698. + .sp
  5699. + .in -1i
  5700. + .in -.5i
  5701. + To summarize, here's an example:
  5702. + .sp
  5703. + .if t .in +.5i
  5704. + .nf
  5705. + .ta \w'default  'u +\w'mh-workersxx 'uC +\w'destroy 'uC +\w'result 'u
  5706. + #\fIfield\fR    \fIpattern\fR    \fIaction\fR    \fIresult\fR    \fIstring\fR
  5707. + # lines starting with a '#' are ignored, as are blank lines
  5708. + #
  5709. + # file mail with mmdf2 in the \*(lqTo:\*(rq line into file mmdf2.log
  5710. + \fITo    mmdf2    file    A    mmdf2.log\fP
  5711. + # Messages from mmdf pipe to the program err-message-archive
  5712. + \fIFrom    mmdf    pipe    A    /bin/err-message-archive\fP
  5713. + # Anything with the \*(lqSender:\*(rq address \*(lqmh-workers\*(rq
  5714. + # file in mh.log if not filed already
  5715. + \fISender    mh-workers    file    ?    mh.log\fP
  5716. + # \*(lqTo:\*(rq unix \- put in file unix-news
  5717. + \fITo    Unix    >    A    unix-news\fP
  5718. + .\" # if the address is jpo=mmdf \- pipe into mmdf-redist
  5719. + .\" \fIaddr    jpo=mmdf    |    A    mmdf-redist\fP
  5720. + # if the address is jpo=ack \- send an acknowledgement copy back
  5721. + \fIaddr    jpo=ack    \fP|\fI    R    \*(lq/bin/resend\0\-r\0$(reply-to)\*(rq\fP
  5722. + # anything from steve \- destroy!
  5723. + \fIFrom    steve    destroy    A    \-\fP
  5724. + # anything not matched yet \- put into mailbox
  5725. + \fIdefault    \-    >    ?    mailbox\fP
  5726. + # always run rcvtty
  5727. + \fI*    \-    \fP|\fI    R    /mh/lib/rcvtty\fP
  5728. + .re
  5729. + .fi
  5730. + .if t .in -.5i
  5731. + 
  5732. + The file is always read completely,
  5733. + so that several matches can be made and several actions can be taken.
  5734. + The \fI\&.maildelivery\fR file must be owned either by the user or by root,
  5735. + and must be writable only by the owner.
  5736. + If the \fI\&.maildelivery\fR file cannot be found,
  5737. + or does not perform an action which delivers the message,
  5738. + then the file @(MHETCPATH)/maildelivery is read according to the same rules.
  5739. + This file must be owned by the root and must be writable only by the root.
  5740. + If this file cannot be found
  5741. + or does not perform an action which delivers the message,
  5742. + then standard delivery to the user's maildrop is performed.
  5743. + 
  5744. + .Uh "Sub-process environment"
  5745. + When a process is invoked, its environment is:
  5746. + the user/group-ids are set to recipient's ids;
  5747. + the working directory is the recipient's home directory;
  5748. + the umask is 0077;
  5749. + the process has no /dev/tty;
  5750. + the standard input is set to the message;
  5751. + the standard output and diagnostic output are set to /dev/null;
  5752. + all other file-descriptors are closed;
  5753. + the envariables \fB$USER\fR, \fB$HOME\fR, \fB$SHELL\fR are set
  5754. + appropriately,
  5755. + and no other envariables exist.
  5756. + 
  5757. + The process is given a certain amount of time to execute.
  5758. + If the process does not exit within this limit,
  5759. + the process will be terminated with extreme prejudice.
  5760. + The amount of time is calculated as ((size x 60) + 300) seconds,
  5761. + where size is the number of bytes in the message.
  5762. + 
  5763. + The exit status of the process is consulted in determining the success of the
  5764. + action.
  5765. + An exit status of zero means that the action succeeded.
  5766. + Any other exit status (or abnormal termination) means that the action failed.
  5767. + 
  5768. + In order to avoid any time limitations,
  5769. + you might implement a process that began by \fIforking\fR.
  5770. + The parent would return the appropriate value immediately,
  5771. + and the child could continue on,
  5772. + doing whatever it wanted for as long as it wanted.
  5773. + This approach is somewhat risky if the parent is going to return an
  5774. + exit status of zero.
  5775. + If the parent is going to return a non-zero exit status,
  5776. + then this approach can lead to quicker delivery into your maildrop.
  5777. + @BEGIN: MSGID
  5778. + 
  5779. + .Uh "Duplicate Message Suppression"
  5780. + \fIslocal\fR is able to detect and supress duplicate messages.
  5781. + To enable this,
  5782. + create two empty files in your $HOME directory:
  5783. + \&.maildelivery.pag and \&.maildelivery.dir.
  5784. + These are ndbm files which are used to store the Message-IDs of
  5785. + incoming messages.
  5786. + @END: MSGID
  5787. + .Fi
  5788. + ^@(MHETCPATH)/mtstailor~^MH tailor file
  5789. + ^$HOME/\&.maildelivery~^The file controlling local delivery
  5790. + ^@(MHETCPATH)/maildelivery~^Rather than the standard file
  5791. + ^@(MHDROPLOC)~^The default maildrop
  5792. + .Sa
  5793. + rcvstore(1), mhook(1), mh\-format(5)
  5794. + @BEGIN: MMDFIIMTS
  5795. + , maildelivery(5)
  5796. + @END: MMDFIIMTS
  5797. + .De
  5798. + `\-noverbose'
  5799. + .Ds
  5800. + `\-maildelivery \&.maildelivery'
  5801. + .Ds
  5802. + `\-mailbox @(MHDROPLOC)'
  5803. + .Ds
  5804. + `\-file' defaults to stdin
  5805. + .Ds
  5806. + `\-user' defaults to the current user
  5807. + .Co
  5808. + None
  5809. + .Hi
  5810. + @BEGIN: MHMTS
  5811. + For compatibility with older versions of \fIMH\fR,
  5812. + if \fIslocal\fR can't find the user's \fI\&.maildelivery\fR file,
  5813. + it will attempt to execute an old-style rcvmail hook in the user's $HOME
  5814. + directory.
  5815. + In particular,
  5816. + it will first attempt to execute
  5817. + 
  5818. + .ti +.5i
  5819. + \&.mh\(rureceive file maildrop directory user
  5820. + 
  5821. + failing that it will attempt to execute
  5822. + 
  5823. + .ti +.5i
  5824. + $HOME/bin/rcvmail user file sender
  5825. + 
  5826. + before giving up and writing to the user's maildrop.
  5827. + 
  5828. + In addition,
  5829. + whenever a hook or process is invoked,
  5830. + file-descriptor three (3) is set to the message in addition to the standard
  5831. + input.
  5832. + 
  5833. + @END: MHMTS
  5834. + \fISlocal\fP is designed to be backward-compatible with the
  5835. + \fImaildelivery\fP facility provided by \fIMMDF-II\fP.
  5836. + Thus, the \fI\&.maildelivery\fP file syntax is limited,
  5837. + as is the functionality of \fIslocal\fP.
  5838. + 
  5839. + In addition to an exit status of zero,
  5840. + the \fIMMDF\fR values \fIRP_MOK\fR (32) and \fIRP_OK\fR (9)
  5841. + mean that the message has been fully delivered.
  5842. + Any other non-zero exit status,
  5843. + including abnormal termination,
  5844. + is interpreted as the \fIMMDF\fR value \fIRP_MECH\fR (200),
  5845. + which means \*(lquse an alternate route\*(rq
  5846. + (deliver the message to the maildrop).
  5847. + .Bu
  5848. + Only two return codes are meaningful, others should be.
  5849. + 
  5850. + \fISlocal\fP is designed to be
  5851. + backwards-compatible with the \fImaildelivery\fP functionality provided
  5852. + by \fBMMDF-II\fP.
  5853. + 
  5854. + Versions of \fIMMDF\fR with the \fImaildelivery\fR mechanism aren't
  5855. + entirely backwards-compatible with earlier versions of \fIMMDF\fP.
  5856. + If you have an \fIMMDF-I\fP old-style hook,
  5857. + the best you can do is to have a one-line
  5858. + \fI\&.maildelivery\fR file:
  5859. + 
  5860. + .ti +.5i
  5861. + default \- pipe A \*(lqbin/rcvmail $(address) $(info) $(sender)\*(rq
  5862. + .En
  5863. *** ../mh-6.7.2/conf/doc/tmac.h    Mon Jan  7 16:12:51 1991
  5864. --- conf/doc/tmac.h    Fri Oct 30 11:45:38 1992
  5865. ***************
  5866. *** 1,5 ****
  5867.   .\"    @(MHWARNING)
  5868. ! .\" @(#)$Id: tmac.h,v 1.6 91/01/07 16:12:37 mh Exp $
  5869.   .\"    Try to keep only one copy of the documentation around
  5870.   .\"    by re-defining macros and so forth.
  5871.   .\"
  5872. --- 1,5 ----
  5873.   .\"    @(MHWARNING)
  5874. ! .\" @(#)$Id: tmac.h,v 1.7 1992/10/30 19:45:32 jromine Exp $
  5875.   .\"    Try to keep only one copy of the documentation around
  5876.   .\"    by re-defining macros and so forth.
  5877.   .\"
  5878. ***************
  5879. *** 70,73 ****
  5880. --- 70,77 ----
  5881.   .de Uh
  5882.   .ne 4
  5883.   .SS "\\$1"
  5884. + ..
  5885. + .\" a useful -me macro
  5886. + .de re
  5887. + .ta 0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i
  5888.   ..
  5889. *** ../mh-6.7.2/conf/doc/vmh.rf    Thu Apr  5 16:05:08 1990
  5890. --- conf/doc/vmh.rf    Tue May 12 15:23:57 1992
  5891. ***************
  5892. *** 1,3 ****
  5893.   .\"    @(MHWARNING)
  5894. ! .\" @(#)$Id: vmh.rf,v 1.5 90/04/05 15:15:32 sources Exp $
  5895.   .SC VMH 1
  5896. --- 1,3 ----
  5897.   .\"    @(MHWARNING)
  5898. ! .\" @(#)$Id: vmh.rf,v 1.6 1992/05/12 22:23:34 jromine Exp $
  5899.   .SC VMH 1
  5900. ***************
  5901. *** 4,6 ****
  5902.   .NA
  5903. ! vmh \- visual front\-end to MH
  5904.   .SY
  5905. --- 4,6 ----
  5906.   .NA
  5907. ! vmh \- visual front-end to MH
  5908.   .SY
  5909. *** ../mh-6.7.2/conf/doc/whatnow.rf    Tue Dec 18 15:44:41 1990
  5910. --- conf/doc/whatnow.rf    Fri Oct 16 14:36:33 1992
  5911. ***************
  5912. *** 1,3 ****
  5913.   .\"    @(MHWARNING)
  5914. ! .\" @(#)$Id: whatnow.rf,v 1.7 90/12/18 15:44:22 mh Exp $
  5915.   .SC WHATNOW 1
  5916. --- 1,3 ----
  5917.   .\"    @(MHWARNING)
  5918. ! .\" @(#)$Id: whatnow.rf,v 1.9 1992/10/16 21:36:30 jromine Exp $
  5919.   .SC WHATNOW 1
  5920. ***************
  5921. *** 4,6 ****
  5922.   .NA
  5923. ! whatnow \- prompting front\-end for send
  5924.   .SY
  5925. --- 4,6 ----
  5926.   .NA
  5927. ! whatnow \- prompting front-end for send
  5928.   .SY
  5929. ***************
  5930. *** 91,92 ****
  5931. --- 91,97 ----
  5932.   .Ps
  5933. + @BEGIN: MIME
  5934. + ^automhnproc:~^Program to automatically run prior to sending
  5935. + ^~^if the draft is an \fImhn\fR composition file
  5936. + .Ps
  5937. + @END: MIME
  5938.   ^fileproc:~^Program to refile the message
  5939. *** ../mh-6.7.2/conf/doc/whom.rf    Thu Apr  5 16:04:36 1990
  5940. --- conf/doc/whom.rf    Mon Feb 10 16:48:09 1992
  5941. ***************
  5942. *** 1,3 ****
  5943.   .\"    @(MHWARNING)
  5944. ! .\" @(#)$Id: whom.rf,v 1.6 90/04/05 15:10:01 sources Exp $
  5945.   .SC WHOM 1
  5946. --- 1,3 ----
  5947.   .\"    @(MHWARNING)
  5948. ! .\" @(#)$Id: whom.rf,v 1.7 1992/02/11 00:47:53 jromine Exp $
  5949.   .SC WHOM 1
  5950. ***************
  5951. *** 24,26 ****
  5952.   
  5953. ! The file specified by the profile entry \*(lqAliasfile:\*(rq and any
  5954.   additional alias files given by the `\-alias aliasfile' switch will be read
  5955. --- 24,26 ----
  5956.   
  5957. ! The files specified by the profile entry \*(lqAliasfile:\*(rq and any
  5958.   additional alias files given by the `\-alias aliasfile' switch will be read
  5959. *** /dev/null    Tue Dec 15 08:01:10 1992
  5960. --- conf/examples/README    Mon Dec 14 10:12:32 1992
  5961. ***************
  5962. *** 0 ****
  5963. --- 1,44 ----
  5964. + $Id: README,v 1.8 1992/12/14 18:12:18 jromine Exp $
  5965. + These files are contributed MH config files from various sites.
  5966. + Newer files give the version of MH and OS release number which
  5967. + they are configured for.
  5968. + 
  5969. + # aix.sap-ag.de    - MH 6.8 options for AIX (AIX 3.2 on RS/6000 350).
  5970. + # aix31.rpi.edu    - MH 6.8, RS6000 AIX 3.1 with AFS Kerberos
  5971. + # aos.cornell.edu - MH 6.8 Configuration for IBM/PC-RT running IBM/4.3
  5972. + # aux.rand.org - MH 6.8 under AUX in SYS5 mode
  5973. + # bsd43.uiuc.edu - MH 6.8 VAX running 4.3 BSD-reno
  5974. + # convex.uiuc.edu - MH 6.8 Convex C240 running ConvexOS v9.1
  5975. + # dbc        - DBC's MH 6.8 config file
  5976. + # dynix.uiuc.edu - MH 6.8 Sequent Symmetry running Dynix 3.1.2
  5977. + # encore
  5978. + # fujitsu.clcs.com.au - MH 6.8 for Fujitsu/ICL DRS6000 running System V R4
  5979. + # gould
  5980. + # hplpm.hpl.hp.com - Hewlett-Packard 9000 machines
  5981. + # hpux.sap-ag.de - MH 6.8 options for HPUX (HPUX 8.05 on HP9000/720).
  5982. + # hpux.uiuc.edu    - MH 6.8 HP-9000/700 with HP-UX 8.0 and sendmail
  5983. + # kosciusko.esd.3com.com - SunOS 4.0.3 
  5984. + # krusty.smsc.sony.COM - System V Release 4 running mailsurr
  5985. + # mhmts        - stand-alone mhmts template
  5986. + # mmdf         - template using mts: mmdf
  5987. + # ridge        - ROS
  5988. + # rs6000    - RISC 6000/320, with AIX 3.1 (3.03)
  5989. + # sendmail     - template using mts: sendmail
  5990. + # shrike.irvine.com - MH 6.7.2 - HP 9000/700 HP/UX 8.x sendmail version
  5991. + # solaris2.sun.com - MH 6.8 - Solaris 2.x
  5992. + # sun3.5    - MH 6.8 configuration file for SunOS 3.5
  5993. + # sun4.0    - For Sun OS 4.* with SendMail, Yellow Pages and /etc/named.
  5994. + # sun4.1.1    - MH 6.8 configuration file for SunOS 4.1.1
  5995. + # sun411.rpi.edu - MH 6.8, Sparcstation SunOS 4.1.1 with AFS Kerberos
  5996. + # sys5r3.2    - SVr3.2 configuration file for MH 6.7.1:
  5997. + # sys5r4    - a SYS5 R4 system
  5998. + # sys5r4-ncr    - an NCR system: Unix System V Release 4.0.2.0 (WINS)
  5999. + # system5     - template
  6000. + # uci.gcc    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  6001. + # uci.hp-pa    - MH 6.8 options for HPUX (HPUX 8.05 on HP9000/720).
  6002. + # uci.sequent    - MH 6.8 - Sequent running Dynix 3.1
  6003. + # uci.sun    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  6004. + # uci.sun.debug    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  6005. + # udel        - UDel template
  6006. + # ultrix.sap-ag.de - MH 6.8 options for ULTRIX (ULTRIX 4.2 on RISC).
  6007. + 
  6008. *** /dev/null    Tue Dec 15 08:01:10 1992
  6009. --- conf/examples/aix.sap-ag.de    Thu Dec  3 09:30:37 1992
  6010. ***************
  6011. *** 0 ****
  6012. --- 1,18 ----
  6013. + # aix.sap-ag.de    - MH 6.8 options for AIX (AIX 3.2 on RS/6000 350).
  6014. + # Bill Wohler <wohler@sap-ag.de>
  6015. + # Sat, 31 Oct 92 18:45:00 +0100
  6016. + #
  6017. + # General
  6018. + #
  6019. + bin        /usr/local/bin/mh
  6020. + ldoptions    -s
  6021. + mandir        /usr/local/man
  6022. + manuals        standard
  6023. + mts        sendmail/smtp
  6024. + options        BIND DBMPWD ISI MHE MHRC OVERHEAD RPATHS WHATNOW UK
  6025. + #
  6026. + # Machine specific options
  6027. + #
  6028. + options        TYPESIG=void SYS5 SYS5DIR SOCKETS
  6029. + curses        -lcurses
  6030. + sprintf        int
  6031. *** /dev/null    Tue Dec 15 08:01:10 1992
  6032. --- conf/examples/aix31.rpi.edu    Fri Dec  4 09:14:24 1992
  6033. ***************
  6034. *** 0 ****
  6035. --- 1,37 ----
  6036. + # aix31.rpi.edu    - MH 6.8, RS6000 AIX 3.1 with AFS Kerberos
  6037. + # Thu, 03 Dec 1992 13:45:09
  6038. + # James Ault <aultj@rpi.EDU>
  6039. + #
  6040. + bin    /campus/other/mh/6.7.1k/@sys/bin
  6041. + debug    off
  6042. + etc    /campus/other/mh/6.7.1k/@sys/lib
  6043. + mail    /usr/spool/mail
  6044. + mailgroup    off
  6045. + mandir    /campus/other/mh/6.7.1k/@sys/man
  6046. + manuals    standard
  6047. + chown    /bin/chown
  6048. + editor    prompter
  6049. + remove    mv -f
  6050. + mts    sendmail
  6051. + bboards    off
  6052. + bbdelivery    off
  6053. + mf    off
  6054. + pop    on 
  6055. + kpop    on
  6056. + hesiod    off
  6057. + options    ATHENA ATZ BIND DBM DUMB FOLDPROT='"0711"' FLOCK 
  6058. + options    MHE MHRC MORE='"/usr/bin/more"' MSGPROT='"0600"' 
  6059. + options    NOMHSEQ OVERHEAD POP2 POPSERVICE='"kpop"' RPATHS 
  6060. + options    RPOP SBACKUP='"\\043"' SOCKETS SYS5 SYS5DIR 
  6061. + options    TYPESIG='void' TZNAME VSPRINTF YP_LOOKUP
  6062. + options    AIX AIX3_1 ISI WP NETWORK KPOP TRANSARC_KAS
  6063. + ccoptions    -O -D_NO_PROTO -D_NONSTD_TYPES -D_MBI=void -U__STR__ 
  6064. + ccoptions    -I/campus/athena/kerberos/V4/@sys/include 
  6065. + curses    -lcurses
  6066. + ldoptlibs    -ldbm 
  6067. + ldoptlibs    -L/campus/athena/kerberos/V4/@sys/lib -ldes -lkrb
  6068. + ldoptlibs    -lbsd 
  6069. + ranlib    on
  6070. + sprintf    int
  6071. + sharedlib    off
  6072. + 
  6073. *** /dev/null    Tue Dec 15 08:01:10 1992
  6074. --- conf/examples/aos.cornell.edu    Thu Dec  3 09:30:45 1992
  6075. ***************
  6076. *** 0 ****
  6077. --- 1,36 ----
  6078. + # aos.cornell.edu - MH 6.8 Configuration for IBM/PC-RT running IBM/4.3
  6079. + # Jeffrey C Honig <jch@nr-tech.cit.cornell.EDU>
  6080. + # Wed, 02 Dec 92 14:55:44 -0500
  6081. + #
  6082. + #    Configuration for IBM/PC-RT running IBM/4.3
  6083. + #
  6084. + #
  6085. + # System stuff
  6086. + #
  6087. + bin        /usr/local/bin
  6088. + ccoptions    -U__STDC__
  6089. + chown        /etc/chown
  6090. + editor        prompter
  6091. + etc        /usr/local/lib/mh
  6092. + mail        /usr/spool/mail
  6093. + mandir        /usr/local/man
  6094. + manuals        standard
  6095. + mts        sendmail/smtp
  6096. + mf        off
  6097. + options        BSD42 BSD43 BIND NTOHLSWAP DBMPWD LOCKF ZONEINFO
  6098. + options     UCI
  6099. + options        RENAME
  6100. + signal        int
  6101. + #
  6102. + # Options
  6103. + #
  6104. + bboards        off
  6105. + options        MHE MHRC MIME MSGID
  6106. + options     SBACKUP='"\\043"'
  6107. + remove        mv -f
  6108. + #
  6109. + # POP
  6110. + #
  6111. + pop        on
  6112. + popdir        /usr/local/sbin
  6113. + options        RPOP POPSERVICE='"pop3"' DPOP APOP
  6114. *** /dev/null    Tue Dec 15 08:01:10 1992
  6115. --- conf/examples/aux.rand.org    Thu Dec  3 09:35:43 1992
  6116. ***************
  6117. *** 0 ****
  6118. --- 1,34 ----
  6119. + # aux.rand.org - MH 6.8 under AUX in SYS5 mode
  6120. + # Jim Guyton <guyton@condor.rand.ORG>
  6121. + # Thu, 05 Nov 1992 13:59:48 PST
  6122. + #
  6123. + # Note that I don't know what the default locking is on this system.
  6124. + # Iswitched my sendmail to use 'miscellany/sendmail/spooler.c' so that
  6125. + # I could be sure that inc and the delivery program both use the same
  6126. + # lock.  Also note that I'm just starting to use MH on this system and
  6127. + # so this may not be optimal.
  6128. + #
  6129. + bin             /usr/local/bin
  6130. + etc             /usr/local/lib/mh
  6131. + mail            /usr/spool/mail
  6132. + mandir          /usr/local/man
  6133. + manuals         standard
  6134. + chown           /bin/chown
  6135. + remove          mv -f
  6136. + cc              cc
  6137. + ccoptions       -ZS -A 2
  6138. + curses          -lcurses -ltermcap
  6139. + ldoptions       -s
  6140. + ranlib          off
  6141. + sprintf         int
  6142. + mts             sendmail/smtp
  6143. + signal          int
  6144. + 
  6145. + # options        BIND
  6146. + options         AUX
  6147. + options         DUMB FLOCK MHRC
  6148. + options         MIME NFS
  6149. + options         MORE='"/bin/more"' MSGID
  6150. + options         OVERHEAD RENAME RPATHS
  6151. + options         SOCKETS SYS5 SYS5DIR
  6152. + options         VSPRINTF
  6153. *** /dev/null    Tue Dec 15 08:01:10 1992
  6154. --- conf/examples/bsd43.uiuc.edu    Mon Dec 14 10:07:37 1992
  6155. ***************
  6156. *** 0 ****
  6157. --- 1,39 ----
  6158. + # bsd43.uiuc.edu - MH 6.8 VAX running 4.3 BSD-reno
  6159. + # Paul Pomes - UofIllinois CSO <Paul-Pomes@uiuc.EDU>
  6160. + # Fri, 11 Dec 1992 22:28:58 -0600
  6161. + #
  6162. + bboards    off
  6163. + bin    /usr/local/bin
  6164. + cc    gcc -fpcc-struct-return
  6165. + etc    /usr/local/libdata/mh
  6166. + ldoptlibs    -lcompat
  6167. + lex    /usr/old/lex -nt
  6168. + mail    /var/spool/mail
  6169. + mandir    /usr/local/src/man
  6170. + manuals    standard
  6171. + mts    sendmail/smtp
  6172. + pop    off
  6173. + ranlib    on
  6174. + remove    rm -f
  6175. + signal    void
  6176. + sprintf    int
  6177. + options    BIND
  6178. + options    BSD42
  6179. + options    BSD43
  6180. + options    DBMPWD
  6181. + options    DUMB
  6182. + options    FLOCK
  6183. + options    FOLDPROT='"700"'
  6184. + options    MHE
  6185. + options    MHRC
  6186. + options    MIME
  6187. + options    MSGID
  6188. + options    MSGPROT='"600"'
  6189. + options    NTOHLSWAP
  6190. + options    OVERHEAD
  6191. + options    RENAME
  6192. + options    RPATHS
  6193. + options    SBACKUP='"\\043"'
  6194. + options    UNISTD
  6195. + options    VSPRINTF
  6196. + options    ZONEINFO
  6197. *** /dev/null    Tue Dec 15 08:01:10 1992
  6198. --- conf/examples/convex.uiuc.edu    Mon Dec 14 16:01:16 1992
  6199. ***************
  6200. *** 0 ****
  6201. --- 1,38 ----
  6202. + # convex.uiuc.edu - MH 6.8 Convex C240 running ConvexOS v9.1
  6203. + # Fri, 11 Dec 1992 17:32:53 -0600
  6204. + # Paul Pomes <Paul-Pomes@uiuc.EDU>
  6205. + #
  6206. + bboards    off
  6207. + bin    /usr/local/new
  6208. + etc    /usr/local/libdata/mh
  6209. + mail    /usr/spool/mail
  6210. + mandir    /usr/man
  6211. + manuals    local
  6212. + manuals    standard
  6213. + mts    sendmail/smtp
  6214. + pop    off
  6215. + ranlib    on
  6216. + remove    rm -f
  6217. + signal    void
  6218. + sprintf    char *
  6219. + options    BIND
  6220. + options    BSD42
  6221. + options    BSD43
  6222. + options    DBMPWD
  6223. + options    DUMB
  6224. + options    FLOCK
  6225. + options    FOLDPROT='"700"'
  6226. + options    MHE
  6227. + options    MHRC
  6228. + options    MIME
  6229. + options    MSGID
  6230. + options    MSGPROT='"600"'
  6231. + options    NFS
  6232. + options    NTOHLSWAP
  6233. + options    OVERHEAD
  6234. + options    RENAME
  6235. + options    RPATHS
  6236. + options    SBACKUP='"\\043"'
  6237. + options    UNISTD
  6238. + options    VSPRINTF
  6239. + options    WAITINT
  6240. *** /dev/null    Tue Dec 15 08:01:10 1992
  6241. --- conf/examples/dbc    Wed Dec  2 13:35:15 1992
  6242. ***************
  6243. *** 0 ****
  6244. --- 1,23 ----
  6245. + # dbc        - DBC's MH 6.8 config file
  6246. + # SunOS 4.1.1 rev B
  6247. + # Wed, 02 Dec 1992 12:40:42 PST
  6248. + # Marshall Rose <mrose@dbc.mtview.ca.us>
  6249. + #
  6250. + options SUN40 BSD42 BSD43
  6251. + options    BIND MIME MSGID RPATHS UCI WHATNOW
  6252. + #
  6253. + bboards    pop
  6254. + bin    /usr/local/bin
  6255. + curses    -lcurses -ltermcap
  6256. + etc    /usr/local/lib/mh
  6257. + ldoptions -s -O
  6258. + mail    .maildrop
  6259. + mandir    /usr/local/man
  6260. + manuals    standard
  6261. + editor    prompter
  6262. + mts    zmailer/smtp
  6263. + pop    on
  6264. + options    APOP='"/etc/pop.auth"' MPOP
  6265. + options    POPSERVICE='"pop3"'
  6266. + ranlib    on
  6267. + signal    void
  6268. *** /dev/null    Tue Dec 15 08:01:10 1992
  6269. --- conf/examples/dynix.uiuc.edu    Fri Dec 11 13:33:20 1992
  6270. ***************
  6271. *** 0 ****
  6272. --- 1,36 ----
  6273. + # dynix.uiuc.edu - MH 6.8 Sequent Symmetry running Dynix 3.1.2
  6274. + # Fri, 11 Dec 1992 14:06:09 CST
  6275. + # Paul Pomes <Paul-Pomes@uiuc.EDU>
  6276. + #
  6277. + bin    /usr/local/new
  6278. + bboards    off
  6279. + cc    gcc -fpcc-struct-return
  6280. + etc    /usr/local/libdata/mh
  6281. + mail    /usr/spool/mail
  6282. + mandir    /usr/man
  6283. + manuals    local
  6284. + mts    sendmail/smtp
  6285. + pop    off
  6286. + remove    rm -f
  6287. + ranlib    on
  6288. + signal    int
  6289. + sprintf    char *
  6290. + options    BIND
  6291. + options    BSD42
  6292. + options    BSD43
  6293. + options    DUMB
  6294. + options    FLOCK
  6295. + options    FOLDPROT='"700"'
  6296. + options    MHE
  6297. + options    MHRC
  6298. + options    MIME
  6299. + options    MSGID
  6300. + options    MSGPROT='"600"'
  6301. + options    NTOHLSWAP
  6302. + options    OVERHEAD
  6303. + options    RENAME
  6304. + options    RPATHS
  6305. + options    SBACKUP='"\\043"'
  6306. + options    UNISTD
  6307. + options    VSPRINTF
  6308. + options    ZONEINFO
  6309. *** ../mh-6.7.2/conf/examples/encore    Fri Apr  6 09:21:02 1990
  6310. --- conf/examples/encore    Fri Dec  4 09:17:57 1992
  6311. ***************
  6312. *** 1 ****
  6313. --- 1,2 ----
  6314. + # encore
  6315.   bin    /usr/local
  6316. *** /dev/null    Tue Dec 15 08:01:10 1992
  6317. --- conf/examples/fujitsu.clcs.com.au    Thu Dec 10 11:47:28 1992
  6318. ***************
  6319. *** 0 ****
  6320. --- 1,28 ----
  6321. + # fujitsu.clcs.com.au - MH 6.8 for Fujitsu/ICL DRS6000 running System V R4
  6322. + # [This is known to work with OS Versions: 4.03 and 5.1.04]
  6323. + #
  6324. + # From: Stephen Prince <sp@clcs.com.au>
  6325. + # Date: Tue, 08 Dec 1992 10:47:02 +1100
  6326. + #
  6327. + bin        /usr/local/bin/mh
  6328. + etc        /usr/local/lib/mh
  6329. + bboards        off
  6330. + mail        /var/mail
  6331. + mailgroup    mail
  6332. + manuals        gen
  6333. + mandir        /usr/local/man
  6334. + mts        sendmail/smtp
  6335. + options        ATTVIBUG BIND FCNTL SYS5 SYS5DIR SVR4 NFS
  6336. + options        SOCKETS SHADOW BERK MHRC MIME RPATHS RENAME
  6337. + options        VSPRINTF ZONEINFO FOLDPROT='"0750"' UNISTD
  6338. + options        MORE='"/usr/local/bin/less"'
  6339. + signal        void
  6340. + pop        off
  6341. + ranlib        off
  6342. + oldload        none
  6343. + curses        -lcurses
  6344. + ldoptlibs    -lsocket -lnsl
  6345. + ccoptions    -O -I/usr/include -I/usr/ucbinclude
  6346. + sharedlib    sys5
  6347. + slibdir        /usr/lib
  6348. + slflags        -K pic
  6349. *** ../mh-6.7.2/conf/examples/gould    Thu Oct 29 14:55:39 1987
  6350. --- conf/examples/gould    Fri Dec  4 09:18:01 1992
  6351. ***************
  6352. *** 1 ****
  6353. --- 1,2 ----
  6354. + # gould
  6355.   bin    /usr/local
  6356. *** ../mh-6.7.2/conf/examples/hplpm.hpl.hp.com    Thu Apr 12 13:21:53 1990
  6357. --- conf/examples/hplpm.hpl.hp.com    Thu Dec  3 09:31:08 1992
  6358. ***************
  6359. *** 1 ****
  6360. --- 1,2 ----
  6361. + # hplpm.hpl.hp.com - Hewlett-Packard 9000 machines
  6362.   # From:    Peter Marvit <marvit%hplpm.hpl.hp.com@hplb.hpl.hp.COM>
  6363. *** /dev/null    Tue Dec 15 08:01:10 1992
  6364. --- conf/examples/hpux.sap-ag.de    Thu Dec  3 09:31:34 1992
  6365. ***************
  6366. *** 0 ****
  6367. --- 1,19 ----
  6368. + # hpux.sap-ag.de - MH 6.8 options for HPUX (HPUX 8.05 on HP9000/720).
  6369. + # Bill Wohler <wohler@sap-ag.de>
  6370. + # Sat, 31 Oct 92 19:16:29 +0100
  6371. + #
  6372. + # General
  6373. + #
  6374. + bin        /usr/local/bin/mh
  6375. + ldoptions    -s
  6376. + mandir        /usr/local/man
  6377. + manuals        standard
  6378. + mts        sendmail/smtp
  6379. + options        BIND DBMPWD ISI MHE MHRC OVERHEAD RPATHS WHATNOW UK
  6380. + #
  6381. + # Machine specific options
  6382. + #
  6383. + ccoptions    +DA1.0 +DS1.0
  6384. + options        TYPESIG=void SYS5 NDIR SOCKETS _STRINGS
  6385. + curses        -lcurses -ltermlib
  6386. + sprintf        int
  6387. *** /dev/null    Tue Dec 15 08:01:10 1992
  6388. --- conf/examples/hpux.uiuc.edu    Fri Dec 11 13:33:12 1992
  6389. ***************
  6390. *** 0 ****
  6391. --- 1,41 ----
  6392. + # hpux.uiuc.edu    - MH 6.8 HP-9000/700 with HP-UX 8.0 and sendmail
  6393. + # Fri, 11 Dec 1992 14:06:09 CST
  6394. + # Paul Pomes <Paul-Pomes@uiuc.EDU>
  6395. + #
  6396. + bin    /usr/local/bin
  6397. + bboards    off
  6398. + etc    /usr/local/lib/mh
  6399. + ldoptlibs    -ldbm
  6400. + mail    /usr/mail
  6401. + mandir    /usr/local/man
  6402. + mailgroup    mail
  6403. + manuals    standard
  6404. + mts    sendmail/smtp
  6405. + pop    off
  6406. + remove    rm -f
  6407. + signal    void
  6408. + sprintf int
  6409. + options    BIND
  6410. + options    DBMPWD
  6411. + options    DUMB
  6412. + options    FOLDPROT='"700"'
  6413. + options    LOCKF
  6414. + options    MHE
  6415. + options    MHRC
  6416. + options    MIME
  6417. + options    MORE='"/usr/bin/more"'
  6418. + options    MSGID
  6419. + options    MSGPROT='"600"'
  6420. + options    OVERHEAD
  6421. + options    RENAME
  6422. + options    RPATHS
  6423. + options    SBACKUP='"\\043"'
  6424. + options    SOCKETS
  6425. + options    SVR4
  6426. + options    SYS5
  6427. + options    SYS5DIR
  6428. + options    TERMINFO
  6429. + options    TZNAME
  6430. + options    UNISTD
  6431. + options    VSPRINTF
  6432. + options NTOHLSWAP
  6433. *** ../mh-6.7.2/conf/examples/kosciusko.esd.3com.com    Sun Apr  8 12:59:55 1990
  6434. --- conf/examples/kosciusko.esd.3com.com    Thu Dec  3 09:31:51 1992
  6435. ***************
  6436. *** 1 ****
  6437. --- 1,2 ----
  6438. + # kosciusko.esd.3com.com - SunOS 4.0.3 
  6439.   # From: "Mark D. Baushke" <mdb@kosciusko.ESD.3Com.COM>
  6440. ***************
  6441. *** 29,31 ****
  6442.   options    BSD42 BSD43 SUN40 DUMB ATHENA
  6443. ! options    MHE MHRC NFS BIND DBM
  6444.   options    SBACKUP='"\\043"' OVERHEAD
  6445. --- 30,32 ----
  6446.   options    BSD42 BSD43 SUN40 DUMB ATHENA
  6447. ! options    MHE MHRC NFS BIND DBMPWD
  6448.   options    SBACKUP='"\\043"' OVERHEAD
  6449. *** /dev/null    Tue Dec 15 08:01:10 1992
  6450. --- conf/examples/krusty.smsc.sony.COM    Thu Dec  3 09:32:02 1992
  6451. ***************
  6452. *** 0 ****
  6453. --- 1,22 ----
  6454. + # krusty.smsc.sony.COM - System V Release 4 running mailsurr
  6455. + #
  6456. + # David Elliott 1990, 1991
  6457. + #
  6458. + #
  6459. + bin   /usr/local/bin/mh
  6460. + etc   /usr/local/lib/mh
  6461. + mail  /usr/mail
  6462. + chown /bin/chown
  6463. + manuals       gen
  6464. + mts   sendmail/smtp
  6465. + sprintf       int
  6466. + ldoptlibs     -lsocket -lnsl -lgen
  6467. + curses        -lcurses
  6468. + ranlib        off
  6469. + options    ATTVIBUG
  6470. + options    MORE='"/bin/more"'
  6471. + options    SOCKETS
  6472. + options    SYS5
  6473. + options    SYS5DIR
  6474. + options    SVR4
  6475. + options    TYPESIG=void
  6476. *** ../mh-6.7.2/conf/examples/mhmts    Fri Apr  6 09:22:28 1990
  6477. --- conf/examples/mhmts    Thu Dec  3 09:39:28 1992
  6478. ***************
  6479. *** 1 ****
  6480. --- 1,2 ----
  6481. + # mhmts        - stand-alone mhmts template
  6482.   bin    /usr/local
  6483. *** ../mh-6.7.2/conf/examples/mmdf    Fri Apr  6 09:22:32 1990
  6484. --- conf/examples/mmdf    Thu Dec  3 09:39:12 1992
  6485. ***************
  6486. *** 1 ****
  6487. --- 1,2 ----
  6488. + # mmdf         - template using mts: mmdf
  6489.   bin    /usr/local
  6490. *** ../mh-6.7.2/conf/examples/ridge    Fri Apr  6 09:23:35 1990
  6491. --- conf/examples/ridge    Fri Dec  4 09:18:06 1992
  6492. ***************
  6493. *** 1 ****
  6494. --- 1,2 ----
  6495. + # ridge        - ROS
  6496.   bin    /usr/local/bin
  6497. *** /dev/null    Tue Dec 15 08:01:10 1992
  6498. --- conf/examples/rs6000    Thu Dec  3 09:32:23 1992
  6499. ***************
  6500. *** 0 ****
  6501. --- 1,34 ----
  6502. + # rs6000    - RISC 6000/320, with AIX 3.1 (3.03)
  6503. + #
  6504. + bin   /usr/local/bin
  6505. + etc   /usr/local/lib/mh
  6506. + chown /bin/chown
  6507. + mail  /usr/spool/mail
  6508. + mandir        /usr/local/man
  6509. + manuals       standard
  6510. + mts   sendmail/smtp
  6511. + pop   off
  6512. + options       AIX AIX3_1 TYPESIG=void SYS5 SYS5DIR
  6513. + options       ATZ
  6514. + options       BIND
  6515. + options       DBMPWD
  6516. + options       MHE
  6517. + options       MHRC
  6518. + options       NETWORK
  6519. + options       NTOHLSWAP
  6520. + options       OVERHEAD
  6521. + options       RPATHS
  6522. + options       SOCKETS
  6523. + options       TZNAME
  6524. + options       WHATNOW
  6525. + options       SBACKUP='"\\043"'
  6526. + options       MSGPROT='"0600"'
  6527. + options       FOLDPROT='"0710"'
  6528. + options       NFOLDERS=500
  6529. + bboards               off
  6530. + curses                -lcurses
  6531. + ccoptions     -g -D_NO_PROTO -D_NONSTD_TYPES -D_MBI=void -U__STR__
  6532. + ldoptions     -g
  6533. + ranlib                on
  6534. + sprintf               int
  6535. + 
  6536. *** ../mh-6.7.2/conf/examples/sendmts    Fri Apr  6 09:22:36 1990
  6537. --- conf/examples/sendmts    Thu Dec  3 09:39:21 1992
  6538. ***************
  6539. *** 1 ****
  6540. --- 1,2 ----
  6541. + # sendmail     - template using mts: sendmail
  6542.   bin    /usr/local
  6543. *** /dev/null    Tue Dec 15 08:01:10 1992
  6544. --- conf/examples/shrike.irvine.com    Thu Dec  3 09:32:33 1992
  6545. ***************
  6546. *** 0 ****
  6547. --- 1,50 ----
  6548. + # shrike.irvine.com - MH 6.7.2 - HP 9000/700 HP/UX 8.x sendmail version
  6549. + # contributed by Jerry Sweet <jsweet@irvine.COM>
  6550. + #
  6551. + # Notes:
  6552. + #    1. Make sure you're using /bin/make, and not GNU Make.
  6553. + #
  6554. + #    2. You may have to modify h/string.h where strlen is declared as follows:
  6555. + #
  6556. + #    #if defined(hpux)
  6557. + #    /* size_t  strlen (); */
  6558. + #    #else
  6559. + #    int     strlen ();
  6560. + #    #endif
  6561. + #
  6562. + #    3. vmh.c won't compile.  (Sorry, don't have any patches yet for that.)
  6563. + #
  6564. + #
  6565. + bin    /usr/local/bin/mh-6.7.2
  6566. + etc    /usr/local/lib/mh-6.7.2
  6567. + mail    /usr/spool/mail
  6568. + mandir    /usr/local/man
  6569. + manuals    standard
  6570. + chown    /bin/chown
  6571. + editor    prompter
  6572. + remove    mv -f
  6573. + mts    sendmail/smtp
  6574. + pop    on
  6575. + options    ATHENA
  6576. + options    ATZ
  6577. + options    BIND
  6578. + options    MHE
  6579. + options    MHRC
  6580. + options    MORE='"/usr/bin/more"'
  6581. + options    MSGPROT='"0600"'
  6582. + options    NDIR
  6583. + options    NTOHLSWAP
  6584. + options    POPUUMBOX
  6585. + options    SOCKETS
  6586. + options    SYS5
  6587. + options    TZNAME
  6588. + options    TYPESIG=void
  6589. + options    VSPRINTF
  6590. + options    WHATNOW
  6591. + options    DPOP
  6592. + options    RPOP
  6593. + options    POP2
  6594. + options    POPSERVICE='"pop3"'
  6595. + ccoptions -O
  6596. + curses    -lcurses -ltermlib
  6597. + sprintf    int
  6598. *** /dev/null    Tue Dec 15 08:01:10 1992
  6599. --- conf/examples/solaris2.sun.com    Thu Dec  3 09:32:46 1992
  6600. ***************
  6601. *** 0 ****
  6602. --- 1,54 ----
  6603. + # solaris2.sun.com - MH 6.8 - Solaris 2.x
  6604. + # Solaris 2.x (native, no source/binary compatability)
  6605. + # contributed by Greg.Onufer@cheers.Bungi.COM
  6606. + # Wed, 11 Nov 1992 00:43:19 PST
  6607. + 
  6608. + # Bulletin Boards
  6609. + bbdelivery      off
  6610. + bboards         off
  6611. + 
  6612. + # Compilation Environment
  6613. + cc              cc
  6614. + ccoptions       -O -g
  6615. + curses          -lcurses
  6616. + # ldoptions may also need -R/opt/mh/lib
  6617. + ldoptions       -s
  6618. + ldoptlibs       -lnsl -lsocket
  6619. + sharedlib       sys5
  6620. + slflags         -K pic
  6621. + ranlib          off
  6622. + chown           /usr/bin/chown
  6623. + oldload         none
  6624. + 
  6625. + # RunTime Environment
  6626. + bin             /opt/mh/bin
  6627. + etc             /opt/mh/lib
  6628. + slibdir         /opt/mh/lib
  6629. + mandir          /opt/mh/man
  6630. + manuals         standard
  6631. + editor          /usr/bin/vi
  6632. + mail            /var/mail
  6633. + mts             sendmail/smtp
  6634. + 
  6635. + # Compilation Options
  6636. + options SYS5
  6637. + options SVR4
  6638. + options FCNTL
  6639. + options RENAME
  6640. + options VSPRINTF
  6641. + options ATTVIBUG
  6642. + options DBMPWD
  6643. + options DUMB
  6644. + options MORE='"/usr/bin/more"'
  6645. + options MSGPROT='"0600"'
  6646. + options MSGID
  6647. + options RPATHS
  6648. + options SOCKETS
  6649. + options FOLDPROT='"0711"'
  6650. + options SHADOW
  6651. + options SYS5DIR
  6652. + options MHRC
  6653. + options MHE
  6654. + options MIME
  6655. + signal  void
  6656. + sprintf int
  6657. *** /dev/null    Tue Dec 15 08:01:10 1992
  6658. --- conf/examples/sun3.5    Thu Dec  3 09:33:01 1992
  6659. ***************
  6660. *** 0 ****
  6661. --- 1,40 ----
  6662. + # sun3.5    - MH 6.8 configuration file for SunOS 3.5
  6663. + # Fri, 28 Feb 1992 00:49:32 -0800
  6664. + # Casey Leedom <casey@gauss.llnl.GOV>
  6665. + #
  6666. + 
  6667. + #
  6668. + # Options required by SunOS 3.5.  (You can use FLOCK instead of LOCKF
  6669. + # if you don't have multiple machine mounting mail spools with NFS.)
  6670. + #
  6671. + mts    sendmail/smtp
  6672. + options    BIND BSD42 DBMPWD LOCKF
  6673. + curses    -lcurses -ltermcap
  6674. + sprintf    int
  6675. + 
  6676. + #
  6677. + # Site preference options.
  6678. + #
  6679. + # Note that if you choose not to use the option "BERK" and you use Domain
  6680. + # Name Service via NIS, then you'd better add "ldoptlibs -lresolv" to
  6681. + # prevent post(1) from hanging on hosts with MX records and no address
  6682. + # records.  (No, you really don't want to know why.)
  6683. + #
  6684. + # Also, under SunOS 3.5 you'll need to add "ccoptions -I../h -I../../h
  6685. + # -I../../../h" because the supplied libresolv.a under SunOS 3.5 uses the
  6686. + # newer BSD4.3 based hostent structure which is different from the BSD4.2
  6687. + # based hostent structure declared in /usr/include/netdb.h.  Why does adding
  6688. + # this help?  There's a version of netdb.h in ../h that has the BSD4.3 based
  6689. + # hostent structure.  We need to use all the different forms of ../h because
  6690. + # the MH makefile system doesn't offer a $(TOP) variable like the X Windows
  6691. + # Makefile system ...  (sigh) I told you that you didn't want to know about
  6692. + # any of this ...
  6693. + #
  6694. + bin    /usr/local/bin/mh
  6695. + etc    /usr/local/lib/mh
  6696. + mail    /usr/spool/mail
  6697. + manuals    local
  6698. + options    FOLDPROT='"0700"' MHE MHRC MSGPROT='"0644"' NTOHLSWAP OVERHEAD RPATHS
  6699. + ldoptions -s
  6700. + ldoptlibs -lresolv
  6701. + ccoptions -I../h -I../../h -I../../../h
  6702. *** ../mh-6.7.2/conf/examples/sun4.0    Fri Apr  6 09:44:46 1990
  6703. --- conf/examples/sun4.0    Thu Dec  3 09:33:20 1992
  6704. ***************
  6705. *** 1,2 ****
  6706. ! # For Sun OS 4.* with SendMail, running Yellow Pages, and /etc/named.
  6707.   # MH will post mail through an SMTP connection to the localhost's
  6708. --- 1,2 ----
  6709. ! # sun4.0    - For Sun OS 4.* with SendMail, Yellow Pages and /etc/named.
  6710.   # MH will post mail through an SMTP connection to the localhost's
  6711. ***************
  6712. *** 11,13 ****
  6713.   options    BSD42 BSD43 SUN40 TYPESIG=void
  6714. ! options    DBM
  6715.   options BIND
  6716. --- 11,13 ----
  6717.   options    BSD42 BSD43 SUN40 TYPESIG=void
  6718. ! options    DBMPWD
  6719.   options BIND
  6720. *** /dev/null    Tue Dec 15 08:01:10 1992
  6721. --- conf/examples/sun4.1.1    Thu Dec  3 09:33:29 1992
  6722. ***************
  6723. *** 0 ****
  6724. --- 1,29 ----
  6725. + # sun4.1.1    - MH 6.8 configuration file for SunOS 4.1.1
  6726. + # Fri, 28 Feb 1992 00:49:32 -0800
  6727. + # Casey Leedom <casey@gauss.llnl.GOV>
  6728. + #
  6729. + 
  6730. + #
  6731. + # Options required by SunOS 4.1.1.  (You can use FLOCK instead of LOCKF
  6732. + # if you don't have multiple machine mounting mail spools with NFS.)
  6733. + #
  6734. + mts    sendmail/smtp
  6735. + options    ATTVIBUG BIND BSD42 BSD43 DBMPWD
  6736. + options    LOCKF SUN40 SUN41 TYPESIG=void ZONEINFO
  6737. + curses    -lcurses -ltermcap
  6738. + 
  6739. + #
  6740. + # Site preference options.
  6741. + #
  6742. + # Note that if you choose not to use the option "BERK" and you use Domain
  6743. + # Name Service via NIS, then you'd better add "ldoptlibs -lresolv" to
  6744. + # prevent post(1) from hanging on hosts with MX records and no address
  6745. + # records.  (No, you really don't want to know why.)
  6746. + #
  6747. + bin    /usr/local/bin/mh
  6748. + etc    /usr/local/lib/mh
  6749. + mail    /usr/spool/mail
  6750. + manuals    local
  6751. + options    FOLDPROT='"0700"' MHE MHRC MSGPROT='"0644"' NTOHLSWAP OVERHEAD RPATHS
  6752. + ldoptions -s
  6753. + ldoptlibs -lresolv
  6754. *** /dev/null    Tue Dec 15 08:01:10 1992
  6755. --- conf/examples/sun411.rpi.edu    Fri Dec  4 09:15:40 1992
  6756. ***************
  6757. *** 0 ****
  6758. --- 1,35 ----
  6759. + # sun411.rpi.edu - MH 6.8, Sparcstation SunOS 4.1.1 with AFS Kerberos
  6760. + # Thu, 03 Dec 1992 13:45:09
  6761. + # James Ault <aultj@rpi.EDU>
  6762. + #
  6763. + bin    /campus/other/mh/6.7.1k/@sys/bin
  6764. + etc    /campus/other/mh/6.7.1k/@sys/lib
  6765. + mail    /usr/spool/mail
  6766. + mailgroup    off
  6767. + mandir    /campus/other/mh/6.7.1k/@sys/man
  6768. + manuals    standard
  6769. + chown    /etc/chown
  6770. + editor    prompter
  6771. + remove    mv -f
  6772. + mts    sendmail
  6773. + bboards    off
  6774. + bbdelivery    off
  6775. + mf    off
  6776. + pop    on
  6777. + kpop    on
  6778. + hesiod    off
  6779. + options    ATHENA ATTVIBUG ATZ BIND BSD42 BSD43 DBM DUMB 
  6780. + options    FOLDPROT='"0711"' FLOCK MHE MHRC MSGPROT='"0600"' 
  6781. + options    NOMHSEQ OVERHEAD POP2 POPSERVICE='"kpop"' RPATHS
  6782. + options    RPOP KPOP TRANSARC_KAS SBACKUP='"\\043"' 
  6783. + options    SUN40 SUN41 TYPESIG='void' TZNAME ZONEINFO 
  6784. + options    ISI WP YP_LOOKUP
  6785. + ccoptions    -O -I/campus/athena/kerberos/V4/@sys/include 
  6786. + curses        -lcurses -ltermcap
  6787. + ldoptions    -n 
  6788. + ldoptlibs    -L/campus/athena/kerberos/V4/@sys/lib -lkrb -ldes
  6789. + ldoptlibs    -L/campus/bsd/bind/4.8.3/@sys/lib -lresolv
  6790. + lex    lex -nt
  6791. + sprintf    int
  6792. + ranlib    on
  6793. + sharedlib    off
  6794. *** /dev/null    Tue Dec 15 08:01:10 1992
  6795. --- conf/examples/sys5r3.2    Thu Dec  3 09:33:38 1992
  6796. ***************
  6797. *** 0 ****
  6798. --- 1,60 ----
  6799. + # sys5r3.2    - SVr3.2 configuration file for MH 6.7.1:
  6800. + 
  6801. + #
  6802. + #   conf/MH configuration file for MH-6.7 to be used on:
  6803. + #       AT&T Unix System V.3.2 with BSD4.3-compatible sockets
  6804. + #
  6805. + #   the items are listed in the order they appear in mh-gen(8)
  6806. + #
  6807. + 
  6808. + bin             /usr/local/bin
  6809. + debug           off
  6810. + etc             /usr/local/lib/mh
  6811. + mail            /usr/mail
  6812. + mailgroup       mail
  6813. + mandir          /usr/man
  6814. + manuals         gen
  6815. + chown           /bin/chown
  6816. + editor          prompter
  6817. + remove          /bin/mv -f
  6818. + # if no TCP/IP sendmail is available: change mts entry to sendmail
  6819. + mts             sendmail/smtp
  6820. + bboards         off
  6821. + bbdelivery      off
  6822. + bbhome          /usr/spool/bboards
  6823. + mf              off
  6824. + pop             off
  6825. + # options       SEE BELOW
  6826. + cc              cc
  6827. + ccoptions       -O
  6828. + curses          -lcurses
  6829. + ldoptions       -s
  6830. + ldoptlibs
  6831. + lex             lex
  6832. + sprintf         int
  6833. + sharedlib       off
  6834. + slibdir         /usr/local/lib
  6835. + oldload         off
  6836. + ranlib          off
  6837. + tma             off
  6838. + 
  6839. + #
  6840. + #   complete list of possible macros for use with 'options':
  6841. + #       ALTOS ATHENA ATZ BANG BERK BIND BSD41A BSD42 BSD43 COMPAT
  6842. + #       DBMPWD DPOP DUMB FOLDPROT='"0711"' ISI LINK='"@"' locname
  6843. + #       MHE MHRC MORE='"/usr/ucb/more"' MSGPROT='"0644"' NDIR NFS
  6844. + #       NOIOCTLH NOMHSEQ NTOHLSWAP OVERHEAD POPSERVICE='"pop"'
  6845. + #       RPATHS RPOP SBACKUP='","' SENDMAILBUG SHADOW SOCKETS
  6846. + #       SUN40 SYS5 SYS5DIR TTYD TYPESIG='int' TZNAME UCI UK V7 WP
  6847. + #       WHATNOW ZONEINFO
  6848. + #
  6849. + 
  6850. + # define BIND only of the BSD4.3 named (TCP/IP) is used
  6851. + # define SOCKETS only if the system has BSD4.3 sockets (TCP/IP)
  6852. + options         ATZ BIND DUMB MHE MHRC MORE='"/usr/bin/pg"'
  6853. + options         OVERHEAD SHADOW SOCKETS SYS5 SYS5DIR
  6854. + options         TYPESIG='void' TZNAME WHATNOW
  6855. + 
  6856. + #
  6857. + #   end of conf/MH configuration file
  6858. + #
  6859. *** /dev/null    Tue Dec 15 08:01:10 1992
  6860. --- conf/examples/sys5r4    Thu Dec  3 09:33:44 1992
  6861. ***************
  6862. *** 0 ****
  6863. --- 1,28 ----
  6864. + # sys5r4    - a SYS5 R4 system
  6865. + # contributed by andrew@werple.pub.uu.oz.au
  6866. + #
  6867. + bin    /usr/local/bin
  6868. + etc    /usr/local/lib/mh
  6869. + bboards    on
  6870. + chown    /usr/bin/chown
  6871. + editor    /usr/bin/vi
  6872. + mail    /var/mail
  6873. + mandir    /usr/local/man
  6874. + manuals    local
  6875. + mts    sendmail
  6876. + options    BSD42
  6877. + options    MORE='"/usr/local/bin/less"'
  6878. + options    MSGPROT='"0600"'SHADOW
  6879. + options    SYS5
  6880. + options    SVR4
  6881. + options    SYS5DIR
  6882. + options    TYPESIG=void
  6883. + options    UK
  6884. + options    on
  6885. + sprintf    int
  6886. + cc    cc
  6887. + ccoptions -O
  6888. + ldoptions -s
  6889. + curses    -lcurses
  6890. + sharedlib sys5
  6891. + slibdir    /usr/local/lib/mh
  6892. *** /dev/null    Tue Dec 15 08:01:10 1992
  6893. --- conf/examples/sys5r4-ncr    Thu Dec  3 09:33:51 1992
  6894. ***************
  6895. *** 0 ****
  6896. --- 1,34 ----
  6897. + # sys5r4-ncr    - an NCR system: Unix System V Release 4.0.2.0 (WINS)
  6898. + # running MMDF2 with SMTP posting
  6899. + #
  6900. + # Apparently, there are two compilation environments: 4.2BSD and SYS5.
  6901. + # This config file uses the SYS5 environment -- I never could get the
  6902. + # 4.2BSD environment directory routines to work right.
  6903. + #
  6904. + # You may want to define SVR4; this option was added after MH was
  6905. + # ported to the NCR, and I haven't been able to test it there.
  6906. + #
  6907. + # uip/vmh.c still won't compile because of loader problems with the
  6908. + # curses & termlib libraries.  Also, NCR should fix their loader not to try
  6909. + # to search additional libraries for modules that have already been found.
  6910. + #
  6911. + bin    /usr/local
  6912. + etc    /usr/local/lib/mh
  6913. + mail    .mail
  6914. + manuals    gen
  6915. + chown   /usr/bin/chown
  6916. + mts    mmdf2/smtp
  6917. + mf    off
  6918. + ranlib  off
  6919. + bboards off
  6920. + bbdelivery off
  6921. + oldload none
  6922. + cc    /bin/cc
  6923. + ldoptlibs -lnet -lnsl -lsocket
  6924. + options    MORE='"/usr/bin/more"'
  6925. + options    ncr
  6926. + options SYS5
  6927. + options    SYS5DIR 
  6928. + options    SOCKETS
  6929. + options    TZNAME
  6930. + options TYPESIG=void
  6931. *** ../mh-6.7.2/conf/examples/system5    Fri Apr  6 09:23:13 1990
  6932. --- conf/examples/system5    Fri Dec  4 09:18:48 1992
  6933. ***************
  6934. *** 1 ****
  6935. --- 1,2 ----
  6936. + # system5     - template
  6937.   bin    /usr/local
  6938. *** /dev/null    Tue Dec 15 08:01:10 1992
  6939. --- conf/examples/uci.gcc    Thu Dec  3 09:34:15 1992
  6940. ***************
  6941. *** 0 ****
  6942. --- 1,49 ----
  6943. + # uci.gcc    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  6944. + #
  6945. + bin    /usr/bs/mh-6.8/bin
  6946. + etc    /usr/bs/mh-6.8/lib
  6947. + popdir    /usr/bs/mh-6.8/lib
  6948. + mandir    /usr/bs/mh-6.8/man
  6949. + slibdir    /usr/bs/mh-6.8/lib
  6950. + bbhome    /usr/bs/mh-6.8/bboards
  6951. + mail    /usr/spool/mail
  6952. + mailgroup    off
  6953. + manuals        none
  6954. + chown    /etc/chown
  6955. + editor    prompter
  6956. + remove    rm -f
  6957. + mts    mmdf2/smtp
  6958. + bboards    nntp
  6959. + bbdelivery off
  6960. + mf    off
  6961. + pop    on
  6962. + options    BIND
  6963. + options    BSD42 
  6964. + options    BSD43 
  6965. + #options    LOCKF
  6966. + options    MHE
  6967. + options    MHRC 
  6968. + options    RPATHS
  6969. + options    WHATNOW
  6970. + options    MIME
  6971. + options UCI
  6972. + options    POP2
  6973. + options    RPOP
  6974. + #options    APOP
  6975. + curses -lcurses -ltermcap
  6976. + ranlib  on
  6977. + # Sun specifics
  6978. + #options    TYPESIG=void
  6979. + signal    void
  6980. + options    DBMPWD
  6981. + options    NFS
  6982. + options    SUN40
  6983. + options    ATTVIBUG
  6984. + #options    MPOP
  6985. + #options    ZONEINFO
  6986. + #
  6987. + #cc    /usr/bs/sunc/cc
  6988. + cc    /usr/gnu/bin/gcc -ansi -fpcc-struct-return
  6989. + ldoptions -s
  6990. + ldoptlibs -ldbm
  6991. + sharedlib off
  6992. *** /dev/null    Tue Dec 15 08:01:10 1992
  6993. --- conf/examples/uci.hp-pa    Thu Dec  3 09:37:33 1992
  6994. ***************
  6995. *** 0 ****
  6996. --- 1,64 ----
  6997. + # uci.hp-pa    - MH 6.8 options for HPUX (HPUX 8.05 on HP9000/720).
  6998. + # based on a file from Bill Wohler <wohler@sap-ag.de>
  6999. + # Sat, 31 Oct 92 19:16:29 +0100
  7000. + #
  7001. + #
  7002. + # Installation Paths
  7003. + #
  7004. + bin        /usr/local/mh-6.8
  7005. + etc        /usr/local/lib/mh-6.8
  7006. + popdir        /usr/local/lib/mh-6.8
  7007. + mandir        /usr/man/mh
  7008. + manuals        standard
  7009. + chown        /bin/chown
  7010. + #ln        ln -s
  7011. + #
  7012. + # Compiler/loader
  7013. + #
  7014. + ccoptions    +DA1.0 +DS1.0
  7015. + curses        -lcurses -ltermlib
  7016. + ldoptions    -s
  7017. + #
  7018. + # Message Transport System
  7019. + #
  7020. + mts        mmdf2/smtp
  7021. + #
  7022. + # UCI BBoards Facility
  7023. + #
  7024. + #bboards     nntp
  7025. + bboards     off
  7026. + bbdelivery    off
  7027. + #
  7028. + # Post Office Protocol
  7029. + #
  7030. + pop        on
  7031. + #
  7032. + # General System Dependencies
  7033. + #
  7034. + signal        void
  7035. + sprintf        int
  7036. + 
  7037. + options        BIND
  7038. + options        DBMPWD
  7039. + options        FCNTL
  7040. + options        MORE='"/usr/bin/more"'
  7041. + options        RENAME
  7042. + options        SOCKETS
  7043. + options        SYS5
  7044. + options        SYS5DIR
  7045. + options        UNISTD
  7046. + options        VSPRINTF
  7047. + options        _CLASSIC_ANSI_TYPES
  7048. + 
  7049. + #
  7050. + # Site Preferences
  7051. + #
  7052. + options        FOLDPROT='"0700"'
  7053. + options        MHE
  7054. + options        MHRC
  7055. + options        MIME
  7056. + options        MSGPROT='"0600"'
  7057. + options        OVERHEAD
  7058. + options        RPOP
  7059. + options        UCI
  7060. + options        WHATNOW
  7061. *** ../mh-6.7.2/conf/examples/uci.sequent    Thu Jan 30 13:05:24 1992
  7062. --- conf/examples/uci.sequent    Mon Dec 14 13:30:09 1992
  7063. ***************
  7064. *** 1,5 ****
  7065. ! # uci.sun - for a Sequent running Dynix 3.0.17
  7066. ! bin    /usr/local/mh-6.7.2
  7067.   bbhome    /usr/bboards
  7068. - etc    /usr/local/lib/mh-6.7.2
  7069.   mail    /usr/spool/mail
  7070. --- 1,11 ----
  7071. ! # uci.sequent    - MH 6.8 - Sequent running Dynix 3.1
  7072. ! #
  7073. ! bin    /usr/bs/mh-6.8/bin
  7074. ! etc    /usr/bs/mh-6.8/lib
  7075. ! #mandir    /usr/man
  7076. ! mandir    /usr/bs/mh-6.8/man
  7077. ! #popdir    /usr/etc
  7078. ! popdir    /usr/bs/mh-6.8/lib
  7079. ! #slibdir    /usr/bs/mh-6.8/lib
  7080.   bbhome    /usr/bboards
  7081.   mail    /usr/spool/mail
  7082. ***************
  7083. *** 6,9 ****
  7084.   mailgroup    off
  7085. ! mandir    /usr/man
  7086. ! manuals    local
  7087.   chown    /etc/chown
  7088. --- 12,14 ----
  7089.   mailgroup    off
  7090. ! manuals    standard
  7091.   chown    /etc/chown
  7092. ***************
  7093. *** 10,12 ****
  7094.   editor    prompter
  7095. ! remove    mv -f
  7096.   mts    mmdf2/smtp
  7097. --- 15,17 ----
  7098.   editor    prompter
  7099. ! remove    rm -f
  7100.   mts    mmdf2/smtp
  7101. ***************
  7102. *** 13,15 ****
  7103.   bboards    nntp
  7104. ! bbdelivery on
  7105.   mf    off
  7106. --- 18,21 ----
  7107.   bboards    nntp
  7108. ! #bbdelivery on
  7109. ! bbdelivery off
  7110.   mf    off
  7111. ***************
  7112. *** 19,21 ****
  7113.   options    BSD43 
  7114. - #options    DBM
  7115.   #options    LOCKF
  7116. --- 25,26 ----
  7117. ***************
  7118. *** 23,33 ****
  7119.   options    MHRC 
  7120. - #options    NFS
  7121. - options    POP2
  7122.   options    RPATHS
  7123. - options    RPOP
  7124. - #options    SUN40 
  7125. - #options    TYPESIG=void
  7126.   options    WHATNOW
  7127.   options UCI
  7128.   #options    ZONEINFO
  7129.   cc    atscc
  7130. --- 28,48 ----
  7131.   options    MHRC 
  7132.   options    RPATHS
  7133.   options    WHATNOW
  7134. + options    MIME
  7135.   options UCI
  7136. + options    POP2
  7137. + options    RPOP
  7138. + #options    APOP
  7139. + curses -lcurses -ltermcap
  7140. + ranlib  on
  7141. + # Sequent specicis
  7142. + #options    TYPESIG=int
  7143. + signal    int
  7144. + #options    DBMPWD
  7145. + #options    NFS
  7146. + #options    SUN40 
  7147. + #options    ATTVIBUG
  7148. + #options    MPOP
  7149.   #options    ZONEINFO
  7150. + #
  7151.   cc    atscc
  7152. ***************
  7153. *** 34,38 ****
  7154.   ldoptions -s
  7155. ! ldoptlibs -ldbm -lseq
  7156. ! curses -lcurses -ltermcap
  7157. ! ranlib  on
  7158.   sharedlib off
  7159. --- 49,51 ----
  7160.   ldoptions -s
  7161. ! ldoptlibs -lseq
  7162.   sharedlib off
  7163. *** ../mh-6.7.2/conf/examples/uci.sun    Tue Jan 28 15:07:56 1992
  7164. --- conf/examples/uci.sun    Mon Dec 14 10:23:32 1992
  7165. ***************
  7166. *** 1,5 ****
  7167. ! # uci.sun - for a Sun3 or Sun4 running Sun OS 4.1
  7168. ! bin    /usr/local/mh-6.7.2
  7169. ! bbhome    /usr/bboards
  7170. ! etc    /usr/local/lib/mh-6.7.2
  7171.   mail    /usr/spool/mail
  7172. --- 1,9 ----
  7173. ! # uci.sun    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  7174. ! #
  7175. ! bin    /usr/bs/mh-6.8/bin
  7176. ! etc    /usr/bs/mh-6.8/lib
  7177. ! popdir    /usr/bs/mh-6.8/lib
  7178. ! mandir    /usr/bs/mh-6.8/man
  7179. ! slibdir    /usr/bs/mh-6.8/lib
  7180. ! bbhome    /usr/bs/mh-6.8/bboards
  7181.   mail    /usr/spool/mail
  7182. ***************
  7183. *** 6,10 ****
  7184.   mailgroup    off
  7185. ! mandir    /usr/man
  7186. ! #manuals    local
  7187. ! manuals        gen
  7188.   chown    /etc/chown
  7189. --- 10,12 ----
  7190.   mailgroup    off
  7191. ! manuals        standard
  7192.   chown    /etc/chown
  7193. ***************
  7194. *** 11,13 ****
  7195.   editor    prompter
  7196. ! remove    mv -f
  7197.   mts    mmdf2/smtp
  7198. --- 13,15 ----
  7199.   editor    prompter
  7200. ! remove    rm -f
  7201.   mts    mmdf2/smtp
  7202. ***************
  7203. *** 20,22 ****
  7204.   options    BSD43 
  7205. - options    DBM
  7206.   #options    LOCKF
  7207. --- 22,23 ----
  7208. ***************
  7209. *** 24,44 ****
  7210.   options    MHRC 
  7211. - options    NFS
  7212. - options    POP2
  7213.   options    RPATHS
  7214.   options    RPOP
  7215.   options    SUN40
  7216. - options    SUN41
  7217. - options    SUNVIBUG
  7218.   options    ATTVIBUG
  7219. ! options    TYPESIG=void
  7220. ! options    WHATNOW
  7221. ! options UCI
  7222.   #options    ZONEINFO
  7223. ! # for Sun4s
  7224.   cc    /usr/bs/sunc/cc
  7225. ! ldoptions -s
  7226.   ldoptlibs -ldbm
  7227. ! curses -lcurses -ltermcap
  7228. ! ranlib  on
  7229. ! sharedlib on
  7230. ! slibdir    /usr/local/lib
  7231. --- 25,49 ----
  7232.   options    MHRC 
  7233.   options    RPATHS
  7234. + options    WHATNOW
  7235. + options    MIME
  7236. + options UCI
  7237. + options    POP2
  7238.   options    RPOP
  7239. + #options    APOP
  7240. + curses -lcurses -ltermcap
  7241. + ranlib  on
  7242. + # Sun specifics
  7243. + #options    TYPESIG=void
  7244. + signal    void
  7245. + options    DBMPWD
  7246. + options    NFS
  7247.   options    SUN40
  7248.   options    ATTVIBUG
  7249. ! #options    MPOP
  7250.   #options    ZONEINFO
  7251. ! #
  7252.   cc    /usr/bs/sunc/cc
  7253. ! #cc    /usr/gnu/bin/gcc
  7254. ! ldoptions -s -L/usr/bs/mh-6.8/lib
  7255.   ldoptlibs -ldbm
  7256. ! sharedlib sun4
  7257. *** ../mh-6.7.2/conf/examples/uci.sun.debug    Tue Feb 12 15:57:14 1991
  7258. --- conf/examples/uci.sun.debug    Thu Dec  3 09:35:05 1992
  7259. ***************
  7260. *** 1,5 ****
  7261. ! # uci.sun - for a Sun3 or Sun4 running Sun OS 4.1
  7262. ! bin    /usr/local
  7263. ! bbhome    /usr/bboards
  7264. ! etc    /usr/local/lib/mh
  7265.   mail    /usr/spool/mail
  7266. --- 1,9 ----
  7267. ! # uci.sun.debug    - MH 6.8 - Sun3 or Sun4 running Sun OS 4.1
  7268. ! #
  7269. ! bin    /usr/bs/mh-6.8/bin
  7270. ! etc    /usr/bs/mh-6.8/lib
  7271. ! popdir    /usr/bs/mh-6.8/lib
  7272. ! mandir    /usr/bs/mh-6.8/man
  7273. ! slibdir    /usr/bs/mh-6.8/lib
  7274. ! bbhome    /usr/bs/mh-6.8/bboards
  7275.   mail    /usr/spool/mail
  7276. ***************
  7277. *** 6,9 ****
  7278.   mailgroup    off
  7279. ! mandir    /usr/man
  7280. ! manuals    local
  7281.   chown    /etc/chown
  7282. --- 10,12 ----
  7283.   mailgroup    off
  7284. ! manuals        standard
  7285.   chown    /etc/chown
  7286. ***************
  7287. *** 10,12 ****
  7288.   editor    prompter
  7289. ! remove    mv -f
  7290.   mts    mmdf2/smtp
  7291. --- 13,15 ----
  7292.   editor    prompter
  7293. ! remove    rm -f
  7294.   mts    mmdf2/smtp
  7295. ***************
  7296. *** 19,22 ****
  7297.   options    BSD43 
  7298. ! options    DBM
  7299. ! options    LOCKF
  7300.   options    MHE
  7301. --- 22,24 ----
  7302.   options    BSD43 
  7303. ! #options    LOCKF
  7304.   options    MHE
  7305. ***************
  7306. *** 23,41 ****
  7307.   options    MHRC 
  7308. - options    NFS
  7309. - options    POP2
  7310.   options    RPATHS
  7311. - options    RPOP
  7312. - options    SUN40 
  7313. - options    SUNVIBUG
  7314. - options    TYPESIG=void
  7315.   options    WHATNOW
  7316.   options UCI
  7317.   #options    ZONEINFO
  7318.   ccoptions -g
  7319. - #ldoptions -s
  7320.   ldoptlibs -ldbm
  7321. ! curses -lcurses -ltermcap
  7322. ! ranlib  on
  7323. ! #sharedlib on
  7324. ! sharedlib off
  7325. ! slibdir    /usr/local/lib
  7326. --- 25,51 ----
  7327.   options    MHRC 
  7328.   options    RPATHS
  7329.   options    WHATNOW
  7330. + options    MIME
  7331.   options UCI
  7332. + options    POP2
  7333. + options    RPOP
  7334. + #options    APOP
  7335. + curses -lcurses -ltermcap
  7336. + ranlib  on
  7337. + # Sun specifics
  7338. + #options    TYPESIG=void
  7339. + signal    void
  7340. + options    DBMPWD
  7341. + options    NFS
  7342. + options    SUN40
  7343. + options    ATTVIBUG
  7344. + #options    MPOP
  7345.   #options    ZONEINFO
  7346. + #
  7347. + cc    /usr/bs/sunc/cc
  7348. + #cc    /usr/gnu/bin/gcc
  7349. + #ldoptions -s -L/usr/bs/mh-6.8/lib
  7350. + ldoptions -g
  7351.   ccoptions -g
  7352.   ldoptlibs -ldbm
  7353. ! #sharedlib sun4
  7354. *** ../mh-6.7.2/conf/examples/udel    Fri Apr  6 09:25:06 1990
  7355. --- conf/examples/udel    Thu Dec  3 09:39:41 1992
  7356. ***************
  7357. *** 1 ****
  7358. --- 1,2 ----
  7359. + # udel        - UDel template
  7360.   bin    /usr/uci
  7361. *** /dev/null    Tue Dec 15 08:01:10 1992
  7362. --- conf/examples/ultrix.sap-ag.de    Thu Dec  3 09:35:27 1992
  7363. ***************
  7364. *** 0 ****
  7365. --- 1,24 ----
  7366. + # ultrix.sap-ag.de - MH 6.8 options for ULTRIX (ULTRIX 4.2 on RISC).
  7367. + # Bill Wohler <wohler@sap-ag.de>
  7368. + # Sat, 31 Oct 92 19:14:43 +0100
  7369. + #
  7370. + # General
  7371. + #
  7372. + bin        /usr/local/bin/mh
  7373. + ldoptions    -s
  7374. + mandir        /usr/local/man
  7375. + manuals        standard
  7376. + mts        sendmail/smtp
  7377. + options        BIND DBMPWD ISI MHE MHRC OVERHEAD RPATHS WHATNOW UK
  7378. + #
  7379. + # Machine specific options
  7380. + #
  7381. + options        TYPESIG=void BSD42 BSD43
  7382. + curses        -lcurses -ltermlib
  7383. + #
  7384. + #
  7385. + # the compiler complains:
  7386. + # formatsbr.c:
  7387. + # uopt: Warning: fmtscan: this procedure not optimized because it
  7388. + #      exceeds size threshold; to optimize this procedure, use -Olimit option
  7389. + #      with value >=  679.
  7390. *** ../mh-6.7.2/conf/makefiles/MH-Makefile    Sun Apr  8 19:55:57 1990
  7391. --- conf/makefiles/MH-Makefile    Thu Dec  3 08:23:48 1992
  7392. ***************
  7393. *** 4,6 ****
  7394.   #    @(MHWARNING)
  7395. ! # @(#)$Id: MH-Makefile,v 2.5 90/04/08 14:09:51 sources Exp $
  7396.   ##############################################################################
  7397. --- 4,6 ----
  7398.   #    @(MHWARNING)
  7399. ! # @(#)$Id: MH-Makefile,v 2.15 1992/12/03 16:23:40 jromine Exp $
  7400.   ##############################################################################
  7401. ***************
  7402. *** 20,23 ****
  7403.   #
  7404. ! #    install:    install system and clean up afterwards
  7405.   #
  7406.   #    inst-lib:  install shared libraries
  7407. --- 20,25 ----
  7408.   #
  7409. ! #    install:    install system
  7410.   #
  7411. + #    inst-all:    install system
  7412. + #
  7413.   #    inst-lib:  install shared libraries
  7414. ***************
  7415. *** 24,26 ****
  7416.   #
  7417. ! #    inst-all:    install system
  7418.   #
  7419. --- 26,28 ----
  7420.   #
  7421. ! #    mkdirs:    make MH target directories
  7422.   #
  7423. ***************
  7424. *** 61,62 ****
  7425. --- 63,66 ----
  7426.   INSTALL    =    zotnet support uip doc
  7427. + BINDIR    =    $(DESTDIR)@(MHBINPATH)
  7428. + ETCDIR    =    $(DESTDIR)@(MHETCPATH)
  7429.   SLIB    =    sbr
  7430. ***************
  7431. *** 63,67 ****
  7432.   
  7433. ! install:    inst-all clean
  7434.   
  7435. ! inst-all:    inst-lib
  7436.           for d in $(INSTALL); do (cd $$d; $(MAKE) inst-all); done
  7437. --- 67,71 ----
  7438.   
  7439. ! install:    inst-all
  7440.   
  7441. ! inst-all:    mkdirs inst-lib
  7442.           for d in $(INSTALL); do (cd $$d; $(MAKE) inst-all); done
  7443. ***************
  7444. *** 70,71 ****
  7445. --- 74,81 ----
  7446.   
  7447. + mkdirs:        $(BINDIR) $(ETCDIR)
  7448. + 
  7449. + $(BINDIR) $(ETCDIR):
  7450. +         mkdir $@
  7451. +         chmod 0755 $@
  7452. + 
  7453.   tar:;        @for d in $(INSTALL); \
  7454. ***************
  7455. *** 82,84 ****
  7456.   
  7457. ! distribution:;    rm -f _* :*
  7458.           @if test -f tma/mh/files; \
  7459. --- 92,95 ----
  7460.   
  7461. ! distribution:    READ-ME CHANGES
  7462. !         rm -f _* :*
  7463.           @if test -f tma/mh/files; \
  7464. ***************
  7465. *** 88,89 ****
  7466. --- 99,108 ----
  7467.            fi
  7468. +         -rm -f support/pop/mmdfII/pop/lock.c
  7469. +         -rm -f support/bboards/mmdfII/bboards/lock.c
  7470. +         -rm -f zotnet/tws/tws.h
  7471. +         -rm -f uip/pshsbr.c
  7472. +         cd support/pop/mmdfII/pop ; @(LN) ../../../../zotnet/mts/lock.c .
  7473. +         cd support/bboards/mmdfII/bboards ; @(LN) ../../../../zotnet/mts/lock.c .
  7474. +         cd zotnet/tws ; @(LN) ../tws.h .
  7475. +         cd uip ; @(LN) popsbr.c pshsbr.c
  7476.           for d in $(DISTRIBUTION); \
  7477. ***************
  7478. *** 91,96 ****
  7479.   
  7480. ! unconfig:;    rm -f _* :* core
  7481.           for d in $(DISTRIBUTION); do (cd $$d; $(MAKE) unconfig); done
  7482. !         echo > tmp \
  7483. !     'all:; @echo "You must configure MH first -- see READ-ME for details"'
  7484.           mv tmp Makefile
  7485. --- 110,126 ----
  7486.   
  7487. ! READ-ME:    conf/mh-gen.8
  7488. !         nroff -man conf/mh-gen.8 > read-me.tmp
  7489. !         mv read-me.tmp $@
  7490. ! 
  7491. ! CHANGES:    papers/changes/mh-changes.ms
  7492. !         nroff -ms papers/changes/mh-changes.ms > changes.tmp
  7493. !         mv changes.tmp $@
  7494. ! 
  7495. ! unconfig:;    rm -f _* :* core READ-ME
  7496. !         -rm -f support/pop/mmdfII/pop/lock.c
  7497. !         -rm -f support/bboards/mmdfII/bboards/lock.c
  7498. !         -rm -f zotnet/tws/tws.h
  7499. !         -rm -f uip/pshsbr.c
  7500.           for d in $(DISTRIBUTION); do (cd $$d; $(MAKE) unconfig); done
  7501. !         cp conf/makefiles/MH-Unconfig tmp
  7502.           mv tmp Makefile
  7503. *** /dev/null    Tue Dec 15 08:01:10 1992
  7504. --- conf/makefiles/MH-Unconfig    Thu Dec  3 08:23:48 1992
  7505. ***************
  7506. *** 0 ****
  7507. --- 1,20 ----
  7508. + all clean:;    @echo "You must configure MH first -- see READ-ME for details"
  7509. + 
  7510. + distribution unconfig:    links READ-ME CHANGES
  7511. + 
  7512. + READ-ME:    conf/mh-gen.8
  7513. +         nroff -man conf/mh-gen.8 > read-me.tmp
  7514. +         mv read-me.tmp $@
  7515. + 
  7516. + CHANGES:    papers/changes/mh-changes.ms
  7517. +         nroff -ms papers/changes/mh-changes.ms > changes.tmp
  7518. +         mv changes.tmp $@
  7519. + 
  7520. + links:;        -rm -f support/pop/mmdfII/pop/lock.c
  7521. +         -rm -f support/bboards/mmdfII/bboards/lock.c
  7522. +         -rm -f zotnet/tws/tws.h
  7523. +         -rm -f uip/pshsbr.c
  7524. +         ln zotnet/mts/lock.c support/pop/mmdfII/pop/lock.c
  7525. +         ln zotnet/mts/lock.c support/bboards/mmdfII/bboards/lock.c
  7526. +         ln zotnet/tws.h zotnet/tws/tws.h
  7527. +         ln uip/popsbr.c uip/pshsbr.c
  7528. *** ../mh-6.7.2/conf/makefiles/config    Sun Apr  8 22:00:30 1990
  7529. --- conf/makefiles/config    Wed Feb  5 13:53:13 1992
  7530. ***************
  7531. *** 4,6 ****
  7532.   #    @(MHWARNING)
  7533. ! # @(#)$Id: config,v 2.7 90/04/08 22:00:29 sources Exp $
  7534.   ##############################################################################
  7535. --- 4,6 ----
  7536.   #    @(MHWARNING)
  7537. ! # @(#)$Id: config,v 2.8 1992/02/05 21:52:46 jromine Exp $
  7538.   ##############################################################################
  7539. ***************
  7540. *** 36,38 ****
  7541.   version version.c:    true
  7542. !         @/bin/sh version.sh @(MHRELEASE)
  7543.   
  7544. --- 36,38 ----
  7545.   version version.c:    true
  7546. !         @/bin/sh version.sh @(MHHOSTVER) @(MHRELEASE)
  7547.   
  7548. *** ../mh-6.7.2/conf/makefiles/dist    Sun Apr  8 20:01:29 1990
  7549. --- conf/makefiles/dist    Wed Dec  2 14:21:48 1992
  7550. ***************
  7551. *** 4,6 ****
  7552.   #    @(MHWARNING)
  7553. ! # @(#)$Id: dist,v 2.6 90/04/08 20:01:28 sources Exp $
  7554.   ##############################################################################
  7555. --- 4,6 ----
  7556.   #    @(MHWARNING)
  7557. ! # @(#)$Id: dist,v 2.7 1992/12/02 22:21:43 jromine Exp $
  7558.   ##############################################################################
  7559. ***************
  7560. *** 27,29 ****
  7561.   TARGETS    =    ../READ-ME \
  7562. !         mh-gen.cat MH.cat ADMIN.cat mh6.7.cat \
  7563.           bboards.dvi beginners.dvi mh4mm.dvi mh6.dvi multifarious.dvi \
  7564. --- 27,29 ----
  7565.   TARGETS    =    ../READ-ME \
  7566. !         mh-gen.cat MH.cat ADMIN.cat mh-changes.cat \
  7567.           bboards.dvi beginners.dvi mh4mm.dvi mh6.dvi multifarious.dvi \
  7568. ***************
  7569. *** 35,37 ****
  7570.   
  7571. ! doc:        MH.doc ADMIN.doc mh6.7.doc
  7572.   
  7573. --- 35,37 ----
  7574.   
  7575. ! doc:        MH.doc ADMIN.doc mh-changes.doc
  7576.   
  7577. ***************
  7578. *** 38,40 ****
  7579.   
  7580. ! IMPRESS    =    mh-gen.imp MH.imp ADMIN.imp mh6.7.imp \
  7581.           bboards.imp beginners.imp \
  7582. --- 38,40 ----
  7583.   
  7584. ! IMPRESS    =    mh-gen.imp MH.imp ADMIN.imp mh-changes.imp \
  7585.           bboards.imp beginners.imp \
  7586. ***************
  7587. *** 50,52 ****
  7588.       lpr -t -J ADMIN ADMIN.cat
  7589. !     lpr -t -J MH.6.7 mh6.7.cat
  7590.       lpr -d -J BBoards bboards.dvi
  7591. --- 50,52 ----
  7592.       lpr -t -J ADMIN ADMIN.cat
  7593. !     lpr -t -J MH-CHANGES mh-changes.cat
  7594.       lpr -d -J BBoards bboards.dvi
  7595. ***************
  7596. *** 83,89 ****
  7597.   
  7598. ! mh6.7.cat \
  7599. ! mh6.7.doc \
  7600. ! mh6.7.imp:    true
  7601. !         cd ../papers/mh6.7; make $@
  7602. !         cp ../papers/mh6.7/$@ $@
  7603.   
  7604. --- 83,89 ----
  7605.   
  7606. ! mh-changes.cat \
  7607. ! mh-changes.doc \
  7608. ! mh-changes.imp:    true
  7609. !         cd ../papers/changes; make $@
  7610. !         cp ../papers/changes/$@ $@
  7611.   
  7612. *** ../mh-6.7.2/conf/makefiles/doc    Wed Jan 29 15:33:36 1992
  7613. --- conf/makefiles/doc    Thu Oct 29 22:47:50 1992
  7614. ***************
  7615. *** 4,6 ****
  7616.   #    @(MHWARNING)
  7617. ! # @(#)$Id: doc,v 2.13 1992/01/29 23:33:31 jromine Exp $
  7618.   ##############################################################################
  7619. --- 4,6 ----
  7620.   #    @(MHWARNING)
  7621. ! # @(#)$Id: doc,v 2.24 1992/10/28 17:01:04 jromine Exp $
  7622.   ##############################################################################
  7623. ***************
  7624. *** 9,11 ****
  7625.   ETCDIR    =    $(DESTDIR)@(MHETCPATH)
  7626. ! MANDIR    =    @(MHMANDIR)
  7627.   DIR1    =    @(MHMANDIR1)
  7628. --- 9,11 ----
  7629.   ETCDIR    =    $(DESTDIR)@(MHETCPATH)
  7630. ! MANDIR    =    $(DESTDIR)@(MHMANDIR)
  7631.   DIR1    =    @(MHMANDIR1)
  7632. ***************
  7633. *** 34,37 ****
  7634.           mark.$(EXT1) mh-chart.$(EXT1) mh.$(EXT1) mhl.$(EXT1) \
  7635. !         mhook.$(EXT1) mhmail.$(EXT1) mhpath.$(EXT1) msgchk.$(EXT1) \
  7636.           msh.$(EXT1) next.$(EXT1) packf.$(EXT1) pick.$(EXT1) \
  7637.           prev.$(EXT1) prompter.$(EXT1) rcvstore.$(EXT1) refile.$(EXT1) \
  7638. --- 34,44 ----
  7639.           mark.$(EXT1) mh-chart.$(EXT1) mh.$(EXT1) mhl.$(EXT1) \
  7640. !         mhook.$(EXT1) mhmail.$(EXT1) \
  7641. ! @BEGIN: MIME
  7642. !         mhn.$(EXT1) \
  7643. ! @END: MIME
  7644. !         mhparam.$(EXT1) mhpath.$(EXT1) msgchk.$(EXT1) \
  7645.           msh.$(EXT1) next.$(EXT1) packf.$(EXT1) pick.$(EXT1) \
  7646. + @BEGIN: MPOP
  7647. +         popi.$(EXT1) \
  7648. + @END: MPOP
  7649.           prev.$(EXT1) prompter.$(EXT1) rcvstore.$(EXT1) refile.$(EXT1) \
  7650. ***************
  7651. *** 38,40 ****
  7652.           repl.$(EXT1) rmf.$(EXT1) rmm.$(EXT1) scan.$(EXT1) \
  7653. !         send.$(EXT1) show.$(EXT1) sortm.$(EXT1) vmh.$(EXT1) \
  7654.           whatnow.$(EXT1) whom.$(EXT1) $(OPTIONS1)  $(OPTIONS2)
  7655. --- 45,48 ----
  7656.           repl.$(EXT1) rmf.$(EXT1) rmm.$(EXT1) scan.$(EXT1) \
  7657. !         send.$(EXT1) show.$(EXT1) slocal.$(EXT1) \
  7658. !         sortm.$(EXT1) vmh.$(EXT1) \
  7659.           whatnow.$(EXT1) whom.$(EXT1) $(OPTIONS1)  $(OPTIONS2)
  7660. ***************
  7661. *** 41,44 ****
  7662.   man1    =    ali anno burst comp dist folder forw inc mark mh-chart mh mhl \
  7663. !         mhook mhmail mhpath msgchk msh next packf pick prev prompter \
  7664. !         rcvstore refile repl rmf rmm scan send show sortm vmh whatnow \
  7665.           whom $(options1) $(options2)
  7666. --- 49,61 ----
  7667.   man1    =    ali anno burst comp dist folder forw inc mark mh-chart mh mhl \
  7668. !         mhook mhmail \
  7669. ! @BEGIN: MIME
  7670. !         mhn \
  7671. ! @END: MIME
  7672. !         mhparam mhpath msgchk msh next packf pick \
  7673. ! @BEGIN: MPOP
  7674. !         popi \
  7675. ! @END: MPOP
  7676. !         prev prompter \
  7677. !         rcvstore refile repl rmf rmm scan send show slocal \
  7678. !         sortm vmh whatnow \
  7679.           whom $(options1) $(options2)
  7680. ***************
  7681. *** 46,51 ****
  7682.           inst-forw inst-inc inst-mark inst-mh-chart inst-mh inst-mhl \
  7683. !         inst-mhook inst-mhmail inst-mhpath inst-msgchk inst-msh \
  7684. !         inst-next inst-packf inst-pick inst-prev inst-prompter \
  7685.           inst-rcvstore inst-refile inst-repl inst-rmf inst-rmm \
  7686. !         inst-scan inst-send inst-show inst-sortm inst-vmh \
  7687.           inst-whatnow inst-whom $(inst-options1) $(inst-options2)
  7688. --- 63,76 ----
  7689.           inst-forw inst-inc inst-mark inst-mh-chart inst-mh inst-mhl \
  7690. !         inst-mhook inst-mhmail \
  7691. ! @BEGIN: MIME
  7692. !         inst-mhn \
  7693. ! @END: MIME
  7694. !         inst-mhparam inst-mhpath inst-msgchk inst-msh \
  7695. !         inst-next inst-packf inst-pick \
  7696. ! @BEGIN: MPOP
  7697. !         inst-popi \
  7698. ! @END: MPOP
  7699. !         inst-prev inst-prompter \
  7700.           inst-rcvstore inst-refile inst-repl inst-rmf inst-rmm \
  7701. !         inst-scan inst-send inst-show inst-slocal inst-sortm inst-vmh \
  7702.           inst-whatnow inst-whom $(inst-options1) $(inst-options2)
  7703. ***************
  7704. *** 53,58 ****
  7705.           forw.man inc.man mark.man mh-chart.man mh.man mhl.man \
  7706. !         mhook.man mhmail.man mhpath.man msgchk.man msh.man next.man \
  7707. !         packf.man pick.man prev.man prompter.man rcvstore.man \
  7708.           refile.man repl.man rmf.man rmm.man scan.man send.man \
  7709. !         show.man sortm.man vmh.man whatnow.man whom.man $(Toptions1) \
  7710.           $(Toptions2)
  7711. --- 78,91 ----
  7712.           forw.man inc.man mark.man mh-chart.man mh.man mhl.man \
  7713. !         mhook.man mhmail.man \
  7714. ! @BEGIN: MIME
  7715. !         mhn.man \
  7716. ! @END: MIME
  7717. !         mhparam.man mhpath.man msgchk.man msh.man next.man packf.man \
  7718. ! @BEGIN: MPOP
  7719. !         popi.man \
  7720. ! @END: MPOP
  7721. !         pick.man prev.man prompter.man rcvstore.man \
  7722.           refile.man repl.man rmf.man rmm.man scan.man send.man \
  7723. !         show.man slocal.man \
  7724. !         sortm.man vmh.man whatnow.man whom.man $(Toptions1) \
  7725.           $(Toptions2)
  7726. ***************
  7727. *** 60,67 ****
  7728.   MAN5    =    mh-alias.$(EXT5) mh-format.$(EXT5) mh-mail.$(EXT5) \
  7729. !         mh-profile.$(EXT5) mh-sequence.$(EXT5)
  7730. ! man5    =    mh-alias mh-format mh-mail mh-profile mh-sequence
  7731.   inst-man5=    inst-mh-alias inst-mh-format inst-mh-mail inst-mh-profile \
  7732. !         inst-mh-sequence
  7733.   Tman5    =    mh-alias.man mh-format.man mh-mail.man mh-profile.man \
  7734. !         mh-sequence.man
  7735.   
  7736. --- 93,100 ----
  7737.   MAN5    =    mh-alias.$(EXT5) mh-format.$(EXT5) mh-mail.$(EXT5) \
  7738. !         mh-profile.$(EXT5) mh-sequence.$(EXT5) mh-tailor.$(EXT5)
  7739. ! man5    =    mh-alias mh-format mh-mail mh-profile mh-sequence mh-tailor 
  7740.   inst-man5=    inst-mh-alias inst-mh-format inst-mh-mail inst-mh-profile \
  7741. !         inst-mh-sequence inst-mh-tailor 
  7742.   Tman5    =    mh-alias.man mh-format.man mh-mail.man mh-profile.man \
  7743. !         mh-sequence.man mh-tailor.man 
  7744.   
  7745. ***************
  7746. *** 68,75 ****
  7747.   MAN8    =    ap.$(EXT8) conflict.$(EXT8) dp.$(EXT8) install-mh.$(EXT8) \
  7748. !         post.$(EXT8) mh-tailor.$(EXT8) fmtdump.$(EXT8)
  7749. ! man8    =    ap conflict dp install-mh post mh-tailor fmtdump
  7750. ! inst-man8=    inst-ap inst-conflict inst-dp inst-install-mh inst-post \
  7751. !         inst-mh-tailor inst-fmtdump
  7752. ! Tman8    =    ap.man conflict.man dp.man install-mh.man post.man \
  7753. !         mh-tailor.man fmtdump.man
  7754.   
  7755. --- 101,123 ----
  7756.   MAN8    =    ap.$(EXT8) conflict.$(EXT8) dp.$(EXT8) install-mh.$(EXT8) \
  7757. ! @BEGIN: APOP
  7758. !         popauth.$(EXT8) \
  7759. ! @END: APOP
  7760. !         post.$(EXT8) fmtdump.$(EXT8) 
  7761. ! man8    =    ap conflict dp install-mh \
  7762. ! @BEGIN: APOP
  7763. !         popauth \
  7764. ! @END: APOP
  7765. !         post fmtdump 
  7766. ! inst-man8=    inst-ap inst-conflict inst-dp inst-install-mh \
  7767. ! @BEGIN: APOP
  7768. !         inst-popauth \
  7769. ! @END: APOP
  7770. !         inst-post \
  7771. !         inst-fmtdump 
  7772. ! Tman8    =    ap.man conflict.man dp.man install-mh.man \
  7773. ! @BEGIN: APOP
  7774. !         popauth.man \
  7775. ! @END: APOP
  7776. !         post.man \
  7777. !         fmtdump.man 
  7778.   
  7779. ***************
  7780. *** 117,129 ****
  7781.   
  7782. ! i-all:        manual guide
  7783.   
  7784. ! i-print:    manual guide true
  7785. !         lpr -t -J MH MH.cat
  7786. !         lpr -t -J MH ADMIN.cat
  7787.   
  7788. - 
  7789. - manual:        MH.cat
  7790. - 
  7791. - guide:        ADMIN.cat
  7792. - 
  7793.   true:;
  7794. --- 165,170 ----
  7795.   
  7796. ! manual:        MH.doc
  7797.   
  7798. ! guide:        ADMIN.doc
  7799.   
  7800.   true:;
  7801. ***************
  7802. *** 361,365 ****
  7803.   
  7804. ! inst-mh-tailor:    $(MANDIR)/$(DIR8)/mh-tailor.$(EXT8)
  7805.   
  7806. ! $(MANDIR)/$(DIR8)/mh-tailor.$(EXT8):    mh-tailor.man
  7807.           -$(REMOVE) $@ zmh-tailor.man
  7808. --- 402,406 ----
  7809.   
  7810. ! inst-mh-tailor:    $(MANDIR)/$(DIR5)/mh-tailor.$(EXT5)
  7811.   
  7812. ! $(MANDIR)/$(DIR5)/mh-tailor.$(EXT5):    mh-tailor.man
  7813.           -$(REMOVE) $@ zmh-tailor.man
  7814. ***************
  7815. *** 424,425 ****
  7816. --- 465,484 ----
  7817.   
  7818. + inst-mhn:    $(MANDIR)/$(DIR1)/mhn.$(EXT1)
  7819. + 
  7820. + $(MANDIR)/$(DIR1)/mhn.$(EXT1):    mhn.man
  7821. +         -$(REMOVE) $@ zmhn.man
  7822. +         cp mhn.man $@
  7823. +         -@chmod $(MANPROT) $@
  7824. +         -@ls -l $@
  7825. +         -@echo ""
  7826. + 
  7827. + inst-mhparam:    $(MANDIR)/$(DIR1)/mhparam.$(EXT1)
  7828. + 
  7829. + $(MANDIR)/$(DIR1)/mhparam.$(EXT1):    mhparam.man
  7830. +         -$(REMOVE) $@ zmhparam.man
  7831. +         cp mhparam.man $@
  7832. +         -@chmod $(MANPROT) $@
  7833. +         -@ls -l $@
  7834. +         -@echo ""
  7835. + 
  7836.   inst-mhpath:    $(MANDIR)/$(DIR1)/mhpath.$(EXT1)
  7837. ***************
  7838. *** 469,470 ****
  7839. --- 528,547 ----
  7840.   
  7841. + inst-popauth:    $(MANDIR)/$(DIR8)/popauth.$(EXT8)
  7842. + 
  7843. + $(MANDIR)/$(DIR8)/popauth.$(EXT8):    popauth.man
  7844. +         -$(REMOVE) $@ zpopauth.man
  7845. +         cp popauth.man $@
  7846. +         -@chmod $(MANPROT) $@
  7847. +         -@ls -l $@
  7848. +         -@echo ""
  7849. + 
  7850. + inst-popi:    $(MANDIR)/$(DIR1)/popi.$(EXT1)
  7851. + 
  7852. + $(MANDIR)/$(DIR1)/popi.$(EXT1):    popi.man
  7853. +         -$(REMOVE) $@ zpopi.man
  7854. +         cp popi.man $@
  7855. +         -@chmod $(MANPROT) $@
  7856. +         -@ls -l $@
  7857. +         -@echo ""
  7858. + 
  7859.   inst-pick:    $(MANDIR)/$(DIR1)/pick.$(EXT1)
  7860. ***************
  7861. *** 577,578 ****
  7862. --- 654,664 ----
  7863.   
  7864. + inst-slocal:    $(MANDIR)/$(DIR1)/slocal.$(EXT1)
  7865. + 
  7866. + $(MANDIR)/$(DIR1)/slocal.$(EXT1):    slocal.man
  7867. +         -$(REMOVE) $@ zslocal.man
  7868. +         cp slocal.man $@
  7869. +         -@chmod $(MANPROT) $@
  7870. +         -@ls -l $@
  7871. +         -@echo ""
  7872. + 
  7873.   inst-sortm:    $(MANDIR)/$(DIR1)/sortm.$(EXT1)
  7874. ***************
  7875. *** 658,660 ****
  7876. --- 744,748 ----
  7877.   mhmail:        mhmail.man
  7878. + mhparam:    mhparam.man
  7879.   mhpath:        mhpath.man
  7880. + mhn:        mhn.man
  7881.   msgchk:        msgchk.man
  7882. ***************
  7883. *** 664,665 ****
  7884. --- 752,755 ----
  7885.   pick:        pick.man
  7886. + popauth:    popauth.man
  7887. + popi:        popi.man
  7888.   post:        post.man
  7889. ***************
  7890. *** 675,676 ****
  7891. --- 765,767 ----
  7892.   show:        show.man
  7893. + slocal:        slocal.man
  7894.   sortm:        sortm.man
  7895. ***************
  7896. *** 683,690 ****
  7897.           dist.me folder.me forw.me inc.me mark.me mh-chart.me mh.me \
  7898. !         mhl.me mhmail.me mhook.me mhpath.me msgchk.me msh.me next.me \
  7899. !         packf.me pick.me prev.me prompter.me rcvstore.me refile.me \
  7900. !         repl.me rmf.me rmm.me scan.me send.me show.me sortm.me vmh.me \
  7901. !         whatnow.me whom.me mh-alias.me mh-format.me mh-mail.me \
  7902. !         mh-profile.me mh-sequence.me \
  7903. !         ap.me conflict.me dp.me install-mh.me fmtdump.me post.me \
  7904.   @BEGIN: TMA
  7905. --- 774,791 ----
  7906.           dist.me folder.me forw.me inc.me mark.me mh-chart.me mh.me \
  7907. !         mhl.me mhmail.me \
  7908. ! @BEGIN: MIME
  7909. !         mhn.me \
  7910. ! @END: MIME
  7911. !         mhook.me mhparam.me mhpath.me msgchk.me msh.me \
  7912. !         next.me packf.me pick.me \
  7913. ! @BEGIN: MPOP
  7914. !         popi.me \
  7915. ! @END: MPOP
  7916. !         prev.me prompter.me \
  7917. !         rcvstore.me refile.me repl.me rmf.me rmm.me scan.me send.me \
  7918. !         show.me slocal.me \
  7919. !         sortm.me vmh.me whatnow.me whom.me mh-alias.me \
  7920. !         mh-format.me mh-mail.me mh-profile.me mh-sequence.me \
  7921. !         ap.me conflict.me dp.me install-mh.me fmtdump.me \
  7922. !         post.me \
  7923.   @BEGIN: TMA
  7924. ***************
  7925. *** 697,699 ****
  7926.           bboards5.me bbaka.me bbexp.me bboards8.me bbtar.me \
  7927. !         pop5.me pop8.me popaka.me popd.me popwrd.me \
  7928.           mf.me rmail.me \
  7929. --- 798,804 ----
  7930.           bboards5.me bbaka.me bbexp.me bboards8.me bbtar.me \
  7931. !         pop5.me pop8.me popaka.me \
  7932. ! @BEGIN: APOP
  7933. !         popauth.me \
  7934. ! @END: APOP
  7935. !         popd.me popwrd.me \
  7936.           mf.me rmail.me \
  7937. *** ../mh-6.7.2/conf/makefiles/mts/mh    Thu Apr  5 16:05:10 1990
  7938. --- conf/makefiles/mts/mh    Fri Nov 20 09:14:18 1992
  7939. ***************
  7940. *** 4,6 ****
  7941.   #    @(MHWARNING)
  7942. ! # @(#)$Id: mh,v 1.6 90/04/05 15:15:55 sources Exp $
  7943.   ##############################################################################
  7944. --- 4,6 ----
  7945.   #    @(MHWARNING)
  7946. ! # @(#)$Id: mh,v 1.10 1992/11/20 17:14:07 jromine Exp $
  7947.   ##############################################################################
  7948. ***************
  7949. *** 20,21 ****
  7950. --- 20,23 ----
  7951.   LLIBS    =    
  7952. + CP    =    @(CP)
  7953. + LN    =    @(LN)
  7954.   
  7955. ***************
  7956. *** 59,63 ****
  7957.           -rm -f ../libmts.a
  7958. !         ln $@ ../libmts.a
  7959.           -rm -f ../llib-lmts
  7960. !         -ln llib-lmhmts ../llib-lmts
  7961.           -@ls -l $@
  7962. --- 61,65 ----
  7963.           -rm -f ../libmts.a
  7964. !         -cd ..; $(LN) mh/$@ libmts.a
  7965.           -rm -f ../llib-lmts
  7966. !         -cd .. ; $(LN) mh/llib-lmhmts llib-lmts
  7967.           -@ls -l $@
  7968. *** ../mh-6.7.2/conf/makefiles/mts/mmdf    Thu Apr  5 16:05:11 1990
  7969. --- conf/makefiles/mts/mmdf    Fri Nov 20 09:14:17 1992
  7970. ***************
  7971. *** 4,6 ****
  7972.   #    @(MHWARNING)
  7973. ! # @(#)$Id: mmdf,v 1.6 90/04/05 15:16:01 sources Exp $
  7974.   ##############################################################################
  7975. --- 4,6 ----
  7976.   #    @(MHWARNING)
  7977. ! # @(#)$Id: mmdf,v 1.10 1992/11/20 17:14:07 jromine Exp $
  7978.   ##############################################################################
  7979. ***************
  7980. *** 20,21 ****
  7981. --- 20,23 ----
  7982.   LLIBS    =
  7983. + CP    =    @(CP)
  7984. + LN    =    @(LN)
  7985.   
  7986. ***************
  7987. *** 68,72 ****
  7988.           -rm -f ../libmts.a
  7989. !         ln $@ ../libmts.a
  7990.           -rm -f ../llib-lmts
  7991. !         -ln llib-lmmdf ../llib-lmts
  7992.           -@ls -l $@
  7993. --- 70,74 ----
  7994.           -rm -f ../libmts.a
  7995. !         -cd ..; $(LN) mmdf/$@ libmts.a
  7996.           -rm -f ../llib-lmts
  7997. !         -cd .. ; $(LN) mmdf/llib-lmmdf llib-lmts
  7998.           -@ls -l $@
  7999. ***************
  8000. *** 90,94 ****
  8001.           -rm -f ../libmts.a
  8002. !         ln $@ ../libmts.a
  8003.           -rm -f ../llib-lmts
  8004. !         -ln llib-lmmdf ../llib-lmts
  8005.           -@ls -l $@
  8006. --- 92,96 ----
  8007.           -rm -f ../libmts.a
  8008. !         -cd ..; $(LN) mmdf/$@ libmts.a
  8009.           -rm -f ../llib-lmts
  8010. !         -cd ..; $(LN) mmdf/llib-lmmdf llib-lmts
  8011.           -@ls -l $@
  8012. *** ../mh-6.7.2/conf/makefiles/mts/sendmail    Thu Apr  5 16:05:10 1990
  8013. --- conf/makefiles/mts/sendmail    Fri Nov 20 09:14:16 1992
  8014. ***************
  8015. *** 4,6 ****
  8016.   #    @(MHWARNING)
  8017. ! # @(#)$Id: sendmail,v 1.6 90/04/05 15:15:48 sources Exp $
  8018.   ##############################################################################
  8019. --- 4,6 ----
  8020.   #    @(MHWARNING)
  8021. ! # @(#)$Id: sendmail,v 1.10 1992/11/20 17:14:07 jromine Exp $
  8022.   ##############################################################################
  8023. ***************
  8024. *** 18,19 ****
  8025. --- 18,21 ----
  8026.   LFLAGS    =    -bhu $(OPTIONS)
  8027. + CP    =    @(CP)
  8028. + LN    =    @(LN)
  8029.   
  8030. ***************
  8031. *** 58,62 ****
  8032.           -rm -f ../libmts.a
  8033. !         ln $@ ../libmts.a
  8034.           -rm -f ../llib-lmts
  8035. !         -ln llib-lsendmail ../llib-lmts
  8036.           -@ls -l $@
  8037. --- 60,64 ----
  8038.           -rm -f ../libmts.a
  8039. !         -cd ..; $(LN) sendmail/$@ libmts.a
  8040.           -rm -f ../llib-lmts
  8041. !         -cd .. ; $(LN) sendmail/llib-lsendmail llib-lmts
  8042.           -@ls -l $@
  8043. *** ../mh-6.7.2/conf/makefiles/papers    Thu Apr  5 16:05:20 1990
  8044. --- conf/makefiles/papers    Wed Dec  2 13:57:38 1992
  8045. ***************
  8046. *** 4,6 ****
  8047.   #    @(MHWARNING)
  8048. ! # @(#)$Id: papers,v 2.5 90/04/05 15:18:04 sources Exp $
  8049.   ##############################################################################
  8050. --- 4,6 ----
  8051.   #    @(MHWARNING)
  8052. ! # @(#)$Id: papers,v 2.6 1992/12/02 21:57:34 jromine Exp $
  8053.   ##############################################################################
  8054. ***************
  8055. *** 10,12 ****
  8056.   
  8057. ! DIRS    =    bboards beginners mh4 mh4mm mh5 mh6.5 mh6.7 \
  8058.           multifarious mznet realwork trusted tutorial
  8059. --- 10,12 ----
  8060.   
  8061. ! DIRS    =    bboards beginners changes mh4 mh4mm mh5 mh6.5 \
  8062.           multifarious mznet realwork trusted tutorial
  8063. *** ../mh-6.7.2/conf/makefiles/sbr    Thu Jan 30 08:36:20 1992
  8064. --- conf/makefiles/sbr    Wed Nov 18 08:52:40 1992
  8065. ***************
  8066. *** 4,6 ****
  8067.   #    @(MHWARNING)
  8068. ! # @(#)$Id: sbr,v 2.12 1992/01/30 16:36:16 jromine Exp $
  8069.   ##############################################################################
  8070. --- 4,6 ----
  8071.   #    @(MHWARNING)
  8072. ! # @(#)$Id: sbr,v 2.19 1992/11/12 22:47:24 jromine Exp $
  8073.   ##############################################################################
  8074. ***************
  8075. *** 25,27 ****
  8076.   @BEGIN: SHAREDLIB
  8077. ! LIBS     =    shared libmh.a libmh.so libmh.sa
  8078.   SLIBVER    =    @(SLIBVER)
  8079. --- 25,30 ----
  8080.   @BEGIN: SHAREDLIB
  8081. ! @BEGIN: SUN4SHLIB
  8082. ! LIBSA    =    libmh.sa
  8083. ! @END: SUN4SHLIB
  8084. ! LIBS     =    shared libmh.a libmh.so $(LIBSA)
  8085.   SLIBVER    =    @(SLIBVER)
  8086. ***************
  8087. *** 28,29 ****
  8088. --- 31,33 ----
  8089.   SLIBDIR =    @(SLIBDIR)
  8090. + SLFLAGS=    @(SLFLAGS)
  8091.   @END: SHAREDLIB
  8092. ***************
  8093. *** 42,44 ****
  8094.           m_setseq.c m_setvis.c m_sync.c m_tmpfil.c m_update.c \
  8095. !         m_whatnow.c makedir.c path.c peekc.c pidwait.c pidstatus.c \
  8096.           printsw.c push.c putenv.c pwd.c refile.c remdir.c r1bindex.c \
  8097. --- 46,48 ----
  8098.           m_setseq.c m_setvis.c m_sync.c m_tmpfil.c m_update.c \
  8099. !         makedir.c path.c peekc.c pidwait.c pidstatus.c \
  8100.           printsw.c push.c putenv.c pwd.c refile.c remdir.c r1bindex.c \
  8101. ***************
  8102. *** 58,60 ****
  8103.           m_setseq.o m_setvis.o m_sync.o m_tmpfil.o m_update.o \
  8104. !         m_whatnow.o makedir.o path.o peekc.o pidwait.o pidstatus.o \
  8105.           printsw.o push.o putenv.o pwd.o refile.o remdir.o r1bindex.o \
  8106. --- 62,64 ----
  8107.           m_setseq.o m_setvis.o m_sync.o m_tmpfil.o m_update.o \
  8108. !         makedir.o path.o peekc.o pidwait.o pidstatus.o \
  8109.           printsw.o push.o putenv.o pwd.o refile.o remdir.o r1bindex.o \
  8110. ***************
  8111. *** 75,77 ****
  8112.           -rm -f $@ shared/$@
  8113. !         $(CC) $(CFLAGS) -c -pic $*.c
  8114.           mv $@ shared/$@
  8115. --- 79,81 ----
  8116.           -rm -f $@ shared/$@
  8117. !         $(CC) $(CFLAGS) -c $(SLFLAGS) $*.c
  8118.           mv $@ shared/$@
  8119. ***************
  8120. *** 109,111 ****
  8121. --- 113,120 ----
  8122.           -mv -f $@ z$@
  8123. + @BEGIN: SUN4SHLIB
  8124.           (cd shared; ld -o ../$@ -assert pure-text $(OFILES))
  8125. + @END: SUN4SHLIB
  8126. + @BEGIN: SYS5SHLIB
  8127. +         (cd shared; ld -G -o ../$@ -h $@.$(SLIBVER) $(OFILES))
  8128. + @END: SYS5SHLIB
  8129.           -@rm -f $@.$(SLIBVER)
  8130. ***************
  8131. *** 115,116 ****
  8132. --- 124,126 ----
  8133.   
  8134. + @BEGIN: SUN4SHLIB
  8135.   libmh.sa:    $(ODEFS)
  8136. ***************
  8137. *** 127,128 ****
  8138. --- 137,139 ----
  8139.           -@echo "MH data interface description built normally"
  8140. + @END: SUN4SHLIB
  8141.   
  8142. ***************
  8143. *** 136,138 ****
  8144.   @BEGIN: SHAREDLIB
  8145. ! inst-lib:    libmh.so libmh.sa
  8146.           -rm -f $(SLIBDIR)/libmh.so.$(SLIBVER)
  8147. --- 147,149 ----
  8148.   @BEGIN: SHAREDLIB
  8149. ! inst-lib:    libmh.so $(LIBSA)
  8150.           -rm -f $(SLIBDIR)/libmh.so.$(SLIBVER)
  8151. ***************
  8152. *** 143,144 ****
  8153. --- 154,156 ----
  8154.           -@echo ""
  8155. + @BEGIN: SUN4SHLIB
  8156.           -rm -f $(SLIBDIR)/libmh.sa.$(SLIBVER)
  8157. ***************
  8158. *** 146,147 ****
  8159. --- 158,162 ----
  8160.           -@chmod $(PGMPROT) $(SLIBDIR)/libmh.sa.$(SLIBVER)
  8161. + @BEGIN: RANLIB
  8162. +         cd $(SLIBDIR); ranlib libmh.sa.$(SLIBVER)
  8163. + @END: RANLIB
  8164.           -@ls -l $(SLIBDIR)/libmh.sa.*
  8165. ***************
  8166. *** 149,150 ****
  8167. --- 164,166 ----
  8168.           -@echo ""
  8169. + @END: SUN4SHLIB
  8170.   @END: SHAREDLIB
  8171. ***************
  8172. *** 414,418 ****
  8173.   #m_update.o: /usr/include/signal.h
  8174. - m_whatnow.o: m_whatnow.c
  8175. - m_whatnow.o: ../h/mh.h
  8176. - #m_whatnow.o: /usr/include/stdio.h
  8177.   makedir.o: makedir.c
  8178. --- 430,431 ----
  8179. *** ../mh-6.7.2/conf/makefiles/support/bboards    Tue Dec 18 13:34:39 1990
  8180. --- conf/makefiles/support/bboards    Tue Nov  3 19:30:52 1992
  8181. ***************
  8182. *** 4,6 ****
  8183.   #    @(MHWARNING)
  8184. ! # @(#)$Id: bboards,v 2.9 90/12/18 13:34:38 mh Exp $
  8185.   ##############################################################################
  8186. --- 4,6 ----
  8187.   #    @(MHWARNING)
  8188. ! # @(#)$Id: bboards,v 2.12 1992/11/04 03:30:31 jromine Exp $
  8189.   ##############################################################################
  8190. ***************
  8191. *** 41,45 ****
  8192.   LDFLAGS    =    $(LDOPTIONS)
  8193. ! LIBES1    =    ../../zotnet/libzot.a
  8194.   @BEGIN: STDLIB
  8195. ! LIBES2    =    ../../config/config.o ../../sbr/libmh.a $(LIBES1)
  8196.   LDLIBS1    =    $(LIBES1) $(LDOPTLIB)
  8197. --- 41,46 ----
  8198.   LDFLAGS    =    $(LDOPTIONS)
  8199. ! LIBES1    =    ../../zotnet/libzot.a ../../mts/libmts.a
  8200.   @BEGIN: STDLIB
  8201. ! LIBES2    =    ../../config/config.o ../../config/version.o \
  8202. !         ../../sbr/libmh.a $(LIBES1)
  8203.   LDLIBS1    =    $(LIBES1) $(LDOPTLIB)
  8204. ***************
  8205. *** 47,50 ****
  8206.   @END: STDLIB
  8207.   @BEGIN: SHAREDLIB
  8208. ! LIBES2    =    ../../config/config.o ../../sbr/libmh.so $(LIBES1)
  8209.   LDLIBS1    =    $(LIBES1) $(LDOPTLIB)
  8210. --- 48,55 ----
  8211.   @END: STDLIB
  8212. + @BEGIN: SUN4SHLIB
  8213. + SLIBVER    =    .@(SLIBVER)
  8214. + @END: SUN4SHLIB
  8215.   @BEGIN: SHAREDLIB
  8216. ! LIBES2    =    ../../config/config.o ../../config/version.o \
  8217. !         ../../sbr/libmh.so $(LIBES1)
  8218.   LDLIBS1    =    $(LIBES1) $(LDOPTLIB)
  8219. ***************
  8220. *** 51,54 ****
  8221.   LDLIBS2    =    $(LIBES2) $(LDOPTLIB)
  8222. ! LDLIBS2    =    ../../config/config.o -Bdynamic @(SLDFLAG) -lmh \
  8223. !         $(LIBES1) $(LDOPTLIB)
  8224.   @END: SHAREDLIB
  8225. --- 56,59 ----
  8226.   LDLIBS2    =    $(LIBES2) $(LDOPTLIB)
  8227. ! LDLIBS2    =    ../../config/config.o ../../config/version.o \
  8228. !         -Bdynamic @(SLDFLAG) -lmh$(SLIBVER) $(LIBES1) $(LDOPTLIB)
  8229.   @END: SHAREDLIB
  8230. ***************
  8231. *** 252,253 ****
  8232. --- 257,259 ----
  8233.   unconfig:    distribution
  8234. +         -rm -f mmdfII/bboards/lock.c
  8235.           -rm -f Makefile
  8236. *** ../mh-6.7.2/conf/makefiles/support/general    Thu Apr  5 16:05:13 1990
  8237. --- conf/makefiles/support/general    Fri Nov 20 20:00:41 1992
  8238. ***************
  8239. *** 4,6 ****
  8240.   #    @(MHWARNING)
  8241. ! # @(#)$Id: general,v 1.10 90/04/05 15:16:25 sources Exp $
  8242.   ##############################################################################
  8243. --- 4,6 ----
  8244.   #    @(MHWARNING)
  8245. ! # @(#)$Id: general,v 1.18 1992/10/28 18:56:06 jromine Exp $
  8246.   ##############################################################################
  8247. ***************
  8248. *** 16,17 ****
  8249. --- 16,22 ----
  8250.   @END: BBSERVER
  8251. + @BEGIN: MIME
  8252. + IOPTMIME=    inst-mhndefs inst-viamail
  8253. + UOPTMIME=    mhn_defaults viamail
  8254. + TOPTMIME=    mhn_defaults viamail
  8255. + @END: MIME
  8256.   REMOVE    =    @(MHREMOVE)
  8257. ***************
  8258. *** 18,19 ****
  8259. --- 23,26 ----
  8260.   FILPROT    =    0644
  8261. + PGMPROT    =    0755
  8262. + CP      =       @(CP)
  8263.   
  8264. ***************
  8265. *** 21,23 ****
  8266.           rcvdistcomps replcomps mhl.digest mhl.format mhl.forward \
  8267. !         mhl.body scan.mailx scan.size scan.time scan.timely $(TOPTMISC)
  8268.   
  8269. --- 28,31 ----
  8270.           rcvdistcomps replcomps mhl.digest mhl.format mhl.forward \
  8271. !         mhl.body mhl.headers scan.default scan.mailx scan.size \
  8272. !         scan.time scan.timely packmbox $(TOPTMISC) $(TOPTMIME)
  8273.   
  8274. ***************
  8275. *** 38,41 ****
  8276.           inst-forwcomps inst-rcvdistcomps inst-replcomps inst-digest \
  8277. !         inst-format inst-forward inst-body inst-mailx inst-size \
  8278. !         inst-time inst-timely $(IOPTMISC)
  8279.   
  8280. --- 46,50 ----
  8281.           inst-forwcomps inst-rcvdistcomps inst-replcomps inst-digest \
  8282. !         inst-format inst-forward inst-body inst-headers inst-mailx \
  8283. !         inst-default inst-size inst-time inst-timely \
  8284. !         inst-packmbox $(IOPTMISC) $(IOPTMIME)
  8285.   
  8286. ***************
  8287. *** 51,54 ****
  8288.               rcvdistcomps replcomps mhl.digest mhl.format mhl.forward \
  8289. !             mhl.body scan.mailx scan.size scan.time scan.timely \
  8290. !             $(UOPTMISC)
  8291.   
  8292. --- 60,64 ----
  8293.               rcvdistcomps replcomps mhl.digest mhl.format mhl.forward \
  8294. !             mhl.body mhl.headers scan.default scan.mailx scan.size \
  8295. !             scan.time scan.timely viamail packmbox \
  8296. !             $(UOPTMISC) $(UOPTMIME)
  8297.   
  8298. ***************
  8299. *** 64,66 ****
  8300.               $(REMOVE) $@ zMailAliases; \
  8301. !             cp MailAliases $@; \
  8302.           else \
  8303. --- 74,76 ----
  8304.               $(REMOVE) $@ zMailAliases; \
  8305. !             $(CP) MailAliases $@; \
  8306.           else \
  8307. ***************
  8308. *** 77,79 ****
  8309.           -$(REMOVE) $@ zcomponents
  8310. !         cp components $@
  8311.           -@chmod $(FILPROT) $@
  8312. --- 87,89 ----
  8313.           -$(REMOVE) $@ zcomponents
  8314. !         $(CP) components $@
  8315.           -@chmod $(FILPROT) $@
  8316. ***************
  8317. *** 87,89 ****
  8318.           -$(REMOVE) $@ zdigestcomps
  8319. !         cp digestcomps $@
  8320.           -@chmod $(FILPROT) $@
  8321. --- 97,99 ----
  8322.           -$(REMOVE) $@ zdigestcomps
  8323. !         $(CP) digestcomps $@
  8324.           -@chmod $(FILPROT) $@
  8325. ***************
  8326. *** 97,99 ****
  8327.           -$(REMOVE) $@ zdistcomps
  8328. !         cp distcomps $@
  8329.           -@chmod $(FILPROT) $@
  8330. --- 107,109 ----
  8331.           -$(REMOVE) $@ zdistcomps
  8332. !         $(CP) distcomps $@
  8333.           -@chmod $(FILPROT) $@
  8334. ***************
  8335. *** 107,109 ****
  8336.           -$(REMOVE) $@ zforwcomps
  8337. !         cp forwcomps $@
  8338.           -@chmod $(FILPROT) $@
  8339. --- 117,119 ----
  8340.           -$(REMOVE) $@ zforwcomps
  8341. !         $(CP) forwcomps $@
  8342.           -@chmod $(FILPROT) $@
  8343. ***************
  8344. *** 117,119 ****
  8345.           -$(REMOVE) $@ zrcvdistcomps
  8346. !         cp rcvdistcomps $@
  8347.           -@chmod $(FILPROT) $@
  8348. --- 127,129 ----
  8349.           -$(REMOVE) $@ zrcvdistcomps
  8350. !         $(CP) rcvdistcomps $@
  8351.           -@chmod $(FILPROT) $@
  8352. ***************
  8353. *** 127,129 ****
  8354.           -$(REMOVE) $@ zreplcomps
  8355. !         cp replcomps $@
  8356.           -@chmod $(FILPROT) $@
  8357. --- 137,139 ----
  8358.           -$(REMOVE) $@ zreplcomps
  8359. !         $(CP) replcomps $@
  8360.           -@chmod $(FILPROT) $@
  8361. ***************
  8362. *** 137,139 ****
  8363.           -$(REMOVE) $@ zmhl.digest
  8364. !         cp mhl.digest $@
  8365.           -@chmod $(FILPROT) $@
  8366. --- 147,149 ----
  8367.           -$(REMOVE) $@ zmhl.digest
  8368. !         $(CP) mhl.digest $@
  8369.           -@chmod $(FILPROT) $@
  8370. ***************
  8371. *** 147,149 ****
  8372.           -$(REMOVE) $@ zmhl.format
  8373. !         cp mhl.format $@
  8374.           -@chmod $(FILPROT) $@
  8375. --- 157,159 ----
  8376.           -$(REMOVE) $@ zmhl.format
  8377. !         $(CP) mhl.format $@
  8378.           -@chmod $(FILPROT) $@
  8379. ***************
  8380. *** 157,159 ****
  8381.           -$(REMOVE) $@ zmhl.forward
  8382. !         cp mhl.forward $@
  8383.           -@chmod $(FILPROT) $@
  8384. --- 167,169 ----
  8385.           -$(REMOVE) $@ zmhl.forward
  8386. !         $(CP) mhl.forward $@
  8387.           -@chmod $(FILPROT) $@
  8388. ***************
  8389. *** 167,169 ****
  8390.           -$(REMOVE) $@ zmhl.body
  8391. !         cp mhl.body $@
  8392.           -@chmod $(FILPROT) $@
  8393. --- 177,179 ----
  8394.           -$(REMOVE) $@ zmhl.body
  8395. !         $(CP) mhl.body $@
  8396.           -@chmod $(FILPROT) $@
  8397. ***************
  8398. *** 173,174 ****
  8399. --- 183,203 ----
  8400.   
  8401. + inst-headers:    $(ETCDIR)/mhl.headers
  8402. + 
  8403. + $(ETCDIR)/mhl.headers:    mhl.headers
  8404. +         -$(REMOVE) $@ zmhl.headers
  8405. +         cp mhl.headers $@
  8406. +         -@chmod $(FILPROT) $@
  8407. +         -@ls -l $@
  8408. +         -@echo ""
  8409. + 
  8410. + 
  8411. + inst-default:    $(ETCDIR)/scan.default
  8412. + 
  8413. + $(ETCDIR)/scan.default:    scan.default
  8414. +         -$(REMOVE) $@ zscan.default
  8415. +         $(CP) scan.default $@
  8416. +         -@chmod $(FILPROT) $@
  8417. +         -@ls -l $@
  8418. +         -@echo ""
  8419. + 
  8420.   inst-mailx:    $(ETCDIR)/scan.mailx
  8421. ***************
  8422. *** 177,179 ****
  8423.           -$(REMOVE) $@ zscan.mailx
  8424. !         cp scan.mailx $@
  8425.           -@chmod $(FILPROT) $@
  8426. --- 206,208 ----
  8427.           -$(REMOVE) $@ zscan.mailx
  8428. !         $(CP) scan.mailx $@
  8429.           -@chmod $(FILPROT) $@
  8430. ***************
  8431. *** 187,189 ****
  8432.           -$(REMOVE) $@ zscan.size
  8433. !         cp scan.size $@
  8434.           -@chmod $(FILPROT) $@
  8435. --- 216,218 ----
  8436.           -$(REMOVE) $@ zscan.size
  8437. !         $(CP) scan.size $@
  8438.           -@chmod $(FILPROT) $@
  8439. ***************
  8440. *** 197,199 ****
  8441.           -$(REMOVE) $@ zscan.time
  8442. !         cp scan.time $@
  8443.           -@chmod $(FILPROT) $@
  8444. --- 226,228 ----
  8445.           -$(REMOVE) $@ zscan.time
  8446. !         $(CP) scan.time $@
  8447.           -@chmod $(FILPROT) $@
  8448. ***************
  8449. *** 207,209 ****
  8450.           -$(REMOVE) $@ zscan.timely
  8451. !         cp scan.timely $@
  8452.           -@chmod $(FILPROT) $@
  8453. --- 236,238 ----
  8454.           -$(REMOVE) $@ zscan.timely
  8455. !         $(CP) scan.timely $@
  8456.           -@chmod $(FILPROT) $@
  8457. ***************
  8458. *** 213,214 ****
  8459. --- 242,253 ----
  8460.   
  8461. + inst-packmbox:    $(ETCDIR)/packmbox
  8462. + 
  8463. + $(ETCDIR)/packmbox:    packmbox.sh
  8464. +         -$(REMOVE) $@ zpackmbox.sh
  8465. +         cp packmbox.sh $@
  8466. +         -@chmod $(PGMPROT) $@
  8467. +         -@ls -l $@
  8468. +         -@echo ""
  8469. + 
  8470. + 
  8471.   inst-bboards:    $(ETCDIR)/BBoardAliases
  8472. ***************
  8473. *** 218,220 ****
  8474.               $(REMOVE) $@ zBBoardAliases; \
  8475. !             cp BBoardAliases $@; \
  8476.           else \
  8477. --- 257,259 ----
  8478.               $(REMOVE) $@ zBBoardAliases; \
  8479. !             $(CP) BBoardAliases $@; \
  8480.           else \
  8481. ***************
  8482. *** 228,229 ****
  8483. --- 267,291 ----
  8484.   
  8485. + inst-viamail:    $(ETCDIR)/viamail
  8486. + 
  8487. + $(ETCDIR)/viamail:    viamail.sh
  8488. +         -$(REMOVE) $@ zviamail.sh
  8489. +         cp viamail.sh $@
  8490. +         -@chmod $(PGMPROT) $@
  8491. +         -@ls -l $@
  8492. +         -@echo ""
  8493. + 
  8494. + 
  8495. + inst-mhndefs:    $(ETCDIR)/mhn_defaults
  8496. + 
  8497. + $(ETCDIR)/mhn_defaults:    true
  8498. +         -if [ ! -f $@ ]; then \
  8499. +             ./bootmhn.sh $(ETCDIR); \
  8500. +         else \
  8501. +             echo "Will not overwrite existing $@"; \
  8502. +         fi
  8503. +         -@chmod $(FILPROT) $@
  8504. +         -@ls -l $@
  8505. +         -@echo ""
  8506. + 
  8507. + 
  8508.   ##############################################################################
  8509. ***************
  8510. *** 242 ****
  8511. --- 304,306 ----
  8512.   unclean:;    -rm -f z* _* :* core MAKEGEN
  8513. + 
  8514. + true:;
  8515. *** ../mh-6.7.2/conf/makefiles/support/pop    Tue Dec 18 13:34:38 1990
  8516. --- conf/makefiles/support/pop    Tue Nov 24 20:19:04 1992
  8517. ***************
  8518. *** 4,6 ****
  8519.   #    @(MHWARNING)
  8520. ! # @(#)$Id: pop,v 2.9 90/12/18 13:34:33 mh Exp $
  8521.   ##############################################################################
  8522. --- 4,6 ----
  8523.   #    @(MHWARNING)
  8524. ! # @(#)$Id: pop,v 2.26 1992/11/25 04:18:59 jromine Exp $
  8525.   ##############################################################################
  8526. ***************
  8527. *** 9,11 ****
  8528.   BINDIR    =    $(DESTDIR)@(MHBINPATH)
  8529. ! ETCDIR    =    /usr/etc
  8530.   LIBDIR    =    $(DESTDIR)@(MHETCPATH)
  8531. --- 9,11 ----
  8532.   BINDIR    =    $(DESTDIR)@(MHBINPATH)
  8533. ! ETCDIR    =    $(DESTDIR)@(MHPOPDPATH)
  8534.   LIBDIR    =    $(DESTDIR)@(MHETCPATH)
  8535. ***************
  8536. *** 14,15 ****
  8537. --- 14,18 ----
  8538.   LDOPTLIB=    @(LDOPTLIB)
  8539. + @BEGIN: MPOP
  8540. + LDCURSES=    @(LDCURSES)
  8541. + @END: MPOP
  8542.   PGMPROT    =    0711
  8543. ***************
  8544. *** 18,24 ****
  8545.   POPUID    =    pop
  8546.   @BEGIN: POP
  8547. ! ALL    =    popd popaka popwrd popsbr
  8548. ! INST-ALL=    inst-popd inst-popaka inst-popwrd
  8549. ! LALL    =    l-popd l-popaka l-popwrd l-popsbr
  8550. ! TALL    =    xpopd xpopaka xpopwrd
  8551.   @END: POP
  8552. --- 21,33 ----
  8553.   POPUID    =    pop
  8554. + @BEGIN: APOP
  8555. + Apop    =    popauth
  8556. + IApop    =    inst-popauth
  8557. + Lpop    =    l-popauth
  8558. + Tpop    =    xpopauth
  8559. + @END: APOP
  8560.   @BEGIN: POP
  8561. ! ALL    =    popd popaka $(Apop) popwrd
  8562. ! INST-ALL=    inst-popd inst-popaka $(IApop) inst-popwrd
  8563. ! LALL    =    l-popd l-popaka $(Lpop) l-popwrd
  8564. ! TALL    =    xpopd xpopaka $(Tpop) xpopwrd
  8565.   @END: POP
  8566. ***************
  8567. *** 25,26 ****
  8568. --- 34,36 ----
  8569.   
  8570. + CP      =       @(CP)
  8571.   CC      =    @(MHCOMPILER)
  8572. ***************
  8573. *** 39,41 ****
  8574.   LDFLAGS    =    $(LDOPTIONS)
  8575. ! LIBES1    =    ../../zotnet/libzot.a
  8576.   @BEGIN: STDLIB
  8577. --- 49,51 ----
  8578.   LDFLAGS    =    $(LDOPTIONS)
  8579. ! LIBES1    =    ../../zotnet/libzot.a ../../mts/libmts.a
  8580.   @BEGIN: STDLIB
  8581. ***************
  8582. *** 45,46 ****
  8583. --- 55,59 ----
  8584.   @END: STDLIB
  8585. + @BEGIN: SUN4SHLIB
  8586. + SLIBVER    =    .@(SLIBVER)
  8587. + @END: SUN4SHLIB
  8588.   @BEGIN: SHAREDLIB
  8589. ***************
  8590. *** 49,51 ****
  8591.   LDLIBS2    =    ../../config/config.o ../../config/version.o \
  8592. !         -Bdynamic @(SLDFLAG) -lmh $(LIBES1) $(LDOPTLIB)
  8593.   @END: SHAREDLIB
  8594. --- 62,64 ----
  8595.   LDLIBS2    =    ../../config/config.o ../../config/version.o \
  8596. !         -Bdynamic @(SLDFLAG) -lmh$(SLIBVER) $(LIBES1) $(LDOPTLIB)
  8597.   @END: SHAREDLIB
  8598. ***************
  8599. *** 57,58 ****
  8600. --- 70,72 ----
  8601.   
  8602. + .c:;        echo $@
  8603.   
  8604. ***************
  8605. *** 81,82 ****
  8606. --- 95,97 ----
  8607.           -cd $(LIBDIR); rm -f popaka popwrd
  8608. +         -cd $(BINDIR); rm -f popauth
  8609.   
  8610. ***************
  8611. *** 92,94 ****
  8612.           -rm -f $@
  8613. !         cp xpopd $@
  8614.           -chmod 700 $@
  8615. --- 107,109 ----
  8616.           -rm -f $@
  8617. !         $(CP) xpopd $@
  8618.           -chmod 700 $@
  8619. ***************
  8620. *** 100,104 ****
  8621.   xpopd:        popd.o popser.o syslog.o \
  8622. !             ../../uip/dropsbr.o $(LIBES2)
  8623.           $(LD) $(LDFLAGS) -o $@ popd.o popser.o syslog.o \
  8624. !             ../../uip/dropsbr.o $(LDLIBS2)
  8625.   
  8626. --- 115,127 ----
  8627.   xpopd:        popd.o popser.o syslog.o \
  8628. !             ../../uip/dropsbr.o \
  8629. ! @BEGIN: MPOP
  8630. !             ../../uip/scansbr.o \
  8631. ! @END: MPOP
  8632. !             $(LIBES2)
  8633.           $(LD) $(LDFLAGS) -o $@ popd.o popser.o syslog.o \
  8634. !             ../../uip/dropsbr.o \
  8635. ! @BEGIN: MPOP
  8636. !             ../../uip/scansbr.o \
  8637. ! @END: MPOP
  8638. !             $(LDLIBS2) $(LDCURSES)
  8639.   
  8640. ***************
  8641. *** 105,107 ****
  8642.   l-popd:;    $(LINT) $(LFLAGS) popd.c popser.c \
  8643. !             ../../uip/dropsbr.c $(LLIBS2)
  8644.   
  8645. --- 128,134 ----
  8646.   l-popd:;    $(LINT) $(LFLAGS) popd.c popser.c \
  8647. !             ../../uip/dropsbr.c \
  8648. ! @BEGIN: MPOP
  8649. !             ../../uip/scansbr.c \
  8650. ! @END: MPOP
  8651. !             $(LLIBS2)
  8652.   
  8653. ***************
  8654. *** 116,118 ****
  8655.           -$(REMOVE) $@ zpopaka
  8656. !         cp xpopaka $@
  8657.           -@chmod $(PGMPROT) $@
  8658. --- 143,145 ----
  8659.           -$(REMOVE) $@ zpopaka
  8660. !         $(CP) xpopaka $@
  8661.           -@chmod $(PGMPROT) $@
  8662. ***************
  8663. *** 130,131 ****
  8664. --- 157,181 ----
  8665.   ################################################################
  8666. + # popauth
  8667. + ################################################################
  8668. + 
  8669. + inst-popauth:    $(BINDIR)/popauth
  8670. + 
  8671. + $(BINDIR)/popauth:    xpopauth
  8672. +         -$(REMOVE) $@ zpopauth
  8673. +         cp xpopauth $@
  8674. +         -@chmod $(PGMPROT) $@
  8675. +         -$(CHOWN) $(POPUID) $@
  8676. +         chmod u+s $@
  8677. +         -@ls -l $@
  8678. +         -@echo ""
  8679. + 
  8680. + popauth:    xpopauth
  8681. + 
  8682. + xpopauth:    popauth.o $(LIBES1)
  8683. +         $(LD) $(LDFLAGS) -o $@ popauth.o $(LDLIBS2)
  8684. + 
  8685. + l-popauth:;    $(LINT) $(LFLAGS) popauth.c $(LLIBS2)
  8686. + 
  8687. + 
  8688. + ################################################################
  8689.   # popwrd
  8690. ***************
  8691. *** 138,140 ****
  8692.           -chmod u-s zpopwrd
  8693. !         cp xpopwrd $@
  8694.           -chmod $(PGMPROT) $@
  8695. --- 188,190 ----
  8696.           -chmod u-s zpopwrd
  8697. !         $(CP) xpopwrd $@
  8698.           -chmod $(PGMPROT) $@
  8699. ***************
  8700. *** 154,164 ****
  8701.   ################################################################
  8702. - # popsbr
  8703. - ################################################################
  8704. - 
  8705. - popsbr:        popsbr.o
  8706. - 
  8707. - l-popsbr:;    $(LINT) $(LFLAGS) popsbr.c $(LLIBS)
  8708. - 
  8709. - 
  8710. - ################################################################
  8711.   # smtpd
  8712. --- 204,205 ----
  8713. ***************
  8714. *** 170,172 ****
  8715.           -$(REMOVE) $@ zsmtpd
  8716. !         cp xsmtpd $@
  8717.           -chmod 700 $@
  8718. --- 211,213 ----
  8719.           -$(REMOVE) $@ zsmtpd
  8720. !         $(CP) xsmtpd $@
  8721.           -chmod 700 $@
  8722. ***************
  8723. *** 188,189 ****
  8724. --- 229,231 ----
  8725.   unconfig:    distribution
  8726. +         -rm -f mmdfII/pop/lock.c
  8727.           -rm -f Makefile
  8728. ***************
  8729. *** 202,204 ****
  8730.   
  8731. ! MODULES    =    popd popser popaka popwrd popsbr
  8732.   
  8733. --- 244,246 ----
  8734.   
  8735. ! MODULES    =    popd popser popaka popauth popwrd
  8736.   
  8737. ***************
  8738. *** 216,218 ****
  8739.           echo 'w' >> eddep
  8740. !         cp Makefile _Makefile
  8741.           ed - Makefile < eddep
  8742. --- 258,260 ----
  8743.           echo 'w' >> eddep
  8744. !         $(CP) Makefile _Makefile
  8745.           ed - Makefile < eddep
  8746. ***************
  8747. *** 253,254 ****
  8748. --- 295,297 ----
  8749.   #popser.o: /usr/include/sys/stat.h
  8750. + popser.o: popauth.h
  8751.   popaka.o: popaka.c
  8752. ***************
  8753. *** 256,257 ****
  8754. --- 299,305 ----
  8755.   popaka.o: ../../zotnet/bboards.h
  8756. + popauth.o: popauth.c
  8757. + popauth.o: ../../h/mh.h
  8758. + popauth.o: popauth.h
  8759. + popauth.o: ../../zotnet/bboards.h
  8760. + popauth.o: ../../zotnet/mts.h
  8761.   popwrd.o: popwrd.c
  8762. ***************
  8763. *** 265,270 ****
  8764.   #popwrd.o: /usr/include/sys/file.h
  8765. - popsbr.o: popsbr.c
  8766. - popsbr.o: ../../h/strings.h
  8767. - #popsbr.o: /usr/include/stdio.h
  8768. - #popsbr.o: /usr/include/signal.h
  8769.   # DEPENDENCIES MUST END AT END OF FILE
  8770. --- 313,314 ----
  8771. *** ../mh-6.7.2/conf/makefiles/uip    Fri Jan 24 15:19:02 1992
  8772. --- conf/makefiles/uip    Wed Nov 18 08:54:39 1992
  8773. ***************
  8774. *** 4,6 ****
  8775.   #    @(MHWARNING)
  8776. ! # @(#)$Id: uip,v 2.14 1992/01/24 23:18:46 jromine Exp $
  8777.   ##############################################################################
  8778. --- 4,6 ----
  8779.   #    @(MHWARNING)
  8780. ! # @(#)$Id: uip,v 2.38 1992/11/18 16:54:29 jromine Exp $
  8781.   ##############################################################################
  8782. ***************
  8783. *** 71,72 ****
  8784. --- 71,78 ----
  8785.   POPLLIBS=    popsbr.c
  8786. + @BEGIN: MPOP
  8787. + POPCMDS    =    popi
  8788. + IPOPCMDS=    inst-popi
  8789. + LPOPCMDS=    l-popi
  8790. + TPOPCMS=    xpopi
  8791. + @END: MPOP
  8792.   @BEGIN: SENDMTSHACK
  8793. ***************
  8794. *** 77,79 ****
  8795.   @END: SENDMTSHACK
  8796. ! @END: POP
  8797.   @BEGIN: BPOP
  8798. --- 83,87 ----
  8799.   @END: SENDMTSHACK
  8800. ! @BEGIN: KPOP
  8801. ! KRBLIB  =       -lkrb -ldes
  8802. ! @END: KPOP
  8803.   @BEGIN: BPOP
  8804. ***************
  8805. *** 84,87 ****
  8806.   PSHLIB    =    pshsbr.o
  8807. ! PSHLLIBS=    pshsbr.c 
  8808.   @END: NNTP
  8809.   @BEGIN: TMA
  8810. --- 92,99 ----
  8811.   PSHLIB    =    pshsbr.o
  8812. ! PSHLLIBS=    -DPSHSBR popsbr.c 
  8813.   @END: NNTP
  8814. + @END: POP
  8815. + @BEGIN: HESIOD
  8816. + HESLIB    =    -lhesiod
  8817. + @END: HESIOD
  8818.   @BEGIN: TMA
  8819. ***************
  8820. *** 102,103 ****
  8821. --- 114,118 ----
  8822.   
  8823. + CP      =       @(CP)
  8824. + LN      =       @(LN)
  8825. + 
  8826.   CC    =    @(MHCOMPILER)
  8827. ***************
  8828. *** 121,122 ****
  8829. --- 136,140 ----
  8830.   @END: STDLIB
  8831. + @BEGIN: SUN4SHLIB
  8832. + SLIBVER    =    .@(SLIBVER)
  8833. + @END: SUN4SHLIB
  8834.   @BEGIN: SHAREDLIB
  8835. ***************
  8836. *** 124,126 ****
  8837.           ../zotnet/libzot.a
  8838. ! LDLIBES    =    ../config/config.o -Bdynamic @(SLDFLAG) -lmh \
  8839.           ../mts/libmts.a  ../zotnet/libzot.a
  8840. --- 142,144 ----
  8841.           ../zotnet/libzot.a
  8842. ! LDLIBES    =    ../config/config.o -Bdynamic @(SLDFLAG) -lmh$(SLIBVER) \
  8843.           ../mts/libmts.a  ../zotnet/libzot.a
  8844. ***************
  8845. *** 135,136 ****
  8846. --- 153,157 ----
  8847.   CMDS    =    ali anno burst comp dist folder folders forw inc mark mhmail \
  8848. + @BEGIN: MIME
  8849. +         mhn \
  8850. + @END: MIME
  8851.           mhpath msgchk msh next packf pick prev prompter refile repl \
  8852. ***************
  8853. *** 137,141 ****
  8854.           rmf rmm scan send show sortm vmh whatnow whom $(BBCMDS) \
  8855. !         $(TMACMDS)
  8856.   MISC    =    ap conflict dp install-mh mhl post rcvdist rcvpack rcvstore \
  8857. !         rcvtty fmtdump sendmail \
  8858.   @BEGIN: SENDMTS
  8859. --- 158,165 ----
  8860.           rmf rmm scan send show sortm vmh whatnow whom $(BBCMDS) \
  8861. !         $(TMACMDS) $(POPCMDS)
  8862.   MISC    =    ap conflict dp install-mh mhl post rcvdist rcvpack rcvstore \
  8863. !         rcvtty fmtdump mhparam \
  8864. ! @BEGIN: SMTP
  8865. !         sendmail \
  8866. ! @END: SMTP
  8867.   @BEGIN: SENDMTS
  8868. ***************
  8869. *** 147,148 ****
  8870. --- 171,175 ----
  8871.           inst-folders inst-forw inst-inc inst-mark inst-mhmail \
  8872. + @BEGIN: MIME
  8873. +         inst-mhn \
  8874. + @END: MIME
  8875.           inst-mhpath inst-msgchk inst-msh inst-next inst-packf \
  8876. ***************
  8877. *** 150,152 ****
  8878.           inst-rmf inst-rmm inst-scan inst-send inst-show inst-sortm \
  8879. !         inst-vmh inst-whatnow inst-whom $(IBBCMDS) $(ITMACMDS)
  8880.   IMISC    =    inst-ap inst-conflict inst-dp inst-install-mh inst-mhl \
  8881. --- 177,180 ----
  8882.           inst-rmf inst-rmm inst-scan inst-send inst-show inst-sortm \
  8883. !         inst-vmh inst-whatnow inst-whom $(IBBCMDS) $(ITMACMDS) \
  8884. !         $(IPOPCMDS)
  8885.   IMISC    =    inst-ap inst-conflict inst-dp inst-install-mh inst-mhl \
  8886. ***************
  8887. *** 153,155 ****
  8888.           inst-post inst-rcvdist inst-rcvpack inst-rcvstore inst-rcvtty \
  8889. !         inst-fmtdump inst-sendmail $(IMTSMISC) \
  8890.   @BEGIN: SENDMTS
  8891. --- 181,187 ----
  8892.           inst-post inst-rcvdist inst-rcvpack inst-rcvstore inst-rcvtty \
  8893. !         inst-fmtdump inst-mhparam \
  8894. ! @BEGIN: SMTP
  8895. !         inst-sendmail \
  8896. ! @END: SMTP
  8897. !         $(IMTSMISC) \
  8898.   @BEGIN: SENDMTS
  8899. ***************
  8900. *** 160,166 ****
  8901.   LCMDS    =    l-ali l-anno l-burst l-comp l-dist l-folder l-forw l-inc \
  8902. !         l-mark l-mhmail l-mhpath l-msgchk l-msh l-packf l-pick \
  8903.           l-prompter l-refile l-repl l-rmf l-rmm l-scan l-send \
  8904. !         l-show l-sortm l-vmh l-whatnow l-whom $(LBBCMDS) $(LTMACMDS)
  8905.   LMISC    =    l-ap l-conflict l-dp l-install-mh l-mhl l-post l-rcvdist \
  8906. !         l-rcvpack l-rcvstore l-rcvtty l-fmtdump l-sendmail \
  8907.           $(LMTSMISC) $(LBBMISC) \
  8908. --- 192,206 ----
  8909.   LCMDS    =    l-ali l-anno l-burst l-comp l-dist l-folder l-forw l-inc \
  8910. !         l-mark l-mhmail \
  8911. ! @BEGIN: MIME
  8912. !         l-mhn \
  8913. ! @END: MIME
  8914. !         l-mhpath l-msgchk l-msh l-packf l-pick \
  8915.           l-prompter l-refile l-repl l-rmf l-rmm l-scan l-send \
  8916. !         l-show l-sortm l-vmh l-whatnow l-whom $(LBBCMDS) $(LTMACMDS) \
  8917. !         $(LPOPCMDS)
  8918.   LMISC    =    l-ap l-conflict l-dp l-install-mh l-mhl l-post l-rcvdist \
  8919. !         l-rcvpack l-rcvstore l-rcvtty l-fmtdump l-mhparam \
  8920. ! @BEGIN: SMTP
  8921. !         l-sendmail \
  8922. ! @END: SMTP
  8923.           $(LMTSMISC) $(LBBMISC) \
  8924. ***************
  8925. *** 172,178 ****
  8926.   TCMDS    =    xali xanno xburst xcomp xdist xfolder xforw xinc xmark \
  8927. !         xmhmail xmhpath xmsgchk xmsh xpackf xpick xprompter xrefile \
  8928.           xrepl xrmf xrmm xscan xsend xshow xsortm xvmh xwhatnow xwhom \
  8929. !         $(TBBCMDS) $(TTMACMDS)
  8930.   TMISC    =    xap xconflict xdp xinstall-mh xmhl xpost xrcvdist xrcvpack \
  8931. !         xrcvstore xrcvtty xfmtdump xsendmail \
  8932.           $(TMTSMISC) $(TBBMISC) $(TPOPMISC) \
  8933. --- 212,225 ----
  8934.   TCMDS    =    xali xanno xburst xcomp xdist xfolder xforw xinc xmark \
  8935. !         xmhmail \
  8936. ! @BEGIN: MIME
  8937. !         xmhn \
  8938. ! @END: MIME
  8939. !         xmhpath xmsgchk xmsh xpackf xpick xprompter xrefile \
  8940.           xrepl xrmf xrmm xscan xsend xshow xsortm xvmh xwhatnow xwhom \
  8941. !         $(TBBCMDS) $(TTMACMDS) $(TPOPCMDS)
  8942.   TMISC    =    xap xconflict xdp xinstall-mh xmhl xpost xrcvdist xrcvpack \
  8943. !         xrcvstore xrcvtty xfmtdump xmhparam \
  8944. ! @BEGIN: SMTP
  8945. !         xsendmail \
  8946. ! @END: SMTP
  8947.           $(TMTSMISC) $(TBBMISC) $(TPOPMISC) \
  8948. ***************
  8949. *** 217,219 ****
  8950.           -$(REMOVE) $@ zali
  8951. !         cp xali $@
  8952.           -@chmod $(PGMPROT) $@
  8953. --- 264,266 ----
  8954.           -$(REMOVE) $@ zali
  8955. !         $(CP) xali $@
  8956.           -@chmod $(PGMPROT) $@
  8957. ***************
  8958. *** 234,240 ****
  8959.           -$(REMOVE) $@ zanno
  8960. !         cp xanno $@
  8961.           -@chmod $(PGMPROT) $@
  8962. - @BEGIN: UCI
  8963. -         -@ln -s $@ $(BINDIR)/fanno
  8964. - @END: UCI
  8965.           -@ls -l $@
  8966. --- 281,284 ----
  8967.           -$(REMOVE) $@ zanno
  8968. !         $(CP) xanno $@
  8969.           -@chmod $(PGMPROT) $@
  8970.           -@ls -l $@
  8971. ***************
  8972. *** 254,256 ****
  8973.           -$(REMOVE) $@ zap
  8974. !         cp xap $@
  8975.           -@chmod $(PGMPROT) $@
  8976. --- 298,300 ----
  8977.           -$(REMOVE) $@ zap
  8978. !         $(CP) xap $@
  8979.           -@chmod $(PGMPROT) $@
  8980. ***************
  8981. *** 274,276 ****
  8982.   @END: BPOP
  8983. !         cp xbbc $@
  8984.           -@chmod $(PGMPROT) $@
  8985. --- 318,320 ----
  8986.   @END: BPOP
  8987. !         $(CP) xbbc $@
  8988.           -@chmod $(PGMPROT) $@
  8989. ***************
  8990. *** 290,292 ****
  8991. --- 334,343 ----
  8992.   
  8993. + pshsbr.c:    popsbr.c
  8994. +         rm -f $@
  8995. +         $(LN) popsbr.c $@
  8996.   
  8997. + pshsbr.o:    pshsbr.c
  8998. +         $(CC) $(CFLAGS) -DPSHSBR -c pshsbr.c
  8999. + 
  9000. + 
  9001.   inst-bbl:    $(BINDIR)/bbl
  9002. ***************
  9003. *** 296,298 ****
  9004.           -chmod u-s zbbl
  9005. !         cp xbbl $@
  9006.           -chmod $(PGMPROT) $@
  9007. --- 347,349 ----
  9008.           -chmod u-s zbbl
  9009. !         $(CP) xbbl $@
  9010.           -chmod $(PGMPROT) $@
  9011. ***************
  9012. *** 315,317 ****
  9013.           -$(REMOVE) $@ zburst
  9014. !         cp xburst $@
  9015.           -@chmod $(PGMPROT) $@
  9016. --- 366,368 ----
  9017.           -$(REMOVE) $@ zburst
  9018. !         $(CP) xburst $@
  9019.           -@chmod $(PGMPROT) $@
  9020. ***************
  9021. *** 332,334 ****
  9022.           -$(REMOVE) $@ zcipher
  9023. !         cp xcipher $@
  9024.           -@chmod $(PGMPROT) $@
  9025. --- 383,385 ----
  9026.           -$(REMOVE) $@ zcipher
  9027. !         $(CP) xcipher $@
  9028.           -@chmod $(PGMPROT) $@
  9029. ***************
  9030. *** 349,351 ****
  9031.           -$(REMOVE) $@ zcomp
  9032. !         cp xcomp $@
  9033.           -@chmod $(PGMPROT) $@
  9034. --- 400,402 ----
  9035.           -$(REMOVE) $@ zcomp
  9036. !         $(CP) xcomp $@
  9037.           -@chmod $(PGMPROT) $@
  9038. ***************
  9039. *** 356,360 ****
  9040.   
  9041. ! xcomp:        comp.o \
  9042.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9043. !         $(LD) $(LDFLAGS) -o $@ comp.o \
  9044.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9045. --- 407,411 ----
  9046.   
  9047. ! xcomp:        comp.o whatnowproc.o \
  9048.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9049. !         $(LD) $(LDFLAGS) -o $@ comp.o whatnowproc.o \
  9050.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9051. ***************
  9052. *** 361,363 ****
  9053.   
  9054. ! l-comp:;    $(LINT) $(LFLAGS) comp.c \
  9055.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9056. --- 412,414 ----
  9057.   
  9058. ! l-comp:;    $(LINT) $(LFLAGS) comp.c whatnowproc.c \
  9059.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9060. ***************
  9061. *** 369,371 ****
  9062.           -$(REMOVE) $@ zconflict
  9063. !         cp xconflict $@
  9064.           -@chmod $(PGMPROT) $@
  9065. --- 420,422 ----
  9066.           -$(REMOVE) $@ zconflict
  9067. !         $(CP) xconflict $@
  9068.           -@chmod $(PGMPROT) $@
  9069. ***************
  9070. *** 386,388 ****
  9071.           -$(REMOVE) $@ zdecipher
  9072. !         cp xdecipher $@
  9073.           -@chmod $(PGMPROT) $@
  9074. --- 437,439 ----
  9075.           -$(REMOVE) $@ zdecipher
  9076. !         $(CP) xdecipher $@
  9077.           -@chmod $(PGMPROT) $@
  9078. ***************
  9079. *** 403,405 ****
  9080.           -$(REMOVE) $@ zdist
  9081. !         cp xdist $@
  9082.           -@chmod $(PGMPROT) $@
  9083. --- 454,456 ----
  9084.           -$(REMOVE) $@ zdist
  9085. !         $(CP) xdist $@
  9086.           -@chmod $(PGMPROT) $@
  9087. ***************
  9088. *** 410,414 ****
  9089.   
  9090. ! xdist:        dist.o \
  9091.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9092. !         $(LD) $(LDFLAGS) -o $@ dist.o \
  9093.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9094. --- 461,465 ----
  9095.   
  9096. ! xdist:        dist.o whatnowproc.o \
  9097.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9098. !         $(LD) $(LDFLAGS) -o $@ dist.o whatnowproc.o \
  9099.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9100. ***************
  9101. *** 415,417 ****
  9102.   
  9103. ! l-dist:;    $(LINT) $(LFLAGS) dist.c \
  9104.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9105. --- 466,468 ----
  9106.   
  9107. ! l-dist:;    $(LINT) $(LFLAGS) dist.c whatnowproc.c \
  9108.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9109. ***************
  9110. *** 423,425 ****
  9111.           -$(REMOVE) $@ zdp
  9112. !         cp xdp $@
  9113.           -@chmod $(PGMPROT) $@
  9114. --- 474,476 ----
  9115.           -$(REMOVE) $@ zdp
  9116. !         $(CP) xdp $@
  9117.           -@chmod $(PGMPROT) $@
  9118. ***************
  9119. *** 448,450 ****
  9120.   xfmtdump:        fmtdump.o trmsbr.o $(LIBES)
  9121. !         $(LD) $(LDFLAGS) -o $@ fmtdump.o $(LDLIBS) $(LDCURSES)
  9122.   
  9123. --- 499,501 ----
  9124.   xfmtdump:        fmtdump.o trmsbr.o $(LIBES)
  9125. !         $(LD) $(LDFLAGS) -o $@ fmtdump.o $(LDLIBS)
  9126.   
  9127. ***************
  9128. *** 458,460 ****
  9129.           -$(REMOVE) $@ zfolder
  9130. !         cp xfolder $@
  9131.           -@chmod $(PGMPROT) $@
  9132. --- 509,511 ----
  9133.           -$(REMOVE) $@ zfolder
  9134. !         $(CP) xfolder $@
  9135.           -@chmod $(PGMPROT) $@
  9136. ***************
  9137. *** 478,480 ****
  9138.           -$(REMOVE) $@ zforw
  9139. !         cp xforw $@
  9140.           -@chmod $(PGMPROT) $@
  9141. --- 529,531 ----
  9142.           -$(REMOVE) $@ zforw
  9143. !         $(CP) xforw $@
  9144.           -@chmod $(PGMPROT) $@
  9145. ***************
  9146. *** 485,489 ****
  9147.   
  9148. ! xforw:        forw.o \
  9149.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9150. !         $(LD) $(LDFLAGS) -o $@ forw.o \
  9151.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9152. --- 536,540 ----
  9153.   
  9154. ! xforw:        forw.o whatnowproc.o \
  9155.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES) 
  9156. !         $(LD) $(LDFLAGS) -o $@ forw.o whatnowproc.o \
  9157.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS) 
  9158. ***************
  9159. *** 490,492 ****
  9160.   
  9161. ! l-forw:;    $(LINT) $(LFLAGS) forw.c \
  9162.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9163. --- 541,543 ----
  9164.   
  9165. ! l-forw:;    $(LINT) $(LFLAGS) forw.c whatnowproc.c \
  9166.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS)
  9167. ***************
  9168. *** 501,503 ****
  9169.   @END: POP
  9170. !         cp xinc $@
  9171.           -@chmod $(PGMPROT) $@
  9172. --- 552,554 ----
  9173.   @END: POP
  9174. !         $(CP) xinc $@
  9175.           -@chmod $(PGMPROT) $@
  9176. ***************
  9177. *** 516,522 ****
  9178.   
  9179. ! xinc:        inc.o scansbr.o \
  9180. !             dropsbr.o trmsbr.o $(POPLIB) $(TMALIB) $(LIBES)
  9181. !         $(LD) $(LDFLAGS) -o $@ inc.o scansbr.o \
  9182. !             dropsbr.o trmsbr.o $(POPLIB) $(TMALIB) $(LDLIBS) \
  9183. !             $(LDCURSES)
  9184.   
  9185. --- 567,573 ----
  9186.   
  9187. ! xinc:        inc.o scansbr.o dropsbr.o trmsbr.o \
  9188. !             $(POPLIB) $(TMALIB) $(LIBES)
  9189. !         $(LD) $(LDFLAGS) -o $@ inc.o scansbr.o dropsbr.o \
  9190. !             trmsbr.o $(POPLIB) $(TMALIB) $(KRBLIB) $(HESLIB) \
  9191. !             $(LDLIBS) $(LDCURSES)
  9192.   
  9193. ***************
  9194. *** 530,532 ****
  9195.           -$(REMOVE) $@ zinstall-mh
  9196. !         cp xinstall-mh $@
  9197.           -@chmod $(PGMPROT) $@
  9198. --- 581,583 ----
  9199.           -$(REMOVE) $@ zinstall-mh
  9200. !         $(CP) xinstall-mh $@
  9201.           -@chmod $(PGMPROT) $@
  9202. ***************
  9203. *** 547,549 ****
  9204.           -$(REMOVE) $@ zkdsc
  9205. !         cp xkdsc $@
  9206.           -@chmod $(PGMPROT) $@
  9207. --- 598,600 ----
  9208.           -$(REMOVE) $@ zkdsc
  9209. !         $(CP) xkdsc $@
  9210.           -@chmod $(PGMPROT) $@
  9211. ***************
  9212. *** 564,566 ****
  9213.           -$(REMOVE) $@ zmark
  9214. !         cp xmark $@
  9215.           -@chmod $(PGMPROT) $@
  9216. --- 615,617 ----
  9217.           -$(REMOVE) $@ zmark
  9218. !         $(CP) xmark $@
  9219.           -@chmod $(PGMPROT) $@
  9220. ***************
  9221. *** 581,583 ****
  9222.           -$(REMOVE) $@ zmhl
  9223. !         cp xmhl $@
  9224.           -@chmod $(PGMPROT) $@
  9225. --- 632,634 ----
  9226.           -$(REMOVE) $@ zmhl
  9227. !         $(CP) xmhl $@
  9228.           -@chmod $(PGMPROT) $@
  9229. ***************
  9230. *** 601,603 ****
  9231.           -$(REMOVE) $@ zmhmail
  9232. !         cp xmhmail $@
  9233.           -@chmod $(PGMPROT) $@
  9234. --- 652,654 ----
  9235.           -$(REMOVE) $@ zmhmail
  9236. !         $(CP) xmhmail $@
  9237.           -@chmod $(PGMPROT) $@
  9238. ***************
  9239. *** 614,615 ****
  9240. --- 665,701 ----
  9241.   
  9242. + inst-mhn:    $(BINDIR)/mhn
  9243. + 
  9244. + $(BINDIR)/mhn:    xmhn
  9245. +         -$(REMOVE) $@ zmhn
  9246. +         cp xmhn $@
  9247. +         -@chmod $(PGMPROT) $@
  9248. +         -@ls -l $@
  9249. +         -@echo ""
  9250. + 
  9251. + mhn:        xmhn
  9252. + 
  9253. + xmhn:          mhn.o ftpsbr.o trmsbr.o $(LIBES) 
  9254. +         $(LD) $(LDFLAGS) -o $@ mhn.o ftpsbr.o trmsbr.o \
  9255. +                 $(LDLIBS) $(LDCURSES)
  9256. + 
  9257. + l-mhn:;        $(LINT) $(LFLAGS) mhn.c ftpsbr.c trmsbr.c $(LLIBS)
  9258. + 
  9259. + 
  9260. + inst-mhparam:    $(BINDIR)/mhparam
  9261. + 
  9262. + $(BINDIR)/mhparam:    xmhparam
  9263. +         -$(REMOVE) $@ zmhparam
  9264. +         cp xmhparam $@
  9265. +         -@chmod $(PGMPROT) $@
  9266. +         -@ls -l $@
  9267. +         -@echo ""
  9268. + 
  9269. + mhparam:    xmhparam
  9270. + 
  9271. + xmhparam:    mhparam.o trmsbr.o $(LIBES)
  9272. +         $(LD) $(LDFLAGS) -o $@ mhparam.o $(LDLIBS) $(LDCURSES)
  9273. + 
  9274. + l-mhparam:;    $(LINT) $(LFLAGS) mhparam.c $(LLIBS) 
  9275. + 
  9276. + 
  9277.   inst-mhpath:    $(BINDIR)/mhpath
  9278. ***************
  9279. *** 618,620 ****
  9280.           -$(REMOVE) $@ zmhpath
  9281. !         cp xmhpath $@
  9282.           -@chmod $(PGMPROT) $@
  9283. --- 704,706 ----
  9284.           -$(REMOVE) $@ zmhpath
  9285. !         $(CP) xmhpath $@
  9286.           -@chmod $(PGMPROT) $@
  9287. ***************
  9288. *** 638,640 ****
  9289.   @END: POP
  9290. !         cp xmsgchk $@
  9291.           -@chmod $(PGMPROT) $@
  9292. --- 724,726 ----
  9293.   @END: POP
  9294. !         $(CP) xmsgchk $@
  9295.           -@chmod $(PGMPROT) $@
  9296. ***************
  9297. *** 650,652 ****
  9298.   xmsgchk:    msgchk.o $(POPLIB) $(LIBES)
  9299. !         $(LD) $(LDFLAGS) -o $@ msgchk.o $(POPLIB) $(LDLIBS)
  9300.   
  9301. --- 736,739 ----
  9302.   xmsgchk:    msgchk.o $(POPLIB) $(LIBES)
  9303. !         $(LD) $(LDFLAGS) -o $@ msgchk.o $(POPLIB) \
  9304. !                     $(KRBLIB) $(HESLIB) $(LDLIBS)
  9305.   
  9306. ***************
  9307. *** 659,661 ****
  9308.           -$(REMOVE) $@ zmsh
  9309. !         cp xmsh $@
  9310.           -@chmod $(PGMPROT) $@
  9311. --- 746,748 ----
  9312.           -$(REMOVE) $@ zmsh
  9313. !         $(CP) xmsh $@
  9314.           -@chmod $(PGMPROT) $@
  9315. ***************
  9316. *** 682,684 ****
  9317.           -$(REMOVE) $@ zpackf
  9318. !         cp xpackf $@
  9319.           -@chmod $(PGMPROT) $@
  9320. --- 769,771 ----
  9321.           -$(REMOVE) $@ zpackf
  9322. !         $(CP) xpackf $@
  9323.           -@chmod $(PGMPROT) $@
  9324. ***************
  9325. *** 699,701 ****
  9326.           -$(REMOVE) $@ zpick
  9327. !         cp xpick $@
  9328.           -@chmod $(PGMPROT) $@
  9329. --- 786,788 ----
  9330.           -$(REMOVE) $@ zpick
  9331. !         $(CP) xpick $@
  9332.           -@chmod $(PGMPROT) $@
  9333. ***************
  9334. *** 712,713 ****
  9335. --- 799,818 ----
  9336.   
  9337. + inst-popi:    $(BINDIR)/popi
  9338. + 
  9339. + $(BINDIR)/popi:    xpopi
  9340. +         -$(REMOVE) $@ zpopi
  9341. +         cp xpopi $@
  9342. +         -@chmod $(PGMPROT) $@
  9343. +         -@ls -l $@
  9344. +         -@echo ""
  9345. + 
  9346. + popi:        xpopi
  9347. + 
  9348. + xpopi:        popi.o $(POPLIB) trmsbr.o $(LIBES)
  9349. +         $(LD) $(LDFLAGS) -o $@ popi.o $(POPLIB) trmsbr.o $(LDLIBS) \
  9350. +             $(LDCURSES)
  9351. + 
  9352. + l-popi:;    $(LINT) $(LFLAGS) popi.c $(POPLLIBS) trmsbr.c $(LLIBS)
  9353. + 
  9354. + 
  9355.   inst-post:    $(ETCDIR)/post
  9356. ***************
  9357. *** 719,721 ****
  9358.   @END: MHMTS
  9359. !         cp xpost $@
  9360.           -@chmod $(PGMPROT) $@
  9361. --- 824,826 ----
  9362.   @END: MHMTS
  9363. !         $(CP) xpost $@
  9364.           -@chmod $(PGMPROT) $@
  9365. ***************
  9366. *** 743,745 ****
  9367.           -$(REMOVE) $@ zprompter
  9368. !         cp xprompter $@
  9369.           -@chmod $(PGMPROT) $@
  9370. --- 848,850 ----
  9371.           -$(REMOVE) $@ zprompter
  9372. !         $(CP) xprompter $@
  9373.           -@chmod $(PGMPROT) $@
  9374. ***************
  9375. *** 760,762 ****
  9376.           -$(REMOVE) $@ zrcvdist
  9377. !         cp xrcvdist $@
  9378.           -@chmod $(PGMPROT) $@
  9379. --- 865,867 ----
  9380.           -$(REMOVE) $@ zrcvdist
  9381. !         $(CP) xrcvdist $@
  9382.           -@chmod $(PGMPROT) $@
  9383. ***************
  9384. *** 777,779 ****
  9385.           -$(REMOVE) $@ zrcvpack
  9386. !         cp xrcvpack $@
  9387.           -@chmod $(PGMPROT) $@
  9388. --- 882,884 ----
  9389.           -$(REMOVE) $@ zrcvpack
  9390. !         $(CP) xrcvpack $@
  9391.           -@chmod $(PGMPROT) $@
  9392. ***************
  9393. *** 794,796 ****
  9394.           -$(REMOVE) $@ zrcvstore
  9395. !         cp xrcvstore $@
  9396.           -@chmod $(PGMPROT) $@
  9397. --- 899,901 ----
  9398.           -$(REMOVE) $@ zrcvstore
  9399. !         $(CP) xrcvstore $@
  9400.           -@chmod $(PGMPROT) $@
  9401. ***************
  9402. *** 811,813 ****
  9403.           -$(REMOVE) $@ zrcvtty
  9404. !         cp xrcvtty $@
  9405.           -@chmod $(PGMPROT) $@
  9406. --- 916,918 ----
  9407.           -$(REMOVE) $@ zrcvtty
  9408. !         $(CP) xrcvtty $@
  9409.           -@chmod $(PGMPROT) $@
  9410. ***************
  9411. *** 822,830 ****
  9412.   
  9413. ! xrcvtty:    rcvtty.o \
  9414. !             scansbr.o trmsbr.o ttyw.o $(LIBES)
  9415. !         $(LD) $(LDFLAGS) -o $@ rcvtty.o \
  9416. !             scansbr.o trmsbr.o ttyw.o $(LDLIBS) $(LDCURSES)
  9417.   
  9418. ! l-rcvtty:;    $(LINT) $(LFLAGS) rcvtty.c \
  9419. !             scansbr.c trmsbr.c ttyw.c $(LLIBS)
  9420.   
  9421. --- 927,944 ----
  9422.   
  9423. ! xrcvtty:    rcvtty.o scansbr.o trmsbr.o \
  9424. ! @BEGIN: TTYD
  9425. !             ttyw.o \
  9426. ! @END: TTYD
  9427. !             $(LIBES)
  9428. !         $(LD) $(LDFLAGS) -o $@ rcvtty.o scansbr.o trmsbr.o \
  9429. ! @BEGIN: TTYD
  9430. !             ttyw.o \
  9431. ! @END: TTYD
  9432. !             $(LDLIBS) $(LDCURSES)
  9433.   
  9434. ! l-rcvtty:;    $(LINT) $(LFLAGS) rcvtty.c scansbr.c trmsbr.c \
  9435. ! @BEGIN: TTYD
  9436. !             ttyw.c \
  9437. ! @END: TTYD
  9438. !             $(LLIBS)
  9439.   
  9440. ***************
  9441. *** 835,837 ****
  9442.           -$(REMOVE) $@ zrefile
  9443. !         cp xrefile $@
  9444.           -@chmod $(PGMPROT) $@
  9445. --- 949,951 ----
  9446.           -$(REMOVE) $@ zrefile
  9447. !         $(CP) xrefile $@
  9448.           -@chmod $(PGMPROT) $@
  9449. ***************
  9450. *** 852,854 ****
  9451.           -$(REMOVE) $@ zrepl
  9452. !         cp xrepl $@
  9453.           -@chmod $(PGMPROT) $@
  9454. --- 966,968 ----
  9455.           -$(REMOVE) $@ zrepl
  9456. !         $(CP) xrepl $@
  9457.           -@chmod $(PGMPROT) $@
  9458. ***************
  9459. *** 859,863 ****
  9460.   
  9461. ! xrepl:        repl.o replsbr.o \
  9462.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES)
  9463. !         $(LD) $(LDFLAGS) -o $@ repl.o replsbr.o \
  9464.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS)
  9465. --- 973,977 ----
  9466.   
  9467. ! xrepl:        repl.o replsbr.o whatnowproc.o \
  9468.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LIBES)
  9469. !         $(LD) $(LDFLAGS) -o $@ repl.o replsbr.o whatnowproc.o \
  9470.               whatnowsbr.o sendsbr.o annosbr.o distsbr.o $(LDLIBS)
  9471. ***************
  9472. *** 864,866 ****
  9473.   
  9474. ! l-repl:;    $(LINT) $(LFLAGS) repl.c replsbr.c \
  9475.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS) 
  9476. --- 978,980 ----
  9477.   
  9478. ! l-repl:;    $(LINT) $(LFLAGS) repl.c replsbr.c whatnowproc.c \
  9479.               whatnowsbr.c sendsbr.c annosbr.c distsbr.c $(LLIBS) 
  9480. ***************
  9481. *** 873,875 ****
  9482.           -chmod u-s zrmail
  9483. !         cp xrmail $@
  9484.           -@chmod $(PGMPROT) $@
  9485. --- 987,989 ----
  9486.           -chmod u-s zrmail
  9487. !         $(CP) xrmail $@
  9488.           -@chmod $(PGMPROT) $@
  9489. ***************
  9490. *** 892,894 ****
  9491.           -$(REMOVE) $@ zrmf
  9492. !         cp xrmf $@
  9493.           -@chmod $(PGMPROT) $@
  9494. --- 1006,1008 ----
  9495.           -$(REMOVE) $@ zrmf
  9496. !         $(CP) xrmf $@
  9497.           -@chmod $(PGMPROT) $@
  9498. ***************
  9499. *** 909,911 ****
  9500.           -$(REMOVE) $@ zrmm
  9501. !         cp xrmm $@
  9502.           -@chmod $(PGMPROT) $@
  9503. --- 1023,1025 ----
  9504.           -$(REMOVE) $@ zrmm
  9505. !         $(CP) xrmm $@
  9506.           -@chmod $(PGMPROT) $@
  9507. ***************
  9508. *** 926,928 ****
  9509.           -$(REMOVE) $@ zscan
  9510. !         cp xscan $@
  9511.           -@chmod $(PGMPROT) $@
  9512. --- 1040,1042 ----
  9513.           -$(REMOVE) $@ zscan
  9514. !         $(CP) xscan $@
  9515.           -@chmod $(PGMPROT) $@
  9516. ***************
  9517. *** 946,948 ****
  9518.           -$(REMOVE) $@ zsend
  9519. !         cp xsend $@
  9520.           -@chmod $(PGMPROT) $@
  9521. --- 1060,1062 ----
  9522.           -$(REMOVE) $@ zsend
  9523. !         $(CP) xsend $@
  9524.           -@chmod $(PGMPROT) $@
  9525. ***************
  9526. *** 968,970 ****
  9527.           -$(REMOVE) $@ zshow
  9528. !         cp xshow $@
  9529.           -@chmod $(PGMPROT) $@
  9530. --- 1082,1084 ----
  9531.           -$(REMOVE) $@ zshow
  9532. !         $(CP) xshow $@
  9533.           -@chmod $(PGMPROT) $@
  9534. ***************
  9535. *** 997,999 ****
  9536.   @END: SENDMTS
  9537. !         cp xsbboards $@
  9538.           -chmod $(PGMPROT) $@
  9539. --- 1111,1113 ----
  9540.   @END: SENDMTS
  9541. !         $(CP) xsbboards $@
  9542.           -chmod $(PGMPROT) $@
  9543. ***************
  9544. *** 1018,1020 ****
  9545.           -$(REMOVE) $@ zslocal
  9546. !         cp xslocal $@
  9547.           -chmod $(PGMPROT) $@
  9548. --- 1132,1134 ----
  9549.           -$(REMOVE) $@ zslocal
  9550. !         $(CP) xslocal $@
  9551.           -chmod $(PGMPROT) $@
  9552. ***************
  9553. *** 1035,1037 ****
  9554.           -$(REMOVE) $@ zsortm
  9555. !         cp xsortm $@
  9556.           -@chmod $(PGMPROT) $@
  9557. --- 1149,1151 ----
  9558.           -$(REMOVE) $@ zsortm
  9559. !         $(CP) xsortm $@
  9560.           -@chmod $(PGMPROT) $@
  9561. ***************
  9562. *** 1053,1055 ****
  9563.           -chmod u-s zspop
  9564. !         cp xspop $@
  9565.           -chmod $(PGMPROT) $@
  9566. --- 1167,1169 ----
  9567.           -chmod u-s zspop
  9568. !         $(CP) xspop $@
  9569.           -chmod $(PGMPROT) $@
  9570. ***************
  9571. *** 1076,1078 ****
  9572.           -$(REMOVE) $@ zspost
  9573. !         cp xspost $@
  9574.           -@chmod $(PGMPROT) $@
  9575. --- 1190,1192 ----
  9576.           -$(REMOVE) $@ zspost
  9577. !         $(CP) xspost $@
  9578.           -@chmod $(PGMPROT) $@
  9579. ***************
  9580. *** 1090,1091 ****
  9581. --- 1204,1206 ----
  9582.   
  9583. + @BEGIN: SMTP
  9584.   inst-sendmail:    $(ETCDIR)/sendmail
  9585. ***************
  9586. *** 1106,1109 ****
  9587.   l-sendmail:;        $(LINT) $(LFLAGS) sendmail.c $(LLIBS)
  9588.   
  9589. - 
  9590.   inst-tma:    $(BINDIR)/tma
  9591. --- 1221,1224 ----
  9592.   l-sendmail:;        $(LINT) $(LFLAGS) sendmail.c $(LLIBS)
  9593. + @END: SMTP
  9594.   
  9595.   inst-tma:    $(BINDIR)/tma
  9596. ***************
  9597. *** 1112,1114 ****
  9598.           -$(REMOVE) $@ ztma
  9599. !         cp xtma $@
  9600.           -@chmod $(PGMPROT) $@
  9601. --- 1227,1229 ----
  9602.           -$(REMOVE) $@ ztma
  9603. !         $(CP) xtma $@
  9604.           -@chmod $(PGMPROT) $@
  9605. ***************
  9606. *** 1129,1131 ****
  9607.           -$(REMOVE) $@ zumhook
  9608. !         cp xumhook $@
  9609.           -@chmod $(PGMPROT) $@
  9610. --- 1244,1246 ----
  9611.           -$(REMOVE) $@ zumhook
  9612. !         $(CP) xumhook $@
  9613.           -@chmod $(PGMPROT) $@
  9614. ***************
  9615. *** 1146,1148 ****
  9616.           -$(REMOVE) $@ zvmh
  9617. !         cp xvmh $@
  9618.           -@chmod $(PGMPROT) $@
  9619. --- 1261,1263 ----
  9620.           -$(REMOVE) $@ zvmh
  9621. !         $(CP) xvmh $@
  9622.           -@chmod $(PGMPROT) $@
  9623. ***************
  9624. *** 1154,1156 ****
  9625.   xvmh:       vmh.o vmhsbr.o $(LIBES) 
  9626. !         $(LD) $(LDFLAGS) -o $@ vmh.o vmhsbr.o $(LDLIBS) $(LDCURSES)
  9627.   
  9628. --- 1269,1271 ----
  9629.   xvmh:       vmh.o vmhsbr.o $(LIBES) 
  9630. !         $(LD) $(LDFLAGS) -o $@ vmh.o vmhsbr.o $(LDCURSES) $(LDLIBS)
  9631.   
  9632. ***************
  9633. *** 1167,1169 ****
  9634.           -$(REMOVE) $@ zwhatnow
  9635. !         cp xwhatnow $@
  9636.           -@chmod $(PGMPROT) $@
  9637. --- 1282,1284 ----
  9638.           -$(REMOVE) $@ zwhatnow
  9639. !         $(CP) xwhatnow $@
  9640.           -@chmod $(PGMPROT) $@
  9641. ***************
  9642. *** 1187,1189 ****
  9643.           -$(REMOVE) $@ zwhom
  9644. !         cp xwhom $@
  9645.           -@chmod $(PGMPROT) $@
  9646. --- 1302,1304 ----
  9647.           -$(REMOVE) $@ zwhom
  9648. !         $(CP) xwhom $@
  9649.           -@chmod $(PGMPROT) $@
  9650. ***************
  9651. *** 1204,1206 ****
  9652.           -$(REMOVE) $@ zwmh
  9653. !         cp xwmh $@
  9654.           -@chmod $(PGMPROT) $@
  9655. --- 1319,1321 ----
  9656.           -$(REMOVE) $@ zwmh
  9657. !         $(CP) xwmh $@
  9658.           -@chmod $(PGMPROT) $@
  9659. ***************
  9660. *** 1342,1344 ****
  9661. --- 1457,1461 ----
  9662.   #bbc.o: /usr/include/stdio.h
  9663. + @BEGIN: BPOP
  9664.   bbc.o: ../zotnet/mts.h
  9665. + @END: BPOP
  9666.   #bbc.o: /usr/include/errno.h
  9667. ***************
  9668. *** 1440,1441 ****
  9669. --- 1557,1569 ----
  9670.   #fmtdump.o: /usr/include/stdio.h
  9671. + ftpsbr.o: ftpsbr.c
  9672. + ftpsbr.o: ../h/mh.h
  9673. + ftpsbr.o: ../h/mhn.h
  9674. + #ftpsbr.o: /usr/include/ctype.h
  9675. + #ftpsbr.o: /usr/include/stdio.h
  9676. + #ftpsbr.o: /usr/include/arpa/ftp.h
  9677. + #ftpsbr.o: /usr/include/varargs.h
  9678. + #ftpsbr.o: /usr/include/sys/types.h
  9679. + #ftpsbr.o: /usr/include/sys/socket.h
  9680. + #ftpsbr.o: /usr/include/netinet/in.h
  9681. + #ftpsbr.o: /usr/include/netdb.h
  9682.   inc.o: inc.c
  9683. ***************
  9684. *** 1481,1482 ****
  9685. --- 1609,1624 ----
  9686.   #mhmail.o: /usr/include/signal.h
  9687. + mhn.o: mhn.c
  9688. + mhn.o: ../h/mh.h
  9689. + mhn.o: ../h/mhn.h
  9690. + #mhn.o: /usr/include/ctype.h
  9691. + #mhn.o: /usr/include/errno.h
  9692. + #mhn.o: /usr/include/signal.h
  9693. + #mhn.o: /usr/include/stdio.h
  9694. + #mhn.o: /usr/include/sys/types.h
  9695. + #mhn.o: /usr/include/sys/stat.h
  9696. + #mhn.o: /usr/include/sys/wait.h
  9697. + mhparam.o: mhparam.c
  9698. + mhparam.o: ../h/mh.h
  9699. + mhparam.o: ../h/strings.h
  9700. + #mhparam.o: /usr/include/stdio.h
  9701.   mhpath.o: mhpath.c
  9702. ***************
  9703. *** 1523,1524 ****
  9704. --- 1665,1669 ----
  9705.   mshcmds.o: ../h/mshsbr.h
  9706. + @BEGIN: MIME
  9707. + mshcmds.o: ../h/mhn.h
  9708. + @END: MIME
  9709.   packf.o: packf.c
  9710. ***************
  9711. *** 1539,1540 ****
  9712. --- 1684,1704 ----
  9713.   #popsbr.o: /usr/include/signal.h
  9714. + pshsbr.o: popsbr.c
  9715. + pshsbr.o: ../h/strings.h
  9716. + pshsbr.o: ../h/nntp.h
  9717. + #pshsbr.o: /usr/include/stdio.h
  9718. + #pshsbr.o: /usr/include/signal.h
  9719. + popi.o: popi.c
  9720. + popi.o: ../h/mh.h
  9721. + popi.o: ../h/strings.h
  9722. + popi.o: ../h/formatsbr.h
  9723. + popi.o: ../h/scansbr.h
  9724. + popi.o: ../zotnet/mts.h
  9725. + #popi.o: /usr/include/errno.h
  9726. + #popi.o: /usr/include/sys/errno.h
  9727. + #popi.o: /usr/include/stdio.h
  9728. + #popi.o: /usr/include/sys/types.h
  9729. + #popi.o: /usr/include/sys/stdtypes.h
  9730. + #popi.o: /usr/include/sys/sysmacros.h
  9731. + #popi.o: /usr/include/sys/stat.h
  9732. + #popi.o: /usr/include/sys/types.h
  9733.   post.o: post.c
  9734. ***************
  9735. *** 1660,1661 ****
  9736. --- 1824,1848 ----
  9737.   #send.o: /usr/include/sys/stat.h
  9738. + @BEGIN: SMTP
  9739. + sendmail.o: sendmail.c
  9740. + sendmail.o: ../h/mh.h
  9741. + sendmail.o: ../h/strings.h
  9742. + sendmail.o: ../h/addrsbr.h
  9743. + sendmail.o: ../h/aliasbr.h
  9744. + sendmail.o: ../h/dropsbr.h
  9745. + sendmail.o: ../zotnet/tws.h
  9746. + sendmail.o: ../zotnet/mts.h
  9747. + #sendmail.o: /usr/include/ctype.h
  9748. + #sendmail.o: /usr/include/errno.h
  9749. + #sendmail.o: /usr/include/sys/errno.h
  9750. + #sendmail.o: /usr/include/setjmp.h
  9751. + #sendmail.o: /usr/include/machine/setjmp.h
  9752. + #sendmail.o: /usr/include/stdio.h
  9753. + #sendmail.o: /usr/include/sys/types.h
  9754. + #sendmail.o: /usr/include/sys/stdtypes.h
  9755. + #sendmail.o: /usr/include/sys/sysmacros.h
  9756. + #sendmail.o: /usr/include/signal.h
  9757. + #sendmail.o: /usr/include/sys/signal.h
  9758. + #sendmail.o: /usr/include/vm/faultcode.h
  9759. + #sendmail.o: /usr/include/sys/stdtypes.h
  9760. + @END: SMTP
  9761.   sendsbr.o: sendsbr.c
  9762. ***************
  9763. *** 1667,1668 ****
  9764. --- 1854,1858 ----
  9765.   #sendsbr.o: /usr/include/sys/stat.h
  9766. + @BEGIN: MIME
  9767. + sendsbr.o: ../h/mhn.h
  9768. + @END: MIME
  9769.   show.o: show.c
  9770. ***************
  9771. *** 1670,1671 ****
  9772. --- 1860,1864 ----
  9773.   #show.o: /usr/include/stdio.h
  9774. + @BEGIN: MIME
  9775. + show.o: ../h/mhn.h
  9776. + @END: MIME
  9777.   slocal.o: slocal.c
  9778. ***************
  9779. *** 1723,1724 ****
  9780. --- 1916,1918 ----
  9781.   #trmsbr.o: /usr/include/sys/ioctl.h
  9782. + @BEGIN: TTYD
  9783.   ttym.o: ttym.c
  9784. ***************
  9785. *** 1738,1739 ****
  9786. --- 1932,1934 ----
  9787.   ttyw.o: ttym.c
  9788. + @END: TTYD
  9789.   umhook.o: umhook.c
  9790. ***************
  9791. *** 1768,1769 ****
  9792. --- 1963,1968 ----
  9793.   whatnow.o: whatnow.c
  9794. + whatnowproc.o: whatnowproc.c
  9795. + whatnowproc.o: ../h/mh.h
  9796. + whatnowproc.o: ../h/strings.h
  9797. + #whatnowproc.o: /usr/include/stdio.h
  9798.   whatnowsbr.o: whatnowsbr.c
  9799. *** ../mh-6.7.2/conf/makefiles/zotnet/bboards    Wed Jan 29 15:06:46 1992
  9800. --- conf/makefiles/zotnet/bboards    Thu Nov 12 15:22:54 1992
  9801. ***************
  9802. *** 4,6 ****
  9803.   #    @(MHWARNING)
  9804. ! # @(#)$Id: bboards,v 1.6 1990/04/05 15:16:32 sources Exp $
  9805.   ##############################################################################
  9806. --- 4,6 ----
  9807.   #    @(MHWARNING)
  9808. ! # @(#)$Id: bboards,v 1.7 1992/11/12 23:22:48 jromine Exp $
  9809.   ##############################################################################
  9810. ***************
  9811. *** 27,29 ****
  9812.   
  9813. ! all:        getbbent
  9814.   
  9815. --- 27,29 ----
  9816.   
  9817. ! all:        getbbent.o
  9818.   
  9819. *** ../mh-6.7.2/conf/makefiles/zotnet/mts    Wed Jan 29 15:10:19 1992
  9820. --- conf/makefiles/zotnet/mts    Thu Feb  6 09:29:08 1992
  9821. ***************
  9822. *** 4,6 ****
  9823.   #    @(MHWARNING)
  9824. ! # @(#)$Id: mts,v 1.7 1992/01/29 23:10:03 jromine Exp $
  9825.   ##############################################################################
  9826. --- 4,6 ----
  9827.   #    @(MHWARNING)
  9828. ! # @(#)$Id: mts,v 1.8 1992/02/06 17:29:00 jromine Exp $
  9829.   ##############################################################################
  9830. ***************
  9831. *** 32,33 ****
  9832. --- 32,37 ----
  9833.   
  9834. + OFILES    =    mts.o lock.o client.o
  9835. + LFILES    =    l-mts l-lock l-client
  9836. + IFILES    =    inst-mtstailor
  9837. + 
  9838.   .c:;            echo $@
  9839. ***************
  9840. *** 38,42 ****
  9841.   
  9842. ! all:        mts lock client
  9843.   
  9844. ! lint:        l-mts l-lock l-client
  9845.   
  9846. --- 42,46 ----
  9847.   
  9848. ! all:        $(OFILES)
  9849.   
  9850. ! lint:        $(LFILES)
  9851.   
  9852. ***************
  9853. *** 44,46 ****
  9854.   
  9855. ! inst-all:    inst-mtstailor
  9856.   
  9857. --- 48,50 ----
  9858.   
  9859. ! inst-all:    $(IFILES)
  9860.   
  9861. *** ../mh-6.7.2/conf/makefiles/zotnet/tws    Wed Jan 29 16:31:24 1992
  9862. --- conf/makefiles/zotnet/tws    Fri Nov 20 09:26:04 1992
  9863. ***************
  9864. *** 4,6 ****
  9865.   #    @(MHWARNING)
  9866. ! # @(#)$Id: tws,v 1.10 1992/01/30 00:31:18 jromine Exp $
  9867.   ##############################################################################
  9868. --- 4,6 ----
  9869.   #    @(MHWARNING)
  9870. ! # @(#)$Id: tws,v 1.15 1992/11/18 16:54:16 jromine Exp $
  9871.   ##############################################################################
  9872. ***************
  9873. *** 15,16 ****
  9874. --- 15,17 ----
  9875.   CC      =    @(MHCOMPILER)
  9876. + LN    =    @(LN)
  9877.   LEX    =    @(LEX)
  9878. ***************
  9879. *** 29,30 ****
  9880. --- 30,34 ----
  9881.   
  9882. + OFILES    =    dtimep.o lexstring.o dtime.o
  9883. + LFILES    =     l-dtimep l-dtime l-date
  9884. + 
  9885.   .c:;        echo $@
  9886. ***************
  9887. *** 35,39 ****
  9888.   
  9889. ! all:        dtimep dtime date
  9890.   
  9891. ! lint:        l-dtimep l-dtime l-date
  9892.   
  9893. --- 39,43 ----
  9894.   
  9895. ! all:        $(OFILES) date
  9896.   
  9897. ! lint:        $(LFILES)
  9898.   
  9899. ***************
  9900. *** 64,66 ****
  9901.   dtimep:        dtimep.o lexstring.o
  9902. !  
  9903.   dtimep.o:    dtimep.c
  9904. --- 68,70 ----
  9905.   dtimep:        dtimep.o lexstring.o
  9906. ! 
  9907.   dtimep.o:    dtimep.c
  9908. ***************
  9909. *** 77,85 ****
  9910.   ######################################################################
  9911. - 
  9912. - lex:        zap-dtime dtimep.c
  9913. - 
  9914. - zap-dtime:;    rm -f dtimep.c
  9915. - 
  9916. - 
  9917. - ######################################################################
  9918.   # dtime
  9919. --- 81,82 ----
  9920. ***************
  9921. *** 96,97 ****
  9922. --- 93,97 ----
  9923.   
  9924. + tws.h:        ../tws.h
  9925. +         rm -f $@
  9926. +         $(LN) ../tws.h $@
  9927.   
  9928. ***************
  9929. *** 103,105 ****
  9930.   clean:        unclean
  9931. !         -rm -f *.o date
  9932.   
  9933. --- 103,105 ----
  9934.   clean:        unclean
  9935. !         -rm -f dtimep.c *.o date
  9936.   
  9937. *** ../mh-6.7.2/conf/makefiles/zotnetM    Thu Apr  5 16:05:22 1990
  9938. --- conf/makefiles/zotnetM    Thu Oct 29 08:25:26 1992
  9939. ***************
  9940. *** 4,6 ****
  9941.   #    @(MHWARNING)
  9942. ! # @(#)$Id: zotnetM,v 2.5 90/04/05 15:18:23 sources Exp $
  9943.   ##############################################################################
  9944. --- 4,6 ----
  9945.   #    @(MHWARNING)
  9946. ! # @(#)$Id: zotnetM,v 2.7 1992/10/29 16:25:20 jromine Exp $
  9947.   ##############################################################################
  9948. *** ../mh-6.7.2/conf/mh-gen.8    Thu Jan 30 08:41:44 1992
  9949. --- conf/mh-gen.8    Mon Dec 14 09:19:25 1992
  9950. ***************
  9951. *** 1,2 ****
  9952. ! .\" @(#)$Id: mh-gen.8,v 2.55 1992/01/30 16:41:35 jromine Exp $
  9953.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  9954. --- 1,2 ----
  9955. ! .\" @(#)$Id: mh-gen.8,v 2.105 1992/12/14 17:19:19 jromine Exp $
  9956.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  9957. ***************
  9958. *** 3,5 ****
  9959.   .if n .na
  9960. ! .TH MH-GEN 8 MH [mh.6]
  9961.   .SH NAME
  9962. --- 3,5 ----
  9963.   .if n .na
  9964. ! .TH MH-GEN 8 MH.6.8 [mh.6]
  9965.   .SH NAME
  9966. ***************
  9967. *** 11,13 ****
  9968.   also want to familiarize yourself with the \fIMH\fP Administrator's
  9969. ! Guide before you install \fIMH\fP.
  9970.   .SH DISCLAIMER
  9971. --- 11,14 ----
  9972.   also want to familiarize yourself with the \fIMH\fP Administrator's
  9973. ! Guide before you install \fIMH\fP.  A copy can be found in the
  9974. ! file \fBdoc/ADMIN.doc\fP is the \fIMH\fP sources.
  9975.   .SH DISCLAIMER
  9976. ***************
  9977. *** 66,70 ****
  9978.   1.  If you can FTP to the ARPA Internet, use anonymous FTP to
  9979. ! ics.uci.edu [128.195.1.1] and retrieve the file pub/mh/mh-6.7.tar.Z.
  9980.   This is a tar image after being run through the compress program
  9981. ! (approximately 1.5MB).  There should also be a \fBREADME\fR file in
  9982.   that directory which tells what the current release of \fIMH\fP
  9983. --- 67,71 ----
  9984.   1.  If you can FTP to the ARPA Internet, use anonymous FTP to
  9985. ! ftp.ics.uci.edu [128.195.1.1] and retrieve the file pub/mh/mh-6.8.tar.Z.
  9986.   This is a tar image after being run through the compress program
  9987. ! (approximately 1.8MB).  There should also be a \fBREADME\fR file in
  9988.   that directory which tells what the current release of \fIMH\fP
  9989. ***************
  9990. *** 73,75 ****
  9991.   This tar file is also available on louie.udel.edu 
  9992. ! [128.175.1.3] in portal/mh-6.7.tar.Z.  You may also find MH on
  9993.   various other hosts; to make sure you get the latest version and
  9994. --- 74,76 ----
  9995.   This tar file is also available on louie.udel.edu 
  9996. ! [128.175.1.3] in portal/mh-6.8.tar.Z.  You may also find MH on
  9997.   various other hosts; to make sure you get the latest version and
  9998. ***************
  9999. *** 76,78 ****
  10000.   don't waste your time re-fixing bugs, it's best to get it from
  10001. ! either ics.uci.edu or louie.udel.edu.
  10002.   .PP
  10003. --- 77,79 ----
  10004.   don't waste your time re-fixing bugs, it's best to get it from
  10005. ! either ftp.ics.uci.edu or louie.udel.edu.
  10006.   .PP
  10007. ***************
  10008. *** 92,100 ****
  10009.   .RS 1i
  10010. ! Computing Support Group 
  10011. ! Attn: MH distribution
  10012. ! Department of Information and Computer Science
  10013. ! University of California, Irvine
  10014. ! Irvine, CA  92717
  10015.   
  10016. ! 714/856-7554
  10017.   .fi
  10018. --- 93,100 ----
  10019.   .RS 1i
  10020. ! Univeristy of California at Irvine
  10021. ! Office of Academic Computing
  10022. ! 360 Computer Science
  10023. ! Irvine, CA  92717  USA
  10024.   
  10025. ! +1 714 856 5153
  10026.   .fi
  10027. ***************
  10028. *** 115,120 ****
  10029.   .PP
  10030. ! Become the super-user and create a new directory under /usr/src/local/
  10031. ! (or whatever) for the \fIMH\fR area.
  10032. ! Traditionally, the directory's name should be mh/.
  10033. ! The distribution tape contains the hierarchy for the mh.6/ directory.
  10034.   Bring the sources on-line:
  10035. --- 115,119 ----
  10036.   .PP
  10037. ! Become the super-user and cd to /usr/src/local/
  10038. ! (or whatever you keep your local sources).
  10039. ! The distribution tape contains the hierarchy for the mh.6-8/ directory.
  10040.   Bring the sources on-line:
  10041. ***************
  10042. *** 122,126 ****
  10043.   .nf
  10044. ! # mkdir /usr/src/local/mh
  10045. ! % cd /usr/src/local/mh
  10046.   % tar xv
  10047.   .fi
  10048. --- 121,125 ----
  10049.   .nf
  10050. ! # cd /usr/src/local
  10051.   % tar xv
  10052. + % cd mh-6.8
  10053.   .fi
  10054. ***************
  10055. *** 139,140 ****
  10056. --- 138,140 ----
  10057.   produce customized files.
  10058. + .sp
  10059.   For examples of various configurations,
  10060. ***************
  10061. *** 142,146 ****
  10062.   The file \fBMH\fR provided in \fBconf/\fR is a reasonable default.
  10063.   .PP
  10064. ! Here are the \fIMH\fP configuration options available:
  10065.   .in +.5i
  10066.   .ti -.5i
  10067. --- 142,162 ----
  10068.   The file \fBMH\fR provided in \fBconf/\fR is a reasonable default.
  10069. + Lines beginning with `#' are comments, and are not otherwise interpreted.
  10070.   .PP
  10071. ! Here are the \fIMH\fP configuration directives available.  Be sure
  10072. ! to read through this list completely before attempting to decide
  10073. ! what directives are appropriate for your system.  
  10074. ! .sp
  10075. ! More information on some of these options is available in the
  10076. ! the \fIAdministrator's Guide\fR.  If you do not have a printed
  10077. ! copy, you should configure your system with the default
  10078. ! configuration file, \fBMH\fP, then generate and print a copy
  10079. ! of the guide (as described below).
  10080.   .in +.5i
  10081. + 
  10082. + .de Uh
  10083. + .ti -.75i
  10084. + .B "\\$1"
  10085. + .ne 4
  10086. + ..
  10087. + .Uh "Installation paths"
  10088.   .ti -.5i
  10089. ***************
  10090. *** 151,159 ****
  10091.   .ti -.5i
  10092. - debug: off
  10093. - .br
  10094. - Support for debug mode of \fIMH\fR.
  10095. - Don't use this unless you know what you're doing,
  10096. - which isn't likely if you're reading this document!
  10097. - 
  10098. - .ti -.5i
  10099.   etc: /usr/local/lib/mh
  10100. --- 167,168 ----
  10101. ***************
  10102. *** 172,179 ****
  10103.   .ti -.5i
  10104. - mailgroup: off
  10105. - .br
  10106. - If set, \fIinc\fR is made set-group-id to this group name.
  10107. - Some SYS5 systems want this to be set to \*(lqmail\*(rq.
  10108. - 
  10109. - .ti -.5i
  10110.   mandir: /usr/man
  10111. --- 181,182 ----
  10112. ***************
  10113. *** 200,202 ****
  10114.   .br
  10115. ! The location of the \fIchown\fR\0(8) on your system.
  10116.   If \fIchown\fR is in your search path,
  10117. --- 203,205 ----
  10118.   .br
  10119. ! The location of the \fIchown\fR\|(8) on your system.
  10120.   If \fIchown\fR is in your search path,
  10121. ***************
  10122. *** 207,211 ****
  10123.   .ti -.5i
  10124. ! editor: prompter
  10125.   .br
  10126. ! The default editor for \fIMH\fR.
  10127.   
  10128. --- 210,215 ----
  10129.   .ti -.5i
  10130. ! cp: cp
  10131.   .br
  10132. ! The command to copy files when installing, if not \*(lqcp\*(rq.
  10133. ! (Some sites use \*(lqcp\0\-p\*(rq.)
  10134.   
  10135. ***************
  10136. *** 212,213 ****
  10137. --- 216,225 ----
  10138.   .ti -.5i
  10139. + ln: ln
  10140. + .br
  10141. + The command to link files together in the source tree, if not \*(lqln\*(rq.
  10142. + If you're using something like \fBlndir\fP to keep
  10143. + your compile tree separate from your source tree,
  10144. + set this to \*(lqln\0\-s\*(rq or \*(lqcp\*(rq.
  10145. + 
  10146. + .ti -.5i
  10147.   remove: mv \-f
  10148. ***************
  10149. *** 214,218 ****
  10150.   .br
  10151. ! How \fIMH\fR should backup existing files when installing a new file.
  10152.   
  10153.   .ti -.5i
  10154.   mts: sendmail
  10155. --- 226,306 ----
  10156.   .br
  10157. ! How \fIMH\fR should make backup copies
  10158. ! of existing files when installing new files.
  10159. ! To simply remove the old files, use \*(lqrm\0\-f\*(rq.
  10160.   
  10161. + .Uh "Compiler/loader"
  10162.   .ti -.5i
  10163. + cc: cc
  10164. + .br
  10165. + The name of your C compiler, if not \*(lqcc\*(rq.
  10166. + 
  10167. + .ti -.5i
  10168. + ccoptions: \-O
  10169. + .br
  10170. + Options given directly to \fIcc\fR\|(1).
  10171. + The most common is \*(lq\-M\*(rq if you're running \fIMH\fR on an ALTOS.
  10172. + This defaults to \*(lq\-O\*(rq.  If you define this and want to 
  10173. + keep \*(lq\-O\*(rq, be sure to include it explicitly.
  10174. + If you're using the \fIGNU\fP C compiler, it should
  10175. + include `\-traditional'.  See \*(lqoptions:\*(rq for `\-D' options.
  10176. + 
  10177. + .ti -.5i
  10178. + curses: \-lcurses\0\-ltermlib
  10179. + .br
  10180. + This should be the loader option required to load the \fItermcap\fR\|(3)
  10181. + and \fIcurses\fR\|(3) libraries on your system.
  10182. + On SYS5 systems, it probably should be just \*(lq\-lcurses\*(rq.
  10183. + Some sites have reported that both \*(lq\-lcurses\*(rq and
  10184. + \*(lq\-ltermlib\*(rq are necessary.
  10185. + 
  10186. + .ti -.5i
  10187. + ldoptions: \-s
  10188. + .br
  10189. + Options given directly to \fIld\fR\|(1) (via \fIcc\fR\|) at the beginning
  10190. + of the command line.
  10191. + Useful for machines which require arguments to tell \fIld\fR to increase the
  10192. + stack space (e.g. the Gould, which uses \*(lq\-m\08\*(rq).
  10193. + Usually, \*(lq\-s\*(rq is a good choice in any event.
  10194. + 
  10195. + .ti -.5i
  10196. + ldoptlibs:
  10197. + .br
  10198. + Options given directly to \fIld\fR\|(1) (via \fIcc\fR\|) at the end of the
  10199. + command line.
  10200. + The two most common are:
  10201. + \*(lq\-ldbm\*(rq if you're running MMDF with the \fIdbm\fR package;
  10202. + and, \*(lq\-lndir\*(rq if you are generating \fIMH\fR on a system
  10203. + which does not load the new directory access mechanism by default
  10204. + (e.g., 4.1BSD, SYS5).
  10205. + If you don't have \fIlibndir\fR on your system,
  10206. + the sources are in \fBmiscellany/libndir/\fR.
  10207. + 
  10208. + .ti -.5i
  10209. + lex: lex \-nt
  10210. + .br
  10211. + Alternative version of \fIlex\fR.  Used in \fBzotnet/tws/\fR.
  10212. + 
  10213. + .ti -.5i
  10214. + oldload: off
  10215. + .br
  10216. + This controls how \fIMH\fP will try to process library object files to
  10217. + eliminate local symbols.
  10218. + Support for the ALTOS loader if \*(lqon\*(rq.
  10219. + Support for loaders not handling `\-x\0\-r' correctly if \*(lqnone\*(rq.
  10220. + 
  10221. + .ti -.5i
  10222. + ranlib: on
  10223. + .br
  10224. + Support for systems with \fIranlib\fR\|(1).
  10225. + For SYSTEM 5 systems,
  10226. + this should be \*(lqoff\*(rq which tells \fIMH\fR to use \fIlorder\fR and
  10227. + \fItsort\fR instead.
  10228. + Some SYSTEM 5 sites reported that running this isn't always sufficient.
  10229. + If this is the case,
  10230. + then you should edit \fBconf/makefiles/uip\fR to include
  10231. + \fB\&../sbr/libmh.a\fR and \fB../zotnet/libzot.a\fR twice in the LIBES
  10232. + variable.
  10233. + 
  10234. + .Uh "Message Transport System"
  10235. + .ti -.5i
  10236.   mts: sendmail
  10237. ***************
  10238. *** 223,224 ****
  10239. --- 311,313 ----
  10240.   \*(lqsendmail\*(rq to have \fISendMail\fR as the transport system,
  10241. + \*(lqzmailer\*(rq to have \fIZMAILER\fP as the transport system,
  10242.   or, \*(lqmh\*(rq to have \fIMH\fR as the transport system.
  10243. ***************
  10244. *** 235,237 ****
  10245.   Guide\fR; be sure to set \*(lqservers:\*(rq as described in
  10246. ! \fImh\-tailor\fR\0(8) if you use this option.
  10247.   
  10248. --- 324,326 ----
  10249.   Guide\fR; be sure to set \*(lqservers:\*(rq as described in
  10250. ! \fImh\-tailor\fR\|(8) if you use this option.
  10251.   
  10252. ***************
  10253. *** 238,239 ****
  10254. --- 327,337 ----
  10255.   .ti -.5i
  10256. + mf: off
  10257. + .br
  10258. + Support for mail filtering on those systems in which the message transport
  10259. + system isn't integrated with \fIUUCP\fR 
  10260. + This option is strictly for an \fIMH\fR system using either \fIMMDF\-I\fR
  10261. + as its transport system or one using \*(lqstand\-alone delivery\*(rq.
  10262. + 
  10263. + .Uh "UCI BBoards Facility"
  10264. + .ti -.5i
  10265.   bboards: off
  10266. ***************
  10267. *** 246,250 ****
  10268.   via the NNTP.
  10269. ! If \*(lqpop\*(rq (formerly \*(lqpopbboards:\ on\*(rq),
  10270.   include support for the UCI BBoards facility via the POP3 service;
  10271. ! this setting requires \*(lqpop:\ on\*(rq.
  10272.   
  10273. --- 344,348 ----
  10274.   via the NNTP.
  10275. ! If \*(lqpop\*(rq (formerly \*(lqpopbboards:\0on\*(rq),
  10276.   include support for the UCI BBoards facility via the POP3 service;
  10277. ! this setting requires \*(lqpop:\0on\*(rq.
  10278.   
  10279. ***************
  10280. *** 273,283 ****
  10281.   
  10282.   .ti -.5i
  10283. - mf: off
  10284. - .br
  10285. - Support for mail filtering on those systems in which the message transport
  10286. - system isn't integrated with \fIUUCP\fR 
  10287. - This option is strictly for an \fIMH\fR system using either \fIMMDF\-I\fR
  10288. - as its transport system or one using \*(lqstand\-alone delivery\*(rq.
  10289. - 
  10290. - .ti -.5i
  10291.   pop: off
  10292. --- 371,374 ----
  10293.   
  10294. + .Uh "Post Office Protocol"
  10295.   .ti -.5i
  10296.   pop: off
  10297. ***************
  10298. *** 290,305 ****
  10299.   (It doesn't hurt to enable this option regardless of whether or not
  10300. ! you intend to use POP.)
  10301. ! If POP is enabled, there are three additional options which are of interest:
  10302. ! \*(lqRPOP\*(rq, \*(lqDPOP\*(rq and \*(lqPOP2\*(rq.
  10303. ! The first indicates that support for the UNIX variant of POP,
  10304. ! RPOP, which uses privileged sockets for authentication be enabled.
  10305. ! This peacefully co\-exists with the standard POP.
  10306. ! The \*(lqDPOP\*(rq option indicates that POP subscribers do not have
  10307. ! entries in the \fIpasswd\fR\0(5) file,
  10308. ! and instead have their own separate database (another major win).
  10309. ! The \*(lqPOP2\*(rq option indicates that the \fIMH\fP POP daemon should
  10310. ! speak the older POP2 protocol in addition to the \fIMH\fP POP3 protocol \-
  10311. ! a major win.
  10312. ! All of these options can be enabled via an \*(lqoptions\*(rq directive in the
  10313. ! \fIMH\fR configuration file.
  10314.   
  10315. --- 381,384 ----
  10316.   (It doesn't hurt to enable this option regardless of whether or not
  10317. ! you intend to use POP.)  See also \*(lqbboards: pop\*(rq to enable
  10318. ! reading bboards with the POP.
  10319.   
  10320. ***************
  10321. *** 306,307 ****
  10322. --- 385,392 ----
  10323.   .ti -.5i
  10324. + popdir: /usr/etc
  10325. + .br
  10326. + The directory where the POP daemon (\fBpopd\fP) will be installed.
  10327. + 
  10328. + .ne 5
  10329. + .ti -.5i
  10330.   options:
  10331. ***************
  10332. *** 308,324 ****
  10333.   .br
  10334. ! \&`\-D' options to \fIcc\fR\0(1).  If you don't know what an
  10335. ! option does, it probably doesn't apply to you.
  10336.   
  10337.   .in +.5i
  10338.   .ti -.5i
  10339. ! ALTOS
  10340.   .br
  10341. ! Use on XENIX/v7 systems.
  10342. ! Also, be sure to use \*(lqoptions V7\*(rq.
  10343.   
  10344.   .ti -.5i
  10345. ! ATHENA
  10346.   .br
  10347. ! Makes \fIrepl\fR `\-nocc\ all' the default instead of `\-cc\ all'.
  10348. ! You may want to enable this if you're using \fIxmh\fR.
  10349.   
  10350. --- 393,576 ----
  10351.   .br
  10352. ! \&`\-D' options to \fIcc\fR\|(1).
  10353. ! .sp
  10354. ! .in +.25i
  10355. ! .ti -.5i
  10356. ! APOP='\*(lq/etc/pop.auth\*(rq'
  10357. ! .br
  10358. ! This option indicates that the POP daemon will
  10359. ! support the non-standard \fBAPOP\fP command,
  10360. ! and specifies the name of \fBAPOP\fP authorization database.
  10361. ! The \fBAPOP\fP
  10362. ! command provides a challenge-based authentication system using
  10363. ! the \fBMD5\fP message digest algorithm.
  10364. ! This facility is documented in 
  10365. ! \fIThe Internet Message\fR (ISBN 0\-13\-092941\-7), a book by Marshall T. Rose.
  10366. ! .sp
  10367. ! This option also causes the
  10368. ! \fBpopauth\fP program to be installed, which
  10369. ! allows the administrator to manipulate the \fBAPOP\fP
  10370. ! authorization database.
  10371. ! For more details, see \fBsupport/pop/pop-more.txt\fR
  10372. ! and the \fIAdministrator's Guide\fP.
  10373.   
  10374. + .ti -.5i
  10375. + DPOP
  10376. + .br
  10377. + This option indicates that POP subscribers do not have
  10378. + entries in the \fIpasswd\fR\|(5) file,
  10379. + and instead have their own separate database (a win).
  10380. + 
  10381. + .ti -.5i
  10382. + KPOP
  10383. + .br
  10384. + Support for KERBEROS with POP.
  10385. + This code builds
  10386. + \fIpopd\fP, \fIinc\fP and \fImsgchk\fP to support only the 
  10387. + \*(lqkpop\*(rq protocol.
  10388. + This code is still experimental, but is available for 
  10389. + those sites wishing to test it.
  10390. + 
  10391. + .ti -.5i
  10392. + MPOP
  10393. + .br
  10394. + This option indicates that the POP daemon will
  10395. + support the non-standard
  10396. + \fBXTND SCAN\fP command which provides performance
  10397. + enhancements when using the POP over low-speed connections.
  10398. + This option also causes an interactive POP
  10399. + client program, \fBpopi\fP, to be compiled and installed.
  10400. + A man page for the \fBpopi\fP program is also provided.
  10401. + .sp
  10402. + These extensions are described in 
  10403. + \fIThe Internet Message\fR, a book by Marshall T. Rose.
  10404. + For more details, see \fBsupport/pop/pop-more.txt\fR.
  10405. + \fBNote:\fP this option requires \*(lqbboards: pop\*(rq.
  10406. + 
  10407. + .ti -.5i
  10408. + POP2
  10409. + .br
  10410. + Have the POP daemon understand the older
  10411. + POP2 protocol as well as the \fIMH\fP POP3 protocol \- a major win.
  10412. + The POP daemon auto-magically
  10413. + determines which POP protocol your client is using.
  10414. + If you're enabling POP service,
  10415. + there's no reason not to enable this option as well.
  10416. + See also \fIPOPSERVICE\fR.
  10417. + 
  10418. + .ti -.5i
  10419. + POPSERVICE
  10420. + .br
  10421. + The port name the \fIMH\fP POP will use.  For historical reasons,
  10422. + this defaults to \*(lqpop\*(rq.
  10423. + .sp
  10424. + In 1987, the \fIMH\fP POP protocol
  10425. + (POP version 3) was published as RFC1081 and
  10426. + was assigned its own port number (110),
  10427. + which differs from the original POP (version 1 and 2) port number (109).
  10428. + .sp
  10429. + To have \fIMH\fP POP use the new assigned port number, 
  10430. + set POPSERVICE='\*(lqpop3\*(rq', and be sure that this service
  10431. + name is listed in your \fB/etc/services\fP file on both POP client
  10432. + and server hosts as \*(lq110/tcp\*(rq.
  10433. + If you enable \fIPOP2\fP, you can safely leave \fIPOPSERVICE\fP
  10434. + undefined unless you are using POP3 clients besides \fIMH\fP.
  10435. + 
  10436. + .ti -.5i
  10437. + RPOP
  10438. + .br
  10439. + This option indicates that support for the UNIX variant of POP,
  10440. + RPOP, which uses privileged sockets for authentication be enabled.
  10441. + This peacefully co-exists with the standard POP.
  10442. + 
  10443. + .ti -.5i
  10444. + SHADOW
  10445. + .br
  10446. + Indicates that the \fBpopd\fP POP server
  10447. + can find encrypted passwords in the
  10448. + \fB/etc/shadow\fR file (and not in the \fB/etc/passwd\fR file).
  10449. + It should be used only for some (newer) SYSTEM 5 systems.
  10450. + .in -.25i
  10451. + 
  10452. + The \*(lqAPOP\*(rq and \*(lqMPOP\*(rq non-standard POP
  10453. + facilities are documented in
  10454. + \fIThe Internet Message\fR (ISBN 0\-13\-092941\-7),
  10455. + a book by Marshall T. Rose.
  10456. + For more details, see \fBsupport/pop/pop-more.txt\fR.
  10457. + The \*(lqAPOP\*(rq option peacefully co-exists with the standard POP.
  10458. + The \*(lqMPOP\*(rq option requires \*(lqbboards: pop\*(rq.
  10459. + 
  10460. + .Uh "Shared libraries"
  10461. + .ti -.5i
  10462. + sharedlib: off
  10463. + .br
  10464. + If \*(lqsun4\*(rq,
  10465. + makes libmh.a into a SunOS 4.0 (and later) shared library.
  10466. + If you enable this, be sure to also use \*(lqoptions SUN40\*(rq.
  10467. + If \*(lqsys5\*(rq, 
  10468. + makes libmh.a into a SYS5 R4 (and later) shared library.
  10469. + If you enable this, be sure to also use \*(lqoptions SVR4\*(rq.
  10470. + 
  10471. + .ti -.5i
  10472. + slflags: \-pic
  10473. + .br
  10474. + The compiler flags to produce position independent code.
  10475. + 
  10476. + .ti -.5i
  10477. + slibdir: /usr/local/lib
  10478. + .br
  10479. + The directory where the \fIMH\fP shared library should go.
  10480. + 
  10481. + .ne 4
  10482. + .ti -.25i
  10483. + Under SunOS (sun4)
  10484. + .br
  10485. + Since some \fIMH\fP programs are setuid, they'll only look for
  10486. + the library in \*(lqtrusted\*(rq locations.  Putting the library
  10487. + somewhere besides \fB/usr/lib\fP or \fB/usr/local/lib\fP is not advisable.
  10488. + 
  10489. + If you \fBmust\fP do this, be sure that you add the 
  10490. + path given by \fBslibdir\fP to the compiler's library search list 
  10491. + (e.g., \*(lqldoptions:\0\-L/usr/mh/lib\*(rq)
  10492. + and make sure the path starts with a leading `/'.
  10493. + 
  10494. + You may need to run \fIldconfig\fP\|(8) manually whenever a new
  10495. + shared object is installed on the system.
  10496. + See \fIld\fR\|(1) for more information about using shared libraries.
  10497. + 
  10498. + .ti -.25i
  10499. + Under Solaris 2.0 (and newer)
  10500. + .br
  10501. + The above instructions for SunOS apply, except you should set
  10502. + the run-time library search path using `\-R' instead of `\-L'
  10503. + (e.g., \*(lqldoptions: \-R/usr/mh/lib\*(rq).
  10504. + 
  10505. + .Uh "General System Dependencies"
  10506. + .in -.5i
  10507. + You should include the following directives 
  10508. + which are appropriate for your version of UNIX.
  10509. + If you don't know what an
  10510. + option does, it probably doesn't apply to you.
  10511.   .in +.5i
  10512. + 
  10513.   .ti -.5i
  10514. ! mailgroup: off
  10515.   .br
  10516. ! If set, \fIinc\fR is made set-group-id to this group name.
  10517. ! Some SYS5 systems want this to be set to \*(lqmail\*(rq.
  10518. ! Set this if your \fB/usr/spool/mail\fP is not world-writeable.
  10519.   
  10520. + Note that \fBslocal\fP doesn't know how to deal with this,
  10521. + and will not work under these systems; just making it set-group-id
  10522. + will open a security hole.
  10523. + If you're using \*(lqmailgroup\*(rq,
  10524. + you should remove \fBslocal\fP (and its man page) from your system.
  10525. + 
  10526.   .ti -.5i
  10527. ! signal: int
  10528.   .br
  10529. ! The base type (int or void) of the function
  10530. ! parameter/return value of \fIsignal\fR\|(2).
  10531. ! The default is \fBint\fR.
  10532. ! Set \*(lqsignal void\*(rq on systems which use this type
  10533. ! (e.g., SYSTEM 5 V3.0 and later or Sun OS 4.0 and later).
  10534.   
  10535. ***************
  10536. *** 325,326 ****
  10537. --- 577,599 ----
  10538.   .ti -.5i
  10539. + sprintf: char *
  10540. + .br
  10541. + The return value of the \fIsprintf\fR library routine.
  10542. + This defaults to \*(lqchar\0*\*(rq.  Set this to \*(lqint\*(rq if
  10543. + you have an older version of SYSTEM 5 which has this routine return an
  10544. + \*(lqint\*(rq type.
  10545. + 
  10546. + .ne 5
  10547. + .ti -.5i
  10548. + options:
  10549. + .br
  10550. + \&`\-D' options to \fIcc\fR\|(1).
  10551. + .sp
  10552. + .in +.25i
  10553. + .ti -.5i
  10554. + ALTOS
  10555. + .br
  10556. + Use on XENIX/v7 systems.
  10557. + Also, be sure to use \*(lqoptions V7\*(rq.
  10558. + 
  10559. + .ti -.5i
  10560.   ATTVIBUG
  10561. ***************
  10562. *** 339,343 ****
  10563.   .ti -.5i
  10564. ! ATZ
  10565.   .br
  10566. ! Directs \fIMH\fR to use alpha\-timezones whenever possible.
  10567.   
  10568. --- 612,616 ----
  10569.   .ti -.5i
  10570. ! AUX
  10571.   .br
  10572. ! Use with AUX systems.
  10573.   
  10574. ***************
  10575. *** 344,359 ****
  10576.   .ti -.5i
  10577. - BANG
  10578. - .br
  10579. - Directs \fIMH\fR to favor `!' over `@' in addressing.
  10580. - 
  10581. - .ti -.5i
  10582. - BERK
  10583. - .br
  10584. - Optional for for 4.{2,3}BSD sites running SendMail.
  10585. - Disables nearly all of the RFC822 address and header-parsing routines
  10586. - in favor of recognizing such formats as ASCnet, and so on.
  10587. - If you don't need to disable the parser for this reason,
  10588. - you probably want to use \*(lqoptions DUMB\*(rq instead.
  10589. - 
  10590. - .ti -.5i
  10591.   BIND
  10592. --- 617,618 ----
  10593. ***************
  10594. *** 379,383 ****
  10595.   Also, be sure to use \*(lqoptions BSD42\*(rq.
  10596. ! If \fIopenlog\fR\0(3) (see \*(lqman 3 syslog\*(rq)
  10597.   takes three arguments instead of two,
  10598. ! and your \fIwrite\fR\0(1) command is set\-group\-id
  10599.   to group \*(lqtty\*(rq, use this option.
  10600. --- 638,642 ----
  10601.   Also, be sure to use \*(lqoptions BSD42\*(rq.
  10602. ! If \fIopenlog\fR\|(3) (see \*(lqman 3 syslog\*(rq)
  10603.   takes three arguments instead of two,
  10604. ! and your \fIwrite\fR\|(1) command is set\-group\-id
  10605.   to group \*(lqtty\*(rq, use this option.
  10606. ***************
  10607. *** 386,392 ****
  10608.   .ti -.5i
  10609. ! COMPAT
  10610.   .br
  10611. ! If you previously ran a version of \fIMH\fR earlier than mh.4 use this option.
  10612. ! After a short grace period,
  10613. ! remove it and re-{configure,generate,install} everything.
  10614.   
  10615. --- 645,650 ----
  10616.   .ti -.5i
  10617. ! BSD44
  10618.   .br
  10619. ! Use on Berkeley UNIX systems on or after 4.4BSD.
  10620. ! This code is still under development.
  10621.   
  10622. ***************
  10623. *** 393,397 ****
  10624.   .ti -.5i
  10625. ! DBM
  10626.   .br
  10627. ! Use this option if your \fIgetpwent\fR\0(3) routines read a 
  10628.   dbm database (such as with Yellow Pages) instead of doing
  10629. --- 651,655 ----
  10630.   .ti -.5i
  10631. ! DBMPWD
  10632.   .br
  10633. ! Use this option if your \fIgetpwent\fR\|(3) routines read a 
  10634.   dbm database (such as with Yellow Pages) instead of doing
  10635. ***************
  10636. *** 398,400 ****
  10637.   a sequential read of \fB/etc/passwd\fR.
  10638. ! Without DBM the entire passwd file is read into
  10639.   memory one entry at a time for alias expansion.
  10640. --- 656,658 ----
  10641.   a sequential read of \fB/etc/passwd\fR.
  10642. ! Without DBMPWD the entire passwd file is read into
  10643.   memory one entry at a time for alias expansion.
  10644. ***************
  10645. *** 407,411 ****
  10646.   .ti -.5i
  10647. ! DPOP
  10648.   .br
  10649. ! Enables the POP database, useful only if POP service is enabled.
  10650.   
  10651. --- 665,671 ----
  10652.   .ti -.5i
  10653. ! FCNTL
  10654.   .br
  10655. ! Directs \fIMH\fP to use the \fBfcntl()\fP system call for kernel-level
  10656. ! locking.  If you're using a SYS5 system, you may want
  10657. ! this option.  (See also `FLOCK' and `LOCKF').
  10658.   
  10659. ***************
  10660. *** 412,417 ****
  10661.   .ti -.5i
  10662. ! DUMB
  10663.   .br
  10664. ! Directs \fIMH\fR not to try and rewrite addresses to their 
  10665. ! \*(lqofficial\*(rq form.
  10666.   
  10667. --- 672,679 ----
  10668.   .ti -.5i
  10669. ! FLOCK
  10670.   .br
  10671. ! Directs \fIMH\fP to use the \fBflock()\fP system call for kernel-level
  10672. ! locking.  If you're on a BSD42 system,
  10673. ! and you're not using NFS to read or write maildrops,
  10674. ! you should enable this option.  (See also `FCNTL' and `LOCKF').
  10675.   
  10676. ***************
  10677. *** 418,424 ****
  10678.   .ti -.5i
  10679. ! FOLDPROT
  10680.   .br
  10681. ! Defines the octal value for default folder-protection.
  10682. ! For example, FOLDPROT='\*(lq0700\*(rq'.
  10683. ! The default is \*(lq0711\*(rq.
  10684.   
  10685. --- 680,685 ----
  10686.   .ti -.5i
  10687. ! HESIOD
  10688.   .br
  10689. ! Support for HESIOD.  
  10690. ! This code was contributed, and included no documentation.
  10691.   
  10692. ***************
  10693. *** 425,440 ****
  10694.   .ti -.5i
  10695. - ISI
  10696. - .br
  10697. - When using \*(lqrepl\ \-ccme\*(rq,
  10698. - only \*(lqcc:\*(rq the first address found which belongs to the user;
  10699. - any other \fIAlternate-Mailboxes\fR do not receive \*(lqcc:\*(rqs.
  10700. - 
  10701. - .ti -.5i
  10702. - LINK
  10703. - .br
  10704. - Defines the filename for alternate file name for \fIdist\fR and \fIrepl\fR.
  10705. - For example, LINK='\*(lq\\\\043\*(rq' to use the pound\-sign character.
  10706. - The default is \*(lq@\*(rq.
  10707. - 
  10708. - .ti -.5i
  10709.   LOCKF
  10710. --- 686,687 ----
  10711. ***************
  10712. *** 441,445 ****
  10713.   .br
  10714. ! Directs \fIMH\fP to use the \fBlockf()\fP system call for UNIX-style
  10715. ! locking instead of \fBflock()\fP.  If you're using NFS to read or
  10716. ! write maildrops, you should enable this option.
  10717.   
  10718. --- 688,693 ----
  10719.   .br
  10720. ! Directs \fIMH\fP to use the \fBlockf()\fP system call for kernel-level
  10721. ! locking.  If you're using NFS to read or
  10722. ! write maildrops, you should enable this option.  (See also `FLOCK'
  10723. ! and `FCNTL').
  10724.   
  10725. ***************
  10726. *** 448,450 ****
  10727.   .br
  10728. ! Hard\-wires the local name for the host \fIMH\fR is running on.
  10729.   For example, locname='\*(lqPICKLE\*(rq'.
  10730. --- 696,698 ----
  10731.   .br
  10732. ! Hard-wires the local name for the host \fIMH\fR is running on.
  10733.   For example, locname='\*(lqPICKLE\*(rq'.
  10734. ***************
  10735. *** 454,467 ****
  10736.   .ti -.5i
  10737. - MHE
  10738. - .br
  10739. - Enables crude support for Brien Reid's MHE interface.
  10740. - Recommended for use with the GNU Emacs mh-e package.
  10741. - 
  10742. - .ti -.5i
  10743. - MHRC
  10744. - .br
  10745. - Enables \fIMH\fR to recognize the \fICShell\fR's `~'\-construct.
  10746. - This is useful for sites that run with a ~/.mhrc for their users.
  10747. - 
  10748. - .ti -.5i
  10749.   MORE
  10750. --- 702,703 ----
  10751. ***************
  10752. *** 468,471 ****
  10753.   .br
  10754. ! Defines  the location of the \fImore\fR\0(1) program.
  10755. ! For example, on ALTOS and DUAL systems,
  10756.   MORE='\*(lq/usr/bin/more\*(rq'.
  10757. --- 704,707 ----
  10758.   .br
  10759. ! Defines  the location of the \fImore\fR\|(1) program.
  10760. ! On ALTOS and DUAL systems, set
  10761.   MORE='\*(lq/usr/bin/more\*(rq'.
  10762. ***************
  10763. *** 474,482 ****
  10764.   .ti -.5i
  10765. - MSGPROT
  10766. - .br
  10767. - Defines the octal value for default folder-protection
  10768. - For example, MSGPROT='\*(lq0600\*(rq'.
  10769. - The default is \*(lq0644\*(rq.
  10770. - 
  10771. - .ti -.5i
  10772.   NDIR
  10773. --- 710,711 ----
  10774. ***************
  10775. *** 486,488 ****
  10776.   in \fB<ndir.h>\fR if this option is given.
  10777. ! Otherwise, \fIMH\fR will try \fB<ndir.h>\fR.
  10778.   If you still can't get this to work on your system,
  10779. --- 715,717 ----
  10780.   in \fB<ndir.h>\fR if this option is given.
  10781. ! Otherwise, \fIMH\fR will try \fB<dir.h>\fR.
  10782.   If you still can't get this to work on your system,
  10783. ***************
  10784. *** 489,490 ****
  10785. --- 718,720 ----
  10786.   edit \fBh/local.h\fR as appropriate.
  10787. + (See also `SYS5DIR'.)
  10788.   
  10789. ***************
  10790. *** 495,497 ****
  10791.   If you get an undefined symbol \*(lqruserpass\*(rq when compiling
  10792. ! \fIMH\fP, you need this option.
  10793.   
  10794. --- 725,729 ----
  10795.   If you get an undefined symbol \*(lqruserpass\*(rq when compiling
  10796. ! \fIMH\fP, you need this option.  If, however, you include this
  10797. ! option and get an undefined symbol \*(lq\(ru\^\(ruruserpass\*(rq
  10798. ! when compiling, then you should omit this option.
  10799.   
  10800. ***************
  10801. *** 504,510 ****
  10802.   .ti -.5i
  10803. - NOMHSEQ
  10804. - .br
  10805. - Directs \fIMH\fR to make private sequences the default.
  10806. - 
  10807. - .ti -.5i
  10808.   NTOHLSWAP
  10809. --- 736,737 ----
  10810. ***************
  10811. *** 519,524 ****
  10812.   .ti -.5i
  10813. ! OVERHEAD
  10814.   .br
  10815. ! Enable \fIMH\fR commands to read profile/context from open fd:s
  10816. ! without doing an open(); see mh-profile(5) for the details.
  10817.   
  10818. --- 746,751 ----
  10819.   .ti -.5i
  10820. ! RENAME
  10821.   .br
  10822. ! Include this option if your system has a \fBrename()\fP library
  10823. ! call.  This is true on BSD42 and newer and some SYS5 systems.
  10824.   
  10825. ***************
  10826. *** 525,570 ****
  10827.   .ti -.5i
  10828. - POP2
  10829. - .br
  10830. - Have the POP daemon understand the older
  10831. - POP2 protocol as well as the \fIMH\fP POP3 protocol \- a major win.
  10832. - The POP daemon auto-magically
  10833. - determines which POP protocol your client is using.
  10834. - If you're enabling POP service,
  10835. - there's no reason not to enable this option as well.
  10836. - See also \fIPOPSERVICE\fR.
  10837. - 
  10838. - .ti -.5i
  10839. - POPSERVICE
  10840. - .br
  10841. - The port name the \fIMH\fP POP will use.  For historical reasons,
  10842. - this defaults to \*(lqpop\*(rq.
  10843. - In 1987, the \fIMH\fP POP protocol
  10844. - (POP version 3) was published as RFC1081 and
  10845. - was assigned its own port number (110),
  10846. - which differs from the original POP (version 1 and 2) port number (109).
  10847. - To have \fIMH\fP POP use the new assigned port number, 
  10848. - set POPSERVICE='\*(lqpop3\*(rq', and be sure that this service
  10849. - name is listed in your \fB/etc/services\fP file on both POP client
  10850. - and server hosts as \*(lq110/tcp\*(rq.
  10851. - If you enable \fIPOP2\fP, you can safely leave this undefined unless
  10852. - you are using POP3 clients besides \fIMH\fP.
  10853. - 
  10854. - .ti -.5i
  10855. - RPATHS
  10856. - .br
  10857. - Directs \fIinc\fR to note UNIX \*(lqFrom\ \*(rq lines as Return-Path: info.
  10858. - 
  10859. - .ti -.5i
  10860. - RPOP
  10861. - .br
  10862. - Enables the RPOP variant of POP, useful only if POP service is enabled.
  10863. - 
  10864. - .ti -.5i
  10865. - SBACKUP
  10866. - .br
  10867. - Defines the prefix string for backup file names.
  10868. - For example, SBACKUP='\*(lq\\\\043\*(rq'.
  10869. - The default is \*(lq,\*(rq.
  10870. - 
  10871. - .ti -.5i
  10872.   SENDMAILBUG
  10873. --- 752,753 ----
  10874. ***************
  10875. *** 573,575 ****
  10876.   to be considered the same as code 250 (OK).
  10877. ! Enable this if you know that your SendMail will
  10878.   return this code even when it doesn't mean to indicate a failure.
  10879. --- 756,759 ----
  10880.   to be considered the same as code 250 (OK).
  10881. ! Since this might cause problems, only
  10882. ! enable this if you are certain that your SendMail will
  10883.   return this code even when it doesn't mean to indicate a failure.
  10884. ***************
  10885. *** 577,585 ****
  10886.   .ti -.5i
  10887. - SHADOW
  10888. - .br
  10889. - Indicates that the encrypted passwords can be found in the
  10890. - \fB/etc/shadow\fR file (and not in the \fB/etc/passwd\fR file).
  10891. - This option should only be used for some (newer) SYSTEM 5 systems.
  10892. - 
  10893. - .ti -.5i
  10894.   SOCKETS
  10895. --- 761,762 ----
  10896. ***************
  10897. *** 594,606 ****
  10898.   .br
  10899. ! Use on Sun OS 4.0 (and later?) systems.  You probably also want
  10900.   \*(lqoptions BSD42\*(rq, \*(lqoptions BSD43\*(rq, and
  10901. ! \*(lqoptions TYPESIG=void\*(rq.
  10902.   
  10903. ! .ti -.5i
  10904. ! SUN41
  10905. ! .br
  10906. ! Use on Sun OS 4.1 (and later?) systems.  You also want
  10907. ! \*(lqoptions SUN40\*(rq,
  10908. ! \*(lqoptions BSD42\*(rq, \*(lqoptions BSD43\*(rq, and
  10909. ! \*(lqoptions TYPESIG=void\*(rq.
  10910.   
  10911. --- 771,780 ----
  10912.   .br
  10913. ! Use on Sun OS 4.0 (and later?) systems.  You also will need
  10914.   \*(lqoptions BSD42\*(rq, \*(lqoptions BSD43\*(rq, and
  10915. ! \*(lqsignal void\*(rq.
  10916.   
  10917. ! If you're using Sun's brain-damaged approach to offering Domain
  10918. ! Name Service through NIS, be sure to include
  10919. ! \*(lqoptions BIND\*(rq and
  10920. ! \*(lqldoptions \-lresolv\*(rq to work around some NIS/DNS bugs.
  10921.   
  10922. ***************
  10923. *** 621,625 ****
  10924.   .ti -.5i
  10925. ! TTYD
  10926.   .br
  10927. ! Support for TTYD.  This is no longer in wide use, and is not recommended.
  10928.   
  10929. --- 795,803 ----
  10930.   .ti -.5i
  10931. ! SVR4
  10932.   .br
  10933. ! Use on AT&T SYSTEM 5 R4 (and newer?) UNIX systems. You should 
  10934. ! also include \*(lqoptions SYS5\*(rq and \*(lqoptions SYS5DIR\*(rq.
  10935. ! See also \fImailgroup\fR.
  10936. ! You will also need to include \*(lqoldload none\*(rq if your \fBld\fP
  10937. ! doesn't handle `\-x\0\-r' correctly.
  10938.   
  10939. ***************
  10940. *** 626,634 ****
  10941.   .ti -.5i
  10942. ! TYPESIG
  10943.   .br
  10944. ! Defines the base type (int or void) of the functions
  10945. ! being parameter/return value of \fIsignal\fR\0(2).
  10946. ! The default is \fBint\fR.
  10947. ! Set TYPESIG='void' on systems which use this type
  10948. ! (e.g., SYSTEM 5 V3.0 and later or Sun OS 4.0 and later).
  10949.   
  10950. --- 804,810 ----
  10951.   .ti -.5i
  10952. ! TERMINFO
  10953.   .br
  10954. ! Define TERMINFO if you have it.
  10955. ! You get it automatically if you're running SYS5, and you don't get
  10956. ! it if you're not.  (If you're not SYS5, you probably have termcap.)
  10957.   
  10958. ***************
  10959. *** 642,654 ****
  10960.   .ti -.5i
  10961. ! UCI
  10962.   .br
  10963. ! First, \*(lq_\*(rq and \*(lq#\*(rq are recognized as the prefixes for
  10964. ! scratch files.
  10965. ! Second, support for the UCI group\-leadership mechanism is enabled in
  10966. ! \fIconflict\fR.
  10967. ! Third, the file \fB$HOME/.signature\fR is considered to contain 
  10968. ! a single line of text which is used as the \fIFull Name\fR part
  10969. ! of your \*(lqFrom:\*(rq header.
  10970. ! This may conflict with the interpretation of this file by \fINews\fR.
  10971. ! If you're not at UCI, you probably don't want this option.
  10972.   
  10973. --- 818,823 ----
  10974.   .ti -.5i
  10975. ! UNISTD
  10976.   .br
  10977. ! Include this option if your system has the file \fB<unistd.h>\fP.
  10978. ! If not specified, the LOCKF option will include \fB<sys/fcntl.h>\fP.
  10979.   
  10980. ***************
  10981. *** 655,661 ****
  10982.   .ti -.5i
  10983. - UK
  10984. - .br
  10985. - Directs the \fIscan\fR program to generate UK-style dates.
  10986. - 
  10987. - .ti -.5i
  10988.   V7
  10989. --- 824,825 ----
  10990. ***************
  10991. *** 666,671 ****
  10992.   .ti -.5i
  10993. ! WP
  10994.   .br
  10995. ! Enables the White Pages service.
  10996. ! Contact wpp-manager@psi.com for more information.
  10997.   
  10998. --- 830,835 ----
  10999.   .ti -.5i
  11000. ! VSPRINTF
  11001.   .br
  11002. ! Include this option if your system has the \fIvsprintf\fP\|(3)
  11003. ! library routine; otherwise, \fI\(rudoprnt\fP\|(3) will be used.
  11004.   
  11005. ***************
  11006. *** 672,676 ****
  11007.   .ti -.5i
  11008. ! WHATNOW
  11009.   .br
  11010. ! Enable certain \fIMH\fR commands to act differently when $mhdraft set.
  11011.   
  11012. --- 836,845 ----
  11013.   .ti -.5i
  11014. ! WAITINT
  11015.   .br
  11016. ! BSD42 based systems call the \fIwait\fP\|(2)
  11017. ! system routine with a pointer to type \fIunion wait\fP.
  11018. ! Include this option if you included \*(lqoptions BSD42\*(rq, but
  11019. ! your system calls the \fIwait\fP\|(2)
  11020. ! system routine with a pointer to type \fIint\fP
  11021. ! (the non-BSD42 default).
  11022.   
  11023. ***************
  11024. *** 680,682 ****
  11025.   Specify this if you have a BSD43 based system that keeps time zone
  11026. ! information /etc/zoneinfo or /usr/lib/zoneinfo (SunOS).
  11027.   With this fix the GMT offset specified in outgoing mail
  11028. --- 849,855 ----
  11029.   Specify this if you have a BSD43 based system that keeps time zone
  11030. ! information /etc/zoneinfo or /usr/lib/zoneinfo (SunOS),
  11031. ! and where 
  11032. ! the \fIstruct tm\fP 
  11033. ! returned by \fIlocaltime\fP\|(3) contains a \fItm_gmtoff\fP element
  11034. ! (see \fB/usr/include/time.h\fP).
  11035.   With this fix the GMT offset specified in outgoing mail
  11036. ***************
  11037. *** 684,686 ****
  11038. --- 857,868 ----
  11039.   to a different time zone.  See also TZNAME.
  11040. + .in -.25i
  11041. + 
  11042. + .Uh "Site Preferences"
  11043. + .br
  11044.   .in -.5i
  11045. + These options change the
  11046. + default behavior of \fIMH\fP or enable optional features.
  11047. + Add the options which are appropriate for your configuration 
  11048. + or your site preferences.
  11049. + .in +.5i
  11050.   
  11051. ***************
  11052. *** 687,699 ****
  11053.   .ti -.5i
  11054. ! cc:
  11055.   .br
  11056. ! The name of your C compiler, if not \*(lqcc\*(rq.
  11057.   
  11058.   .ti -.5i
  11059. ! ccoptions: \-O
  11060.   .br
  11061. ! Options given directly to \fIcc\fR\0(1).
  11062. ! The most common is \*(lq\-M\*(rq if you're running \fIMH\fR on an ALTOS.
  11063. ! This defaults to \*(lq\-O\*(rq.  If you define this and want to 
  11064. ! keep \*(lq\-O\*(rq, be sure to include it explicitly.
  11065.   
  11066. --- 869,889 ----
  11067.   .ti -.5i
  11068. ! editor: prompter
  11069.   .br
  11070. ! The default editor for \fIMH\fR.
  11071.   
  11072. + .ne 5
  11073.   .ti -.5i
  11074. ! options:
  11075.   .br
  11076. ! \&`\-D' options to \fIcc\fR\|(1).
  11077. ! .sp
  11078. ! .in +.25i
  11079. ! .ne 4
  11080. ! .ti -.5i
  11081. ! ATZ
  11082. ! .br
  11083. ! Directs \fIMH\fR to use alpha\-timezones whenever possible.
  11084. ! You should not use this option if you are on the Internet,
  11085. ! since it will make your host non-compliant with RFC-1123
  11086. ! (Requirements for Internet Hosts).
  11087.   
  11088. ***************
  11089. *** 700,708 ****
  11090.   .ti -.5i
  11091. ! curses: \-lcurses\0\-ltermlib
  11092.   .br
  11093. ! This should be the loader option required to load the \fItermcap\fR\0(3)
  11094. ! and \fIcurses\fR\0(3) libraries on your system.
  11095. ! On SYS5 systems, it probably should be just \*(lq\-lcurses\*(rq.
  11096. ! Some sites have reported that both \*(lq\-lcurses\*(rq and
  11097. ! \*(lq\-ltermlib\*(rq are necessary.
  11098.   
  11099. --- 890,895 ----
  11100.   .ti -.5i
  11101. ! ATHENA
  11102.   .br
  11103. ! Makes \fIrepl\fR `\-nocc\0all' the default instead of `\-cc\0all'.
  11104. ! You may want to enable this if you're using \fIxmh\fR.
  11105.   
  11106. ***************
  11107. *** 709,717 ****
  11108.   .ti -.5i
  11109. ! ldoptions:
  11110.   .br
  11111. ! Options given directly to \fIld\fR\0(1) (via \fIcc\fR\0) at the beginning
  11112. ! of the command line.
  11113. ! Useful for machines which require arguments to tell \fIld\fR to increase the
  11114. ! stack space (e.g. the Gould, which uses \*(lq\-m\08\*(rq).
  11115. ! Usually, \*(lq\-s\*(rq is a good choice in any event.
  11116.   
  11117. --- 896,900 ----
  11118.   .ti -.5i
  11119. ! BANG
  11120.   .br
  11121. ! Directs \fIMH\fR to favor `!' over `@' in addressing.
  11122.   
  11123. ***************
  11124. *** 718,730 ****
  11125.   .ti -.5i
  11126. ! ldoptlibs:
  11127.   .br
  11128. ! Options given directly to \fIld\fR\0(1) (via \fIcc\fR\0) at the end of the
  11129. ! command line.
  11130. ! The two most common are:
  11131. ! \*(lq\-ldbm\*(rq if you're running MMDF with the \fIdbm\fR package;
  11132. ! and, \*(lq\-lndir\*(rq if you are generating \fIMH\fR on a system
  11133. ! which does not load the new directory access mechanism by default
  11134. ! (e.g., 4.1BSD, SYS5).
  11135. ! If you don't have \fIlibndir\fR on your system,
  11136. ! the sources are in \fBmiscellany/libndir/\fR.
  11137.   
  11138. --- 901,909 ----
  11139.   .ti -.5i
  11140. ! BERK
  11141.   .br
  11142. ! Optional for for 4.{2,3}BSD sites running SendMail.
  11143. ! Disables nearly all of the RFC822 address and header-parsing routines
  11144. ! in favor of recognizing such formats as ASCnet, and so on.
  11145. ! If you don't need to disable the parser for this reason,
  11146. ! you probably want to use \*(lqoptions DUMB\*(rq instead.
  11147.   
  11148. ***************
  11149. *** 731,735 ****
  11150.   .ti -.5i
  11151. ! lex: lex -nt
  11152.   .br
  11153. ! Alternative version of \fIlex\fR.  Used in \fBzotnet/tws/\fR.
  11154.   
  11155. --- 910,916 ----
  11156.   .ti -.5i
  11157. ! COMPAT
  11158.   .br
  11159. ! If you previously ran a version of \fIMH\fR earlier than mh.4 use this option.
  11160. ! After a short grace period,
  11161. ! remove it and re-{configure,generate,install} everything.
  11162.   
  11163. ***************
  11164. *** 736,743 ****
  11165.   .ti -.5i
  11166. ! sprintf: int
  11167.   .br
  11168. ! The return value of the \fIsprintf\fR library routine.
  11169. ! This defaults to \*(lqchar\ *\*(rq.  Set this to \*(lqint\*(rq if
  11170. ! you have an older version of SYSTEM 5 which has this routine return an
  11171. ! \*(lqint\*(rq type.
  11172.   
  11173. --- 917,922 ----
  11174.   .ti -.5i
  11175. ! DUMB
  11176.   .br
  11177. ! Directs \fIMH\fR not to try and rewrite addresses to their 
  11178. ! \*(lqofficial\*(rq form.
  11179.   
  11180. ***************
  11181. *** 744,749 ****
  11182.   .ti -.5i
  11183. ! sharedlib: off
  11184.   .br
  11185. ! Makes libmh.a into a shared library (only for SunOS 4.0 and later).  
  11186. ! If you enable this, be sure to use \*(lqoptions SUN40\*(rq.
  11187.   
  11188. --- 923,929 ----
  11189.   .ti -.5i
  11190. ! FOLDPROT
  11191.   .br
  11192. ! Defines the octal value for default folder-protection.
  11193. ! For example, FOLDPROT='\^\*(lq0700\*(rq\^'.
  11194. ! The default is \*(lq0711\*(rq.
  11195.   
  11196. ***************
  11197. *** 750,762 ****
  11198.   .ti -.5i
  11199. ! slibdir: /usr/local/lib
  11200.   .br
  11201. ! The directory where the \fIMH\fP shared library should go.
  11202.   
  11203. ! Since some \fIMH\fP programs are setuid, they'll only look for
  11204. ! the library in \*(lqtrusted\*(rq locations.  Putting the library
  11205. ! somewhere besides \fB/usr/lib\fP or \fB/usr/local/lib\fP is not advisable.
  11206.   
  11207. ! You may need to run \fIldconfig\fP\0(8) manually whenever a new
  11208. ! shared object is installed on the system.
  11209. ! See \fIld\fR\0(1) for more information about using shared libraries.
  11210.   
  11211. --- 930,950 ----
  11212.   .ti -.5i
  11213. ! ISI
  11214.   .br
  11215. ! When using \*(lqrepl\0\-ccme\*(rq,
  11216. ! only \*(lqcc:\*(rq the first address found which belongs to the user;
  11217. ! any other \fIAlternate-Mailboxes\fR do not receive \*(lqcc:\*(rqs.
  11218.   
  11219. ! .ti -.5i
  11220. ! LINK
  11221. ! .br
  11222. ! Defines the filename for alternate file name for \fIdist\fR and \fIrepl\fR.
  11223. ! For example, LINK='\^\*(lq\^\\\^\\\^043\*(rq\^'
  11224. ! to use the pound\-sign character.
  11225. ! The default is \*(lq@\*(rq.
  11226.   
  11227. ! .ti -.5i
  11228. ! MHE
  11229. ! .br
  11230. ! Enables crude support for Brien Reid's MHE interface.
  11231. ! Recommended for use with the GNU Emacs mh-e package.
  11232.   
  11233. ***************
  11234. *** 763,768 ****
  11235.   .ti -.5i
  11236. ! oldload: off
  11237.   .br
  11238. ! Support for the ALTOS loader if \*(lqon\*(rq.
  11239. ! Support for loaders not handling `\-x\0\-r' correctly if \*(lqnone\*(rq.
  11240.   
  11241. --- 951,956 ----
  11242.   .ti -.5i
  11243. ! MHRC
  11244.   .br
  11245. ! Enables \fIMH\fR to recognize the \fICShell\fR's `~'\-construct.
  11246. ! This is useful for sites that run with a ~/.mhrc for their users.
  11247.   
  11248. ***************
  11249. *** 769,781 ****
  11250.   .ti -.5i
  11251. ! ranlib: on
  11252.   .br
  11253. ! Support for systems with \fIranlib\fR\0(1).
  11254. ! For SYSTEM 5 systems,
  11255. ! this should be \*(lqoff\*(rq which tells \fIMH\fR to use \fIlorder\fR and
  11256. ! \fItsort\fR instead.
  11257. ! Some SYSTEM 5 sites reported that running this isn't always sufficient.
  11258. ! If this is the case,
  11259. ! then you should edit \fBconf/makefiles/uip\fR to include
  11260. ! \fB\&../sbr/libmh.a\fR and \fB../zotnet/libzot.a\fR twice in the LIBES
  11261. ! variable.
  11262.   
  11263. --- 957,970 ----
  11264.   .ti -.5i
  11265. ! MIME
  11266.   .br
  11267. ! Enables support for multi-media messages,
  11268. ! as specified in RFC 1341 \-\- a major win.
  11269. ! This allows you to include things like audio,
  11270. ! graphics, and the like, in your mail messages.
  11271. ! Several \fIMH\fP commands are extended to support these multi-media
  11272. ! messages,
  11273. ! and the \fImhn\fR command is provided to encode and decode
  11274. ! \fBMIME\fP messages.
  11275. ! For more details, see \fBmiscellany/multi-media/READ-ME\fP
  11276. ! and \fImhn\fR\|(1).
  11277.   
  11278. ***************
  11279. *** 782,785 ****
  11280.   .ti -.5i
  11281. ! tma: off
  11282.   .br
  11283.   Support for the TTI \fItrusted mail agent\fR (TMA).
  11284. --- 971,1014 ----
  11285.   .ti -.5i
  11286. ! MSGID
  11287.   .br
  11288. + Enables \fBslocal\fP to detect and surpress duplicate messages received.
  11289. + This code uses the \fB<ndbm.h>\fP library,
  11290. + and requires \*(lqoptions BSD42\*(rq since
  11291. + it uses the \fIflock\fP\|(2) system call for locking.
  11292. + (Note that this means its database locking does not work over NFS.)
  11293. + It has only been tested under SUN40.
  11294. + 
  11295. + .ti -.5i
  11296. + MSGPROT
  11297. + .br
  11298. + Defines the octal value for default folder-protection.
  11299. + For example, MSGPROT='\^\*(lq0600\*(rq\^'.
  11300. + The default is \*(lq0644\*(rq.
  11301. + 
  11302. + .ti -.5i
  11303. + NOMHSEQ
  11304. + .br
  11305. + Directs \fIMH\fR to make private sequences the default.
  11306. + 
  11307. + .ti -.5i
  11308. + OVERHEAD
  11309. + .br
  11310. + Enable \fIMH\fR commands to read profile/context from open fd:s
  11311. + without doing an open(); see \fImh-profile\fP\|(5) for the details.
  11312. + 
  11313. + .ti -.5i
  11314. + RPATHS
  11315. + .br
  11316. + Directs \fIinc\fR to note UNIX \*(lqFrom\ \*(rq lines as Return-Path: info.
  11317. + 
  11318. + .ti -.5i
  11319. + SBACKUP
  11320. + .br
  11321. + Defines the prefix string for backup file names.
  11322. + For example, SBACKUP='\^\*(lq\^\\\^\\\^043\*(rq\^'.
  11323. + The default is \*(lq,\*(rq.
  11324. + 
  11325. + .ti -.5i
  11326. + TMA
  11327. + .br
  11328.   Support for the TTI \fItrusted mail agent\fR (TMA).
  11329. ***************
  11330. *** 790,791 ****
  11331. --- 1019,1079 ----
  11332.   (otherwise, you don't have the software in your \fIMH\fR source tree).
  11333. + 
  11334. + .ti -.5i
  11335. + TTYD
  11336. + .br
  11337. + Support for TTYD.  This is no longer in wide use, and is not recommended.
  11338. + 
  11339. + .ti -.5i
  11340. + UCI
  11341. + .br
  11342. + First, \*(lq_\*(rq and \*(lq#\*(rq are recognized as the prefixes for
  11343. + scratch files.
  11344. + Second, support for the UCI group\-leadership mechanism is enabled in
  11345. + \fIconflict\fR.
  11346. + Third, the first line of the file
  11347. + file \fB$HOME/.signature\fR is used as the \fIFull Name\fR part
  11348. + of your \*(lqFrom:\*(rq header.
  11349. + This may conflict with the interpretation of this file by \fINews\fR.
  11350. + If you're not at UCI, you probably don't want this option.
  11351. + 
  11352. + .ti -.5i
  11353. + UK
  11354. + .br
  11355. + Directs the \fIscan\fR program to generate UK-style dates by default.
  11356. + 
  11357. + .ti -.5i
  11358. + WHATNOW
  11359. + .br
  11360. + Enable certain \fIMH\fR commands to act differently when $mhdraft set.
  11361. + 
  11362. + .ti -.5i
  11363. + YEARMOD
  11364. + .br
  11365. + This option makes the \fImh-format\fP \fB%(year)\fP function
  11366. + always return a value less than 100.
  11367. + Enable this option if you have local \fImh-format\fP\|(5) files
  11368. + which cannot handle 4-digit years.
  11369. + You should convert these files to use a 4-character field width,
  11370. + or use the \fB%(modulo 100)\fP function to obtain a 2-digit year value.
  11371. + After a short grace period,
  11372. + remove `YEARMOD' and re-{configure,generate,install} everything.
  11373. + .in -.25i
  11374. + 
  11375. + .Uh "Testing/debugging"
  11376. + .ti -.5i
  11377. + debug: off
  11378. + .br
  11379. + Support for debug mode of \fIMH\fR.
  11380. + Don't use this unless you know what you're doing,
  11381. + which isn't likely if you're reading this document!
  11382. + 
  11383. + .ti -.5i
  11384. + regtest: off
  11385. + .br
  11386. + Set this to \*(lqon\*(rq
  11387. + if you are doing regression testing among different
  11388. + compilations of \fIMH\fP, and you do not want the hostname
  11389. + and compile date included in \fIMH\fP binaries.  
  11390. + 
  11391. + .sp
  11392.   .in -.5i
  11393. ***************
  11394. *** 814,815 ****
  11395. --- 1102,1122 ----
  11396.   .PP
  11397. + \fBBefore proceeding\fP,
  11398. + you should familiarize yourself with the \fIAdministrator's Guide\fR.
  11399. + To generate an \fInroff\fR version, go to the doc/ directory
  11400. + and type:
  11401. + .sp 1
  11402. + .nf
  11403. + % (cd ../doc/; make ADMIN.doc)
  11404. + .fi
  11405. + .sp
  11406. + .PP
  11407. + If you're already running \fIMH\fR at your site,
  11408. + you should also read the \fImh\fR changes document \fBCHANGES\fP.
  11409. + The source is in \fBpapers/changes/\fR.
  11410. + .PP
  11411. + After reading the \fIAdministrator's Guide\fR, you may decide
  11412. + to change your MH configuration.  If so, cd back to the \fBconf/\fP
  11413. + directory, re-edit the file \fBMH\fP, and re-run
  11414. + \fImhconfig\fP.
  11415. + .PP
  11416.   You now proceed based on your choice of a transport system
  11417. ***************
  11418. *** 820,823 ****
  11419.   .SS SENDMAIL
  11420. ! If you want \fISendMail\fR to transport messages for \fIMH\fR,
  11421. ! then go to the mts/sendmail/ directory.
  11422.   .sp 1
  11423. --- 1127,1138 ----
  11424.   .SS SENDMAIL
  11425. ! If you have not enabled BBoards or POP
  11426. ! then no further MTS\-specific action is required on your part!
  11427. ! 
  11428. ! If you have enabled POP, but you 
  11429. ! want to let \fISendMail\fP deliver mail POP mail using its
  11430. ! standard delivery program \fB/bin/mail\fP,
  11431. ! then, again, no further MTS\-specific action is required on your part!
  11432. ! 
  11433. ! Otherwise,
  11434. ! go to the mts/sendmail/ directory.
  11435.   .sp 1
  11436. ***************
  11437. *** 970,972 ****
  11438.   If you are using \*(lqmmdf2/smtp\*(rq as your mts setting,
  11439. ! then no futher MTS\-specific action is required on your part!
  11440.   .SS "STAND\-ALONE DELIVERY"
  11441. --- 1285,1287 ----
  11442.   If you are using \*(lqmmdf2/smtp\*(rq as your mts setting,
  11443. ! then no further MTS\-specific action is required on your part!
  11444.   .SS "STAND\-ALONE DELIVERY"
  11445. ***************
  11446. *** 973,977 ****
  11447.   If, instead, you want \fIMH\fR to handle its own mail delivery,
  11448. ! then no futher MTS\-specific action is required on your part!
  11449.   .SH GENERATION
  11450. ! Go to the mh.6/ directory and generate the system.
  11451.   .sp 1
  11452. --- 1288,1292 ----
  11453.   If, instead, you want \fIMH\fR to handle its own mail delivery,
  11454. ! then no further MTS\-specific action is required on your part!
  11455.   .SH GENERATION
  11456. ! Go to the \fIMH\fP top-level directory and generate the system.
  11457.   .sp 1
  11458. ***************
  11459. *** 991,1013 ****
  11460.   .PP
  11461. - \fBBefore proceeding\fP,
  11462. - you should familiarize yourself with the \fIAdministrator's Guide\fR.
  11463. - To generate an \fInroff\fR version, go to the doc/ directory
  11464. - and type:
  11465. - .sp 1
  11466. - .nf
  11467. - % (cd doc/; make ADMIN.doc)
  11468. - .fi
  11469. - .sp 1
  11470. - To generate a \fItroff\fR version, type
  11471. - .sp 1
  11472. - .nf
  11473. - % (cd doc/; make guide)
  11474. - .fi
  11475. - .sp 1
  11476. - instead.
  11477. - .PP
  11478. - If you're already running \fIMH\fR at your site,
  11479. - you should also read the \fImh.6\fR changes documents.
  11480. - The sources are in \fBpapers/mh6.5/\fR and \fBpapers/mh6.7/\fP.
  11481. - .PP
  11482.   Next, if you enabled support for the UCI BBoards facility,
  11483. --- 1306,1307 ----
  11484. ***************
  11485. *** 1055,1057 ****
  11486.   The \fBMailAliases\fR, \fBBBoardAliases\fR, \fBmtstailor\fR and \fBBBoards\fR
  11487. ! files will not be installed over existing copies;
  11488.   you will need to edit these by
  11489. --- 1349,1351 ----
  11490.   The \fBMailAliases\fR, \fBBBoardAliases\fR, \fBmtstailor\fR and \fBBBoards\fR
  11491. ! files will \fBNOT\fP be installed over existing copies;
  11492.   you will need to edit these by
  11493. ***************
  11494. *** 1077,1080 ****
  11495.   In addition to this document,
  11496. ! the administrator's guide,
  11497. ! and the user's manual,
  11498.   there are several documents referenced by the user's manual which may be
  11499. --- 1371,1374 ----
  11500.   In addition to this document,
  11501. ! the \fIAdministrator's Guide\fP,
  11502. ! and the \fIUser's Manual\fP,
  11503.   there are several documents referenced by the user's manual which may be
  11504. ***************
  11505. *** 1092,1093 ****
  11506. --- 1386,1391 ----
  11507.   The \fImhconfig\fR program should be smarter.
  11508. + .PP
  11509. + There's no way to print the \fIAdministrator's Guide\fP
  11510. + until after you have configured the system; it is difficult
  11511. + to configure the system without the \fIAdministrator's Guide\fP.
  11512.   .PP
  11513. *** ../mh-6.7.2/conf/mhconfig.c    Mon Jan 27 09:34:35 1992
  11514. --- conf/mhconfig.c    Wed Dec  2 11:08:07 1992
  11515. ***************
  11516. *** 1,8 ****
  11517.   /* mhconfig.c - configure MH */
  11518.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  11519.   #ifndef    lint
  11520. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.31 1992/01/27 17:34:29 jromine Exp $";
  11521. ! #endif    lint
  11522.   
  11523.   #include <ctype.h>
  11524.   #include <stdio.h>
  11525. --- 1,8 ----
  11526.   /* mhconfig.c - configure MH */
  11527.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  11528.   #ifndef    lint
  11529. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.63 1992/12/02 19:08:03 jromine Exp $";
  11530. ! #endif    /* lint */
  11531.   
  11532.   #include <ctype.h>
  11533.   #include <stdio.h>
  11534. ***************
  11535. *** 12,18 ****
  11536.   #ifdef    SYS5
  11537.   #define    index    strchr
  11538.   #define    rindex    strrchr
  11539. ! #endif    SYS5
  11540.   
  11541.   static void insopt(), mkopts();
  11542.   
  11543. --- 12,18 ----
  11544.   #ifdef    SYS5
  11545.   #define    index    strchr
  11546.   #define    rindex    strrchr
  11547. ! #endif /* SYS5 */
  11548.   
  11549.   static void insopt(), mkopts();
  11550.   
  11551. ***************
  11552. *** 29,38 ****
  11553.   #define    MAKE        "../%s/Makefile"
  11554.   
  11555.   #define    WARNING    "This file is automatically generated.  Do not edit!"
  11556. ! #define    MHRELEASE    "6.7"        /* for version: "Maj.min.pat" */
  11557. ! #define    MHCENTERFOOT    "MH.6.7"    /* for nroff page footers */
  11558.   #define    MHLEFTFOOT    "[mh.6]"    /* [mh.6]    MH.6.6   page# */
  11559. ! #define    MHSLIBVER    "1.1"        /* SunOS4 shared library version */
  11560.   
  11561.   #define    NOTOK    (-1)
  11562.   
  11563. --- 29,38 ----
  11564.   #define    MAKE        "../%s/Makefile"
  11565.   
  11566.   #define    WARNING    "This file is automatically generated.  Do not edit!"
  11567. ! #define    MHRELEASE    "6.8"        /* for version: "Maj.min.pat" */
  11568. ! #define    MHCENTERFOOT    "MH.6.8"    /* for nroff page footers */
  11569.   #define    MHLEFTFOOT    "[mh.6]"    /* [mh.6]    MH.6.6   page# */
  11570. ! #define    MHSLIBVER    "3.2"        /* SunOS4 shared library version */
  11571.   
  11572.   #define    NOTOK    (-1)
  11573.   
  11574. ***************
  11575. *** 44,52 ****
  11576.   
  11577.   /*   */
  11578.   
  11579. - static int   bsd43 = 0;
  11580.   static int   smtp = 0;
  11581. ! static int   uci = 0;
  11582.   
  11583.   static int   sedP = 1;
  11584.   static int   filesP = 1;
  11585. --- 44,51 ----
  11586.   
  11587.   /*   */
  11588.   
  11589.   static int   smtp = 0;
  11590. ! static int   mpop = 0;
  11591.   
  11592.   static int   sedP = 1;
  11593.   static int   filesP = 1;
  11594. ***************
  11595. *** 64,69 ****
  11596. --- 63,69 ----
  11597.   static char *ccoptions = NULL;
  11598.   static char *chownpath = "/etc/chown";
  11599.   static char *compiler = "/bin/cc";
  11600. + static char *copy = "cp";
  11601.   static char *curses = "-lcurses -ltermlib";
  11602.   static char *debug = "off";
  11603.   static char *editor = "prompter";
  11604. ***************
  11605. *** 71,77 ****
  11606.   static char *ldoptions = NULL;
  11607.   static char *ldoptlibs = NULL;
  11608.   static char *lex = "lex -nt";
  11609. ! static char *mailgroup = NULL;
  11610.   static char *mailpath = "/usr/spool/mail";
  11611.   static char *maildir = NULL;
  11612.   static char *mailfile = NULL;
  11613. --- 71,78 ----
  11614.   static char *ldoptions = NULL;
  11615.   static char *ldoptlibs = NULL;
  11616.   static char *lex = "lex -nt";
  11617. ! static char *ln = "ln";
  11618. ! static char *mailgroup = "off";
  11619.   static char *mailpath = "/usr/spool/mail";
  11620.   static char *maildir = NULL;
  11621.   static char *mailfile = NULL;
  11622. ***************
  11623. *** 79,94 ****
  11624.   static char *manuals = "standard";
  11625.   static char *mf = "off";
  11626.   static char *mts = "sendmail";
  11627.   static char *removeit = "mv -f";
  11628.   static char *oldload = "off";
  11629.   static char *options = NULL;
  11630.   static char *pop = "off";
  11631.   static char *ranlib = "on";
  11632.   static char *sharedlib = "off";
  11633.   static char *slibdir = "/usr/local/lib";
  11634.   static char *sprntf = NULL;
  11635. - static char *tma = "off";
  11636.   
  11637.   #define    unknown        0
  11638.   #define    mmdf        1
  11639.   #define    mmdf2        2
  11640. --- 80,100 ----
  11641.   static char *manuals = "standard";
  11642.   static char *mf = "off";
  11643.   static char *mts = "sendmail";
  11644. + static char *poppath = "/usr/etc";
  11645.   static char *removeit = "mv -f";
  11646. + static char *regtest = "off";
  11647.   static char *oldload = "off";
  11648.   static char *options = NULL;
  11649.   static char *pop = "off";
  11650.   static char *ranlib = "on";
  11651.   static char *sharedlib = "off";
  11652. + static char *signl = "int";
  11653.   static char *slibdir = "/usr/local/lib";
  11654. + static char *slflags = "-pic";
  11655.   static char *sprntf = NULL;
  11656.   
  11657. + /*   */
  11658. + 
  11659.   #define    unknown        0
  11660.   #define    mmdf        1
  11661.   #define    mmdf2        2
  11662. ***************
  11663. *** 112,120 ****
  11664. --- 118,151 ----
  11665.       "mh", "MHMTS", mh, NOFLAGS,
  11666.       "sendmail", "SENDMTS", sendmail, NOMF,
  11667.       "sendmail/smtp", "SENDMTS SMTP", sendmail, NOMF,
  11668. +     "zmailer", "ZMAILER SENDMTS", sendmail, NOMF,
  11669. +     "zmailer/smtp", "ZMAILER SENDMTS SMTP", sendmail, NOMF,
  11670.       NULL, NULL, unknown, NOFLAGS
  11671.   };
  11672.   
  11673. + /* other options which cause sed BEGIN/END configuration changes */
  11674. + 
  11675. + static struct copt {
  11676. +     char *c_name;
  11677. +     int   c_value;
  11678. + }    copts[] = {
  11679. +     "APOP", 0,    /* authenticated pop */
  11680. +     "BSD43", 0,    /* sgid ttys */
  11681. +     "KPOP", 0,     /* KERBEROS pop */
  11682. +     "HESIOD", 0,
  11683. +     "MIME", 0,    /* multi-media extensions */
  11684. +     "MPOP", 0,    /* mobile pop */
  11685. +     "MSGID", 0, /* slocal dup surpression */
  11686. +     "TMA", 0,    /* trusted mail */
  11687. +     "TTYD", 0,
  11688. +     "UCI", 0,
  11689. +     NULL, 0
  11690. + };
  11691. + 
  11692. + 
  11693. + 
  11694. + /*   */
  11695. + 
  11696.   static struct bind {
  11697.       char   *keyword;
  11698.   
  11699. ***************
  11700. *** 131,136 ****
  11701. --- 162,168 ----
  11702.               "ccoptions", &ccoptions, BD_ADD,
  11703.               "chown", &chownpath, BD_NIL,
  11704.               "cc", &compiler, BD_NIL,
  11705. +             "cp", ©, BD_NIL,
  11706.               "curses", &curses, BD_NIL,
  11707.               "debug", &debug, BD_NIL,
  11708.               "editor", &editor, BD_NIL,
  11709. ***************
  11710. *** 138,143 ****
  11711. --- 170,176 ----
  11712.               "ldoptions", &ldoptions, BD_ADD,
  11713.               "ldoptlibs", &ldoptlibs, BD_ADD,
  11714.               "lex", &lex, BD_NIL,
  11715. +             "ln", &ln, BD_NIL,
  11716.                           "mail", &mailpath, BD_NIL,
  11717.               "mailgroup", &mailgroup, BD_NIL,
  11718.                           "mandir", &mandir, BD_NIL,
  11719. ***************
  11720. *** 147,161 ****
  11721.               "oldload", &oldload, BD_NIL,
  11722.                           "options", &options, BD_ADD,
  11723.                           "pop", &pop, BD_NIL,
  11724.               "ranlib", &ranlib, BD_NIL,
  11725.               "remove", &removeit, BD_NIL,
  11726.               "sharedlib", &sharedlib, BD_NIL,
  11727.               "slibdir", &slibdir, BD_NIL,
  11728.               "sprintf", &sprntf, BD_NIL,
  11729. -             "tma", &tma, BD_NIL,
  11730.                           NULL
  11731.   };
  11732.   
  11733.   
  11734.   char   *files[] = {
  11735.       "../support/bboards/bboards.daily",
  11736. --- 180,198 ----
  11737.               "oldload", &oldload, BD_NIL,
  11738.                           "options", &options, BD_ADD,
  11739.                           "pop", &pop, BD_NIL,
  11740. +             "popdir", &poppath, BD_NIL,
  11741.               "ranlib", &ranlib, BD_NIL,
  11742.               "remove", &removeit, BD_NIL,
  11743. +             "regtest", ®test, BD_NIL,
  11744.               "sharedlib", &sharedlib, BD_NIL,
  11745. +             "signal", &signl, BD_NIL,
  11746. +             "slflags", &slflags, BD_NIL,
  11747.               "slibdir", &slibdir, BD_NIL,
  11748.               "sprintf", &sprntf, BD_NIL,
  11749.                           NULL
  11750.   };
  11751.   
  11752. + /*   */
  11753.   
  11754.   char   *files[] = {
  11755.       "../support/bboards/bboards.daily",
  11756. ***************
  11757. *** 230,236 ****
  11758.       printf ("Don't forget to edit \"config/mtstailor\"\n");
  11759.   #endif
  11760.       if (filesP || makeP)
  11761. !     printf ("Don't forget to run \"make clean\" before compiling\n");
  11762.   
  11763.       exit (0);
  11764.   }
  11765. --- 267,273 ----
  11766.       printf ("Don't forget to edit \"config/mtstailor\"\n");
  11767.   #endif
  11768.       if (filesP || makeP)
  11769. !     printf ("Don't forget to run \"make clean\" in the top directory before compiling\n");
  11770.   
  11771.       exit (0);
  11772.   }
  11773. ***************
  11774. *** 255,265 ****
  11775.       fprintf (fp, "%s\n%s\n%s\n%s\n", 
  11776.       "s!^@END: \\(.*\\)$!.br\\",
  11777.       ".ti 0i\\",
  11778. !     "#endif \\1\\",
  11779.       ".br!"
  11780.       );
  11781.   }
  11782.   
  11783.   static do_sedfile (sed, flag)
  11784.   char    *sed;
  11785.   int    flag;
  11786. --- 292,304 ----
  11787.       fprintf (fp, "%s\n%s\n%s\n%s\n", 
  11788.       "s!^@END: \\(.*\\)$!.br\\",
  11789.       ".ti 0i\\",
  11790. !     "#endif /* \\1\\ */",
  11791.       ".br!"
  11792.       );
  11793.   }
  11794.   
  11795. + /*   */
  11796. + 
  11797.   static do_sedfile (sed, flag)
  11798.   char    *sed;
  11799.   int    flag;
  11800. ***************
  11801. *** 266,271 ****
  11802. --- 305,311 ----
  11803.   {
  11804.       int     i;
  11805.       FILE * fp;
  11806. +     struct copt *op;
  11807.   
  11808.       if ((fp = fopen (sed, "w")) == NULL)
  11809.       adios (sed, "unable to write");
  11810. ***************
  11811. *** 284,289 ****
  11812. --- 324,330 ----
  11813.       fprintf (fp, "s%%@(MHLEFTFOOT)%%%s%%g\n", MHLEFTFOOT);
  11814.       fprintf (fp, "s%%@(MHBINPATH)%%%s%%g\n", SVAL (binpath));
  11815.       fprintf (fp, "s%%@(MHETCPATH)%%%s%%g\n", SVAL (etcpath));
  11816. +     fprintf (fp, "s%%@(MHPOPDPATH)%%%s%%g\n", SVAL (poppath));
  11817.       fprintf (fp, "s%%@(MHCHOWNPATH)%%%s%%g\n", SVAL (chownpath));
  11818.       fprintf (fp, "s%%@(MHDROPATH)%%%s%%g\n", SVAL (maildir));
  11819.       fprintf (fp, "s%%@(MHDROPFIL)%%%s%%g\n", SVAL (mailfile));
  11820. ***************
  11821. *** 311,317 ****
  11822.               : strcmp (manuals, "old") == 0 ? 'o'
  11823.               : 'l');
  11824.       }
  11825. !     if (strcmp (manuals, "gen") == 0)
  11826.       fprintf (fp, "s%%@(MHMANGEN)%%%s%%g\n", "#"); /* comment char */
  11827.       else
  11828.       fprintf (fp, "s%%@(MHMANGEN)%%%s%%g\n", "");
  11829. --- 352,366 ----
  11830.               : strcmp (manuals, "old") == 0 ? 'o'
  11831.               : 'l');
  11832.       }
  11833. ! 
  11834. ! /*   */
  11835. ! 
  11836. !     if (strcmp (regtest, "on") == 0)
  11837. !     fprintf (fp, "s%%@(MHHOSTVER)%%%s%%g\n", "-n");
  11838. !     else
  11839. !     fprintf (fp, "s%%@(MHHOSTVER)%%%s%%g\n", "");
  11840. ! 
  11841. !     if (strcmp (manuals, "gen") == 0 || strcmp (manuals, "gen") == 0)
  11842.       fprintf (fp, "s%%@(MHMANGEN)%%%s%%g\n", "#"); /* comment char */
  11843.       else
  11844.       fprintf (fp, "s%%@(MHMANGEN)%%%s%%g\n", "");
  11845. ***************
  11846. *** 319,324 ****
  11847. --- 368,375 ----
  11848.       fprintf (fp, "s%%@(MHEDITOR)%%%s%%g\n", SVAL (editor));
  11849.       fprintf (fp, "s%%@(MHCONFIG)%%%s%%g\n", SVAL (myopts));
  11850.       fprintf (fp, "s%%@(MHCOMPILER)%%%s%%g\n", SVAL (compiler));
  11851. +     fprintf (fp, "s%%@(CP)%%%s%%g\n", SVAL (copy));
  11852. +     fprintf (fp, "s%%@(LN)%%%s%%g\n", SVAL (ln));
  11853.       fprintf (fp, "s%%@(LEX)%%%s%%g\n", SVAL (lex));
  11854.       if (ccoptions)
  11855.       fprintf (fp, "s%%@(MHOPTIONS)%%%s %s%%g\n",
  11856. ***************
  11857. *** 349,355 ****
  11858.       fprintf (fp, "/^@BEGIN: OPTIM$/d\n/^@END: OPTIM$/d\n");
  11859.       }
  11860.   
  11861. !     if (mailgroup && strcmp (mailgroup, "off")) { /* for SYS5 sgid-inc */
  11862.       fprintf (fp, "/^@BEGIN: MAILGROUP$/d\n/^@END: MAILGROUP$/d\n");
  11863.       fprintf (fp, "s%%@(MAILGROUP)%%%s%%g\n", SVAL (mailgroup));
  11864.       }
  11865. --- 400,406 ----
  11866.       fprintf (fp, "/^@BEGIN: OPTIM$/d\n/^@END: OPTIM$/d\n");
  11867.       }
  11868.   
  11869. !     if (strcmp (mailgroup, "off")) { /* for SYS5 sgid-inc */
  11870.       fprintf (fp, "/^@BEGIN: MAILGROUP$/d\n/^@END: MAILGROUP$/d\n");
  11871.       fprintf (fp, "s%%@(MAILGROUP)%%%s%%g\n", SVAL (mailgroup));
  11872.       }
  11873. ***************
  11874. *** 365,370 ****
  11875. --- 416,423 ----
  11876.       else
  11877.       fprintf (fp, "/^@BEGIN: NEWLOAD$/,/^@END: NEWLOAD$/d\n");
  11878.   
  11879. + /*   */
  11880. + 
  11881.       if (strcmp (ranlib, "on") == 0) {
  11882.       fprintf (fp, "/^@BEGIN: RANLIB$/d\n/^@END: RANLIB$/d\n");
  11883.       fprintf (fp, "/^@BEGIN: LORDER$/,/^@END: LORDER$/d\n");
  11884. ***************
  11885. *** 374,384 ****
  11886.       fprintf (fp, "/^@BEGIN: RANLIB$/,/^@END: RANLIB$/d\n");
  11887.       }
  11888.   
  11889. !     if (strcmp (sharedlib, "on") == 0 || strcmp (sharedlib, "secure") == 0) {
  11890.       fprintf (fp, "/^@BEGIN: SHAREDLIB$/d\n/^@END: SHAREDLIB$/d\n");
  11891.       fprintf (fp, "/^@BEGIN: STDLIB$/,/^@END: STDLIB$/d\n");
  11892. !     fprintf (fp, "s%%@(SLIBDIR)%%%s%%g\n",slibdir);
  11893.       fprintf (fp, "s%%@(SLIBVER)%%%s%%g\n", MHSLIBVER);
  11894.       if (strcmp (sharedlib, "secure") == 0)
  11895.           fprintf (fp, "s%%@(SLDFLAG)%%-L%s%%g\n",slibdir);
  11896.       else
  11897. --- 427,438 ----
  11898.       fprintf (fp, "/^@BEGIN: RANLIB$/,/^@END: RANLIB$/d\n");
  11899.       }
  11900.   
  11901. !     if (strcmp (sharedlib, "off")) {    /* if not off */
  11902.       fprintf (fp, "/^@BEGIN: SHAREDLIB$/d\n/^@END: SHAREDLIB$/d\n");
  11903.       fprintf (fp, "/^@BEGIN: STDLIB$/,/^@END: STDLIB$/d\n");
  11904. !     fprintf (fp, "s%%@(SLIBDIR)%%%s%%g\n", slibdir);
  11905.       fprintf (fp, "s%%@(SLIBVER)%%%s%%g\n", MHSLIBVER);
  11906. +     fprintf (fp, "s%%@(SLFLAGS)%%%s%%g\n", SVAL(slflags));
  11907.       if (strcmp (sharedlib, "secure") == 0)
  11908.           fprintf (fp, "s%%@(SLDFLAG)%%-L%s%%g\n",slibdir);
  11909.       else
  11910. ***************
  11911. *** 388,398 ****
  11912.       fprintf (fp, "/^@BEGIN: STDLIB$/d\n/^@END: STDLIB$/d\n");
  11913.       fprintf (fp, "/^@BEGIN: SHAREDLIB$/,/^@END: SHAREDLIB$/d\n");
  11914.       }
  11915. ! 
  11916. !     if (strcmp (tma, "on") == 0)
  11917. !     fprintf (fp, "/^@BEGIN: TMA$/d\n/^@END: TMA$/d\n");
  11918.       else
  11919. !     fprintf (fp, "/^@BEGIN: TMA$/,/^@END: TMA$/d\n");
  11920.       if (flag || ((mtsnum == mmdf || mtsnum == mmdf2) && !smtp)) {
  11921.       fprintf (fp, "/^@BEGIN: MMDFMTS$/d\n/^@END: MMDFMTS$/d\n");
  11922.       if (mtsnum == mmdf)
  11923. --- 442,458 ----
  11924.       fprintf (fp, "/^@BEGIN: STDLIB$/d\n/^@END: STDLIB$/d\n");
  11925.       fprintf (fp, "/^@BEGIN: SHAREDLIB$/,/^@END: SHAREDLIB$/d\n");
  11926.       }
  11927. !     if (strcmp (sharedlib, "sun4") == 0 || strcmp (sharedlib, "on") == 0)
  11928. !     fprintf (fp, "/^@BEGIN: SUN4SHLIB$/d\n/^@END: SUN4SHLIB$/d\n");
  11929.       else
  11930. !     fprintf (fp, "/^@BEGIN: SUN4SHLIB$/,/^@END: SUN4SHLIB$/d\n");
  11931. !     if (strcmp (sharedlib, "sys5") == 0)
  11932. !     fprintf (fp, "/^@BEGIN: SYS5SHLIB$/d\n/^@END: SYS5SHLIB$/d\n");
  11933. !     else
  11934. !     fprintf (fp, "/^@BEGIN: SYS5SHLIB$/,/^@END: SYS5SHLIB$/d\n");
  11935. ! 
  11936. ! /*   */
  11937. ! 
  11938.       if (flag || ((mtsnum == mmdf || mtsnum == mmdf2) && !smtp)) {
  11939.       fprintf (fp, "/^@BEGIN: MMDFMTS$/d\n/^@END: MMDFMTS$/d\n");
  11940.       if (mtsnum == mmdf)
  11941. ***************
  11942. *** 431,450 ****
  11943.           fprintf (fp, "/^@BEGIN: SENDMTSHACK$/,/^@END: SENDMTSHACK$/d\n");
  11944.           break;
  11945.       }
  11946.       /* special hack for support/pop/popser.c */
  11947.       fprintf (fp, "s%%@(POPUUMBOX)%%%s%%g\n",
  11948.           mtsnum == sendmail ? "-DPOPUUMBOX" : "");
  11949.   
  11950. -     if (bsd43)        /* for sgid(tty)-rcvtty */
  11951. -     fprintf (fp, "/^@BEGIN: BSD43$/d\n/^@END: BSD43$/d\n");
  11952. -     else
  11953. -     fprintf (fp, "/^@BEGIN: BSD43$/,/^@END: BSD43$/d\n");
  11954. - 
  11955. -     if (uci)
  11956. -     fprintf (fp, "/^@BEGIN: UCI$/d\n/^@END: UCI$/d\n");
  11957. -     else
  11958. -     fprintf (fp, "/^@BEGIN: UCI$/,/^@END: UCI$/d\n");
  11959. - 
  11960.       if (smtp)
  11961.       fprintf (fp, "/^@BEGIN: SMTP$/d\n/^@END: SMTP$/d\n");
  11962.       else
  11963. --- 491,503 ----
  11964.           fprintf (fp, "/^@BEGIN: SENDMTSHACK$/,/^@END: SENDMTSHACK$/d\n");
  11965.           break;
  11966.       }
  11967. + 
  11968. + /*   */
  11969. + 
  11970.       /* special hack for support/pop/popser.c */
  11971.       fprintf (fp, "s%%@(POPUUMBOX)%%%s%%g\n",
  11972.           mtsnum == sendmail ? "-DPOPUUMBOX" : "");
  11973.   
  11974.       if (smtp)
  11975.       fprintf (fp, "/^@BEGIN: SMTP$/d\n/^@END: SMTP$/d\n");
  11976.       else
  11977. ***************
  11978. *** 472,477 ****
  11979. --- 525,536 ----
  11980.   
  11981.       fprintf (fp, "s%%@(MHREMOVE)%%%s%%g\n", SVAL (removeit));
  11982.   
  11983. +     for (op = copts; op->c_name; op++) {
  11984. +     fprintf (fp, op->c_value ? "/^@BEGIN: %s$/d\n/^@END: %s$/d\n" :
  11985. +                  "/^@BEGIN: %s$/,/^@END: %s$/d\n",
  11986. +              op->c_name, op->c_name);
  11987. +     }
  11988. + 
  11989.       (void) fclose (fp);
  11990.   }
  11991.   
  11992. ***************
  11993. *** 570,598 ****
  11994.       }
  11995.       break;
  11996.       }
  11997. !     if ((config = *vec++) == NULL || *vec != NULL)
  11998.       adios (NULLCP, "usage: %s file", myname);
  11999.   
  12000.       if ((fp = fopen (config, "r")) == NULL)
  12001.       adios (config, "unable to read");
  12002.   
  12003.       while (fgets (buffer, sizeof buffer, fp)) {
  12004.       if (ap = index (buffer, '\n'))
  12005. !         *ap-- = NULL;
  12006.       else
  12007.           ap = &buffer[strlen (buffer) - 1];
  12008.       while (ap >= buffer)
  12009.           if (isspace (*ap))
  12010. !         *ap = NULL;
  12011.           else
  12012.           break;
  12013.       for (cp = buffer; isspace (*cp); cp++)
  12014.           continue;
  12015. !     if (*cp == NULL || *cp == '#')
  12016.           continue;
  12017.       for (ap = cp; *ap; ap++)
  12018. !         if (isspace (*ap)) {
  12019. !         *ap++ = NULL;
  12020.           while (isspace (*ap))
  12021.               ap++;
  12022.           break;
  12023. --- 629,659 ----
  12024.       }
  12025.       break;
  12026.       }
  12027. !     if ((config = *vec) == NULL || vec[1] != NULL) /* no arg or too many */
  12028.       adios (NULLCP, "usage: %s file", myname);
  12029.   
  12030. + /*   */
  12031. + 
  12032.       if ((fp = fopen (config, "r")) == NULL)
  12033.       adios (config, "unable to read");
  12034.   
  12035.       while (fgets (buffer, sizeof buffer, fp)) {
  12036.       if (ap = index (buffer, '\n'))
  12037. !         *ap-- = '\0';
  12038.       else
  12039.           ap = &buffer[strlen (buffer) - 1];
  12040.       while (ap >= buffer)
  12041.           if (isspace (*ap))
  12042. !         *ap = '\0';
  12043.           else
  12044.           break;
  12045.       for (cp = buffer; isspace (*cp); cp++)
  12046.           continue;
  12047. !     if (*cp == '\0' || *cp == '#')
  12048.           continue;
  12049.       for (ap = cp; *ap; ap++)
  12050. !         if (isspace (*ap) || *ap == ':') {
  12051. !         *ap++ = '\0';
  12052.           while (isspace (*ap))
  12053.               ap++;
  12054.           break;
  12055. ***************
  12056. *** 637,642 ****
  12057. --- 698,705 ----
  12058.       adios (NULLCP, "etc must be specified in %s", config);
  12059.       trim (etcpath);
  12060.   
  12061. +     if (strcmp (mailgroup, "off"))    /* if not "off" */
  12062. +     add_option ("MAILGROUP");
  12063.       if (mailpath == NULL)
  12064.       adios (NULLCP, "mail must be specified in %s", config);
  12065.       trim (mailpath);
  12066. ***************
  12067. *** 678,683 ****
  12068. --- 741,749 ----
  12069.       else if (strcmp (bboards, "nntp") == 0) {
  12070.       add_option ("BPOP");/* used by msh.c & bbc.c, but see also pshsbr.c */
  12071.       add_option ("NNTP");
  12072. +     if (mpop)
  12073. +         adios (NULLCP,
  12074. +         "bboards \"nntp\" is incompatible with \"options MPOP\"");
  12075.       }
  12076.   
  12077.       if (strcmp (mf, "on") && strcmp (mf, "off"))
  12078. ***************
  12079. *** 694,709 ****
  12080.       }
  12081.   
  12082.       if (strcmp (sharedlib, "on") && strcmp (sharedlib, "off")
  12083.           && strcmp (sharedlib, "secure"))
  12084.       adios (NULLCP,
  12085. !         "sharedlib should be either \"on\", \"off\", or \"secure\", not %s",
  12086.           sharedlib);
  12087.   
  12088. !     if (strcmp (tma, "on") && strcmp (tma, "off"))
  12089. !     adios (NULLCP, "tma should be either \"on\" or \"off\", not %s", tma);
  12090. !     if (strcmp (tma, "on") == 0)
  12091. !     add_option ("TMA");
  12092.   
  12093.       begin_myopt ();
  12094.       if (cp = options) {
  12095.       for (ap = cp; *ap; ap++)
  12096. --- 760,776 ----
  12097.       }
  12098.   
  12099.       if (strcmp (sharedlib, "on") && strcmp (sharedlib, "off")
  12100. +         && strcmp (sharedlib, "sun4") && strcmp (sharedlib, "sys5")
  12101.           && strcmp (sharedlib, "secure"))
  12102.       adios (NULLCP,
  12103. !         "sharedlib should be either \"sun4\", \"sys5\", or \"off\", not %s",
  12104.           sharedlib);
  12105.   
  12106. !     (void) sprintf(buffer, "TYPESIG=%s", signl);
  12107. !     add_option (buffer);
  12108.   
  12109. + /* loop over options string and add -D ccoptions */
  12110. + 
  12111.       begin_myopt ();
  12112.       if (cp = options) {
  12113.       for (ap = cp; *ap; ap++)
  12114. ***************
  12115. *** 711,717 ****
  12116.           *ap = ' ';
  12117.       options = NULL;
  12118.       for (ap = cp; dp = index (ap, ' '); ap = dp) {
  12119. !         *dp++ = NULL;
  12120.           add_myopt (ap);
  12121.           (void) sprintf (buffer, "%s-D%s", options ? " " : "", ap);
  12122.           ap = buffer;
  12123. --- 778,784 ----
  12124.           *ap = ' ';
  12125.       options = NULL;
  12126.       for (ap = cp; dp = index (ap, ' '); ap = dp) {
  12127. !         *dp++ = '\0';
  12128.           add_myopt (ap);
  12129.           (void) sprintf (buffer, "%s-D%s", options ? " " : "", ap);
  12130.           ap = buffer;
  12131. ***************
  12132. *** 728,733 ****
  12133. --- 795,803 ----
  12134.       free (cp);
  12135.       }
  12136.       end_myopt ();
  12137. +     if (strcmp (bboards, "nntp") == 0 && mpop)
  12138. +     adios (NULLCP,
  12139. +         "bboards \"nntp\" is incompatible with \"options MPOP\"");
  12140.   }
  12141.   
  12142.   /*   */
  12143. ***************
  12144. *** 750,765 ****
  12145.       int     len;
  12146.       char   *bp,
  12147.               buffer[BUFSIZ];
  12148.       static int  nameoutput = 0;
  12149.       static int  linepos = 0;
  12150.       static int  outputlinelen = 72;
  12151.   
  12152.       if (smtp && strcmp (s, "BERK") == 0) {
  12153.       fprintf (stderr, "\"options BERK\" overriding smtp suffix...\n");
  12154.       smtp = 0;
  12155.       }
  12156. -     if (strcmp (s, "UCI") == 0) uci = 1;
  12157. -     if (strcmp (s, "BSD43") == 0) bsd43 = 1;
  12158.       if (!nameoutput) {
  12159.       printf ("%s: ", bp = "options");
  12160.       linepos += (nameoutput = strlen (bp) + 2);
  12161. --- 820,842 ----
  12162.       int     len;
  12163.       char   *bp,
  12164.               buffer[BUFSIZ];
  12165. +     struct copt *op;
  12166.       static int  nameoutput = 0;
  12167.       static int  linepos = 0;
  12168.       static int  outputlinelen = 72;
  12169.   
  12170. +     for (op = copts; op->c_name; op++)
  12171. +     if (!strncmp (op->c_name,s,strlen(op->c_name))) {
  12172. +         op->c_value = 1;
  12173. +         break;
  12174. +     }
  12175. + 
  12176. +     if (strcmp (s, "MPOP") == 0)
  12177. +     mpop = 1;
  12178.       if (smtp && strcmp (s, "BERK") == 0) {
  12179.       fprintf (stderr, "\"options BERK\" overriding smtp suffix...\n");
  12180.       smtp = 0;
  12181.       }
  12182.       if (!nameoutput) {
  12183.       printf ("%s: ", bp = "options");
  12184.       linepos += (nameoutput = strlen (bp) + 2);
  12185. ***************
  12186. *** 802,809 ****
  12187.   
  12188.       if (s == NULL || (p = rindex (s, '/')) == NULL)
  12189.       return;
  12190. !     if (*++p == NULL)
  12191. !     *--p = NULL;
  12192.   }
  12193.   
  12194.   
  12195. --- 879,886 ----
  12196.   
  12197.       if (s == NULL || (p = rindex (s, '/')) == NULL)
  12198.       return;
  12199. !     if (*++p == '\0')
  12200. !     *--p = '\0';
  12201.   }
  12202.   
  12203.   
  12204. ***************
  12205. *** 814,820 ****
  12206.   
  12207.       if (p = rindex (s, '/'))
  12208.       p++;
  12209. !     return ((p == NULL || *p == NULL) ? s : p);
  12210.   }
  12211.   
  12212.   /*   */
  12213. --- 891,897 ----
  12214.   
  12215.       if (p = rindex (s, '/'))
  12216.       p++;
  12217. !     return ((p == NULL || *p == '\0') ? s : p);
  12218.   }
  12219.   
  12220.   /*   */
  12221. ***************
  12222. *** 825,831 ****
  12223.   {
  12224.       char   *p;
  12225.   
  12226. !     if (s1 == NULL || *s1 == NULL)
  12227.       return s2;
  12228.       if (s2 == NULL)
  12229.       return strdup (s1);
  12230. --- 902,908 ----
  12231.   {
  12232.       char   *p;
  12233.   
  12234. !     if (s1 == NULL || *s1 == '\0')
  12235.       return s2;
  12236.       if (s2 == NULL)
  12237.       return strdup (s1);
  12238. ***************
  12239. *** 885,891 ****
  12240.   
  12241.       return t;
  12242.   }
  12243. ! #endif    notdef
  12244.   
  12245.   /*   */
  12246.   
  12247. --- 962,968 ----
  12248.   
  12249.       return t;
  12250.   }
  12251. ! #endif /* notdef */
  12252.   
  12253.   /*   */
  12254.   
  12255. *** /dev/null    Tue Dec 15 08:01:10 1992
  12256. --- conf/tailor/clcs.com.au    Thu Dec 10 11:37:57 1992
  12257. ***************
  12258. *** 0 ****
  12259. --- 1,11 ----
  12260. + mmdfldir:    /var/mail
  12261. + mmdflfil:    
  12262. + hostable:    /usr/local/lib/mh/hosts
  12263. + sendmail:    /usr/ucblib/sendmail
  12264. + okhosts:    /usr/local/lib/mh/Rmail.OKHosts
  12265. + okdests:    /usr/local/lib/mh/Rmail.OKDests
  12266. + 
  12267. + systemname:    mars
  12268. + localname:    mars
  12269. + servers:    mars \01localnet
  12270. + 
  12271. *** /dev/null    Tue Dec 15 08:01:10 1992
  12272. --- conf/tailor/dbc    Wed Dec  2 13:32:06 1992
  12273. ***************
  12274. *** 0 ****
  12275. --- 1,4 ----
  12276. + mmdfldir:    
  12277. + mmdflfil:    .maildrop
  12278. + hostable:    /usr/local/lib/mh/hosts
  12279. + servers:    localhost
  12280. *** /dev/null    Tue Dec 15 08:01:10 1992
  12281. --- conf/tailor/ncr-sys5r4    Mon Feb 10 16:52:47 1992
  12282. ***************
  12283. *** 0 ****
  12284. --- 1,10 ----
  12285. + localname:    ncrtest.ncr.com
  12286. + systemname:    ncrtest
  12287. + mmdfldir:
  12288. + mmdflfil:    .mail
  12289. + mmdelim1:       \001\001\001\001\n
  12290. + mmdelim2:       \001\001\001\001\n
  12291. + hostable:    /usr/local/lib/mh/hosts
  12292. + servers:    localhost \01localnet
  12293. + lockldir:    /usr/mmdf/log/locks
  12294. + lockstyle:    2
  12295. *** /dev/null    Tue Dec 15 08:01:10 1992
  12296. --- conf/tailor/rpi.edu    Fri Dec  4 09:14:43 1992
  12297. ***************
  12298. *** 0 ****
  12299. --- 1,9 ----
  12300. + everyone:    65334
  12301. + localname:    rpi.edu
  12302. + lockstyle:    0
  12303. + lockldir:
  12304. + mmdfldir:    /usr/spool/mail
  12305. + mmdflfil:    
  12306. + hostable:    /etc/hosts
  12307. + servers:    mail.its.rpi.edu mail1.its.rpi.edu rpi.edu \01rpi.edu
  12308. + pophost:        mail.its.rpi.edu
  12309. *** ../mh-6.7.2/config/version.sh    Thu Jan 30 14:20:46 1992
  12310. --- config/version.sh    Wed Feb  5 13:07:41 1992
  12311. ***************
  12312. *** 1,3 ****
  12313.   : run this script through /bin/sh
  12314. ! : '@(#)$Id: version.sh,v 1.9 1992/01/30 22:20:41 jromine Exp $'
  12315.   case $# in
  12316. --- 1,3 ----
  12317.   : run this script through /bin/sh
  12318. ! : '@(#)$Id: version.sh,v 1.9 1992/01/30 22:20:41 jromine Exp jromine $'
  12319.   case $# in
  12320. ***************
  12321. *** 4,5 ****
  12322. --- 4,6 ----
  12323.     0) set "6.6";;
  12324. +   2) flag="$1"; shift;;
  12325.   esac
  12326. ***************
  12327. *** 48,50 ****
  12328.         if (patch > 0) {\
  12329. !       printf "char *version = \"@(#)MH %s.%s.%s #%d[UCI] ", \
  12330.           major, minor, patch, local > "version.c"; \
  12331. --- 49,51 ----
  12332.         if (patch > 0) {\
  12333. !       printf "char *version = \"@(#)MH %s.%s.%s #%d[UCI]", \
  12334.           major, minor, patch, local > "version.c"; \
  12335. ***************
  12336. *** 62,63 ****
  12337.   }' && mv _version version
  12338. ! echo '('$LOCAL') of '`date`'";' >> version.c
  12339. --- 63,67 ----
  12340.   }' && mv _version version
  12341. ! case x${flag} in
  12342. !     x) echo ' ('$LOCAL') of '`date`'";' >> version.c ;;
  12343. !   x-n) echo '";' >> version.c ;;
  12344. ! esac
  12345. *** ../mh-6.7.2/dist/Makefile    Thu Feb 13 12:26:30 1992
  12346. --- dist/Makefile    Mon Dec 14 16:36:08 1992
  12347. ***************
  12348. *** 4,6 ****
  12349.   #    This file is automatically generated.  Do not edit!
  12350. ! # @(#)$Id: dist,v 2.6 90/04/08 20:01:28 sources Exp $
  12351.   ##############################################################################
  12352. --- 4,6 ----
  12353.   #    This file is automatically generated.  Do not edit!
  12354. ! # @(#)$Id: dist,v 2.7 1992/12/02 22:21:43 jromine Exp $
  12355.   ##############################################################################
  12356. ***************
  12357. *** 27,29 ****
  12358.   TARGETS    =    ../READ-ME \
  12359. !         mh-gen.cat MH.cat ADMIN.cat mh6.7.cat \
  12360.           bboards.dvi beginners.dvi mh4mm.dvi mh6.dvi multifarious.dvi \
  12361. --- 27,29 ----
  12362.   TARGETS    =    ../READ-ME \
  12363. !         mh-gen.cat MH.cat ADMIN.cat mh-changes.cat \
  12364.           bboards.dvi beginners.dvi mh4mm.dvi mh6.dvi multifarious.dvi \
  12365. ***************
  12366. *** 35,37 ****
  12367.   
  12368. ! doc:        MH.doc ADMIN.doc mh6.7.doc
  12369.   
  12370. --- 35,37 ----
  12371.   
  12372. ! doc:        MH.doc ADMIN.doc mh-changes.doc
  12373.   
  12374. ***************
  12375. *** 38,40 ****
  12376.   
  12377. ! IMPRESS    =    mh-gen.imp MH.imp ADMIN.imp mh6.7.imp \
  12378.           bboards.imp beginners.imp \
  12379. --- 38,40 ----
  12380.   
  12381. ! IMPRESS    =    mh-gen.imp MH.imp ADMIN.imp mh-changes.imp \
  12382.           bboards.imp beginners.imp \
  12383. ***************
  12384. *** 50,52 ****
  12385.       lpr -t -J ADMIN ADMIN.cat
  12386. !     lpr -t -J MH.6.7 mh6.7.cat
  12387.       lpr -d -J BBoards bboards.dvi
  12388. --- 50,52 ----
  12389.       lpr -t -J ADMIN ADMIN.cat
  12390. !     lpr -t -J MH-CHANGES mh-changes.cat
  12391.       lpr -d -J BBoards bboards.dvi
  12392. ***************
  12393. *** 83,89 ****
  12394.   
  12395. ! mh6.7.cat \
  12396. ! mh6.7.doc \
  12397. ! mh6.7.imp:    true
  12398. !         cd ../papers/mh6.7; make $@
  12399. !         cp ../papers/mh6.7/$@ $@
  12400.   
  12401. --- 83,89 ----
  12402.   
  12403. ! mh-changes.cat \
  12404. ! mh-changes.doc \
  12405. ! mh-changes.imp:    true
  12406. !         cd ../papers/changes; make $@
  12407. !         cp ../papers/changes/$@ $@
  12408.   
  12409. *** ../mh-6.7.2/h/addrsbr.h    Thu Oct 29 14:56:13 1987
  12410. --- h/addrsbr.h    Tue May 12 15:01:15 1992
  12411. ***************
  12412. *** 31,37 ****
  12413.   
  12414.   #ifdef    MHMTS
  12415.       char   *m_aka;
  12416. ! #endif    MHMTS
  12417.   };
  12418.   
  12419.   
  12420. --- 31,37 ----
  12421.   
  12422.   #ifdef    MHMTS
  12423.       char   *m_aka;
  12424. ! #endif /* MHMTS */
  12425.   };
  12426.   
  12427.   
  12428. *** ../mh-6.7.2/h/aliasbr.h    Thu Oct 29 14:56:14 1987
  12429. --- h/aliasbr.h    Tue May 12 15:03:31 1992
  12430. ***************
  12431. *** 1,4 ****
  12432. --- 1,5 ----
  12433.   /* aliasbr.h - definitions for the aliasing system */
  12434. + /* $Id: aliasbr.h,v 1.2 1992/05/12 22:03:31 jromine Exp $ */
  12435.   
  12436.   
  12437.   extern char *AliasFile;        /* mh-alias(5) */
  12438. ***************
  12439. *** 30,42 ****
  12440.       char   *h_shell;        /* user's shell */
  12441.   #ifdef    BSD42
  12442.       int        h_ngrps;        /* number of groups this user belongs to */
  12443. ! #endif    BSD42
  12444.       struct home *h_next;    /* next home in list */
  12445.   };
  12446.   
  12447.   #ifndef    MMDFMTS
  12448.   struct  home *seek_home ();
  12449. ! #endif    MMDFMTS
  12450.   
  12451.   int     alias (), akvisible (), init_pw ();
  12452.   char   *akresult (), *akvalue (), *akerror ();
  12453. --- 31,43 ----
  12454.       char   *h_shell;        /* user's shell */
  12455.   #ifdef    BSD42
  12456.       int        h_ngrps;        /* number of groups this user belongs to */
  12457. ! #endif /* BSD42 */
  12458.       struct home *h_next;    /* next home in list */
  12459.   };
  12460.   
  12461.   #ifndef    MMDFMTS
  12462.   struct  home *seek_home ();
  12463. ! #endif /* MMDFMTS */
  12464.   
  12465.   int     alias (), akvisible (), init_pw ();
  12466.   char   *akresult (), *akvalue (), *akerror ();
  12467. *** ../mh-6.7.2/h/fmtcompile.h    Thu Jan 23 15:16:10 1992
  12468. --- h/fmtcompile.h    Tue Nov 17 09:50:36 1992
  12469. ***************
  12470. *** 1,4 ****
  12471. ! /* @(#)$Id: fmtcompile.h,v 1.8 1992/01/23 23:16:05 jromine Exp $ */
  12472.   
  12473.   /* Format Types */
  12474.   /* -------------*/
  12475. --- 1,4 ----
  12476. ! /* @(#)$Id: fmtcompile.h,v 1.9 1992/02/09 07:12:48 jromine Exp $ */
  12477.   
  12478.   /* Format Types */
  12479.   /* -------------*/
  12480. ***************
  12481. *** 29,105 ****
  12482.   #define FT_LV_PLUS_L    21    /* set "value" += literal */
  12483.   #define FT_LV_MINUS_L    22    /* set "value" -= literal */
  12484.   #define FT_LV_DIVIDE_L    23    /* set "value" to value / literal */
  12485. ! #define FT_LV_CHAR_LEFT 24    /* set "value" to char left in output */
  12486.   
  12487. ! #define FT_LS_MONTH    25    /* set "str" to tws month */
  12488. ! #define FT_LS_LMONTH    26    /* set "str" to long tws month */
  12489. ! #define FT_LS_ZONE    27    /* set "str" to tws timezone */
  12490. ! #define FT_LS_DAY    28    /* set "str" to tws weekday */
  12491. ! #define FT_LS_WEEKDAY    29    /* set "str" to long tws weekday */
  12492. ! #define FT_LS_822DATE    30    /* set "str" to 822 date str */
  12493. ! #define FT_LS_PRETTY    31    /* set "str" to pretty (?) date str */
  12494. ! #define FT_LV_SEC    32    /* set "value" to tws second */
  12495. ! #define FT_LV_MIN    33    /* set "value" to tws minute */
  12496. ! #define FT_LV_HOUR    34    /* set "value" to tws hour */
  12497. ! #define FT_LV_MDAY    35    /* set "value" to tws day of month */
  12498. ! #define FT_LV_MON    36    /* set "value" to tws month */
  12499. ! #define FT_LV_YEAR    37    /* set "value" to tws year */
  12500. ! #define FT_LV_YDAY    38    /* set "value" to tws day of year */
  12501. ! #define FT_LV_WDAY    39    /* set "value" to tws weekday */
  12502. ! #define FT_LV_ZONE    40    /* set "value" to tws timezone */
  12503. ! #define FT_LV_CLOCK    41    /* set "value" to tws clock */
  12504. ! #define FT_LV_RCLOCK    42    /* set "value" to now - tws clock */
  12505. ! #define FT_LV_DAYF    43    /* set "value" to tws day flag */
  12506. ! #define FT_LV_DST    44    /* set "value" to tws daylight savings flag */
  12507. ! #define FT_LV_ZONEF    45    /* set "value" to tws timezone flag */
  12508.   
  12509. ! #define FT_LS_PERS    46    /* set "str" to person part of addr */
  12510. ! #define FT_LS_MBOX    47    /* set "str" to mbox part of addr */
  12511. ! #define FT_LS_HOST    48    /* set "str" to host part of addr */
  12512. ! #define FT_LS_PATH    49    /* set "str" to route part of addr */
  12513. ! #define FT_LS_GNAME    50    /* set "str" to group part of addr */
  12514. ! #define FT_LS_NOTE    51    /* set "str" to comment part of addr */
  12515. ! #define FT_LS_ADDR    52    /* set "str" to mbox@host */
  12516. ! #define FT_LS_822ADDR    53    /* set "str" to 822 format addr */
  12517. ! #define FT_LS_FRIENDLY    54    /* set "str" to "friendly" format addr */
  12518. ! #define FT_LV_HOSTTYPE    55    /* set "value" to addr host type */
  12519. ! #define FT_LV_INGRPF    56    /* set "value" to addr in-group flag */
  12520. ! #define FT_LV_NOHOSTF    57    /* set "value" to addr no-host flag */
  12521.   
  12522.   /* Date Coercion */
  12523. ! #define FT_LOCALDATE    58    /* Coerce date to local timezone */
  12524. ! #define FT_GMTDATE    59    /* Coerce date to gmt */
  12525.   
  12526.   /* pre-format processing */
  12527. ! #define FT_PARSEDATE    60    /* parse comp into a date (tws) struct */
  12528. ! #define FT_PARSEADDR    61    /* parse comp into a mailaddr struct */
  12529. ! #define FT_FORMATADDR    62    /* let external routine format addr */
  12530. ! #define FT_MYMBOX    63    /* do "mymbox" test on comp */
  12531.   
  12532. ! /* misc. */
  12533. ! #ifdef    VAN
  12534. ! #define FT_ADDTOSEQ    64    /* add current msg to a sequence */
  12535. ! #endif
  12536.   
  12537.   /* conditionals & control flow (must be last) */
  12538. ! #define FT_SAVESTR    65    /* save current str reg */
  12539. ! #define FT_DONE        66    /* stop formatting */
  12540. ! #define FT_PAUSE    67    /* pause */
  12541. ! #define FT_NOP        68    /* nop */
  12542. ! #define FT_GOTO        69    /* (relative) goto */
  12543. ! #define FT_IF_S_NULL    70    /* test if "str" null */
  12544. ! #define FT_IF_S        71    /* test if "str" non-null */
  12545. ! #define FT_IF_V_EQ    72    /* test if "value" = literal */
  12546. ! #define FT_IF_V_NE    73    /* test if "value" != literal */
  12547. ! #define FT_IF_V_GT    74    /* test if "value" > literal */
  12548. ! #define FT_IF_MATCH    75    /* test if "str" contains literal */
  12549. ! #define FT_IF_AMATCH    76    /* test if "str" starts with literal */
  12550. ! #define FT_S_NULL    77    /* V = 1 if "str" null */
  12551. ! #define FT_S_NONNULL    78    /* V = 1 if "str" non-null */
  12552. ! #define FT_V_EQ        79    /* V = 1 if "value" = literal */
  12553. ! #define FT_V_NE        80    /* V = 1 if "value" != literal */
  12554. ! #define FT_V_GT        81    /* V = 1 if "value" > literal */
  12555. ! #define FT_V_MATCH    82    /* V = 1 if "str" contains literal */
  12556. ! #define FT_V_AMATCH    83    /* V = 1 if "str" starts with literal */
  12557.   
  12558. ! #define IF_FUNCS FT_S_NULL    /* start of "if" functions */
  12559. --- 29,104 ----
  12560.   #define FT_LV_PLUS_L    21    /* set "value" += literal */
  12561.   #define FT_LV_MINUS_L    22    /* set "value" -= literal */
  12562.   #define FT_LV_DIVIDE_L    23    /* set "value" to value / literal */
  12563. ! #define    FT_LV_MODULO_L    24    /* set "value" to value % literal */
  12564. ! #define FT_LV_CHAR_LEFT 25      /* set "value" to char left in output */
  12565.   
  12566. ! #define FT_LS_MONTH     26      /* set "str" to tws month */
  12567. ! #define FT_LS_LMONTH    27      /* set "str" to long tws month */
  12568. ! #define FT_LS_ZONE      28      /* set "str" to tws timezone */
  12569. ! #define FT_LS_DAY       29      /* set "str" to tws weekday */
  12570. ! #define FT_LS_WEEKDAY   30      /* set "str" to long tws weekday */
  12571. ! #define FT_LS_822DATE   31      /* set "str" to 822 date str */
  12572. ! #define FT_LS_PRETTY    32      /* set "str" to pretty (?) date str */
  12573. ! #define FT_LV_SEC       33      /* set "value" to tws second */
  12574. ! #define FT_LV_MIN       34      /* set "value" to tws minute */
  12575. ! #define FT_LV_HOUR      35      /* set "value" to tws hour */
  12576. ! #define FT_LV_MDAY      36      /* set "value" to tws day of month */
  12577. ! #define FT_LV_MON       37      /* set "value" to tws month */
  12578. ! #define FT_LV_YEAR      38      /* set "value" to tws year */
  12579. ! #define FT_LV_YDAY      39      /* set "value" to tws day of year */
  12580. ! #define FT_LV_WDAY      40      /* set "value" to tws weekday */
  12581. ! #define FT_LV_ZONE      41      /* set "value" to tws timezone */
  12582. ! #define FT_LV_CLOCK     42      /* set "value" to tws clock */
  12583. ! #define FT_LV_RCLOCK    43      /* set "value" to now - tws clock */
  12584. ! #define FT_LV_DAYF      44      /* set "value" to tws day flag */
  12585. ! #define FT_LV_DST       45      /* set "value" to tws daylight savings flag */
  12586. ! #define FT_LV_ZONEF     46      /* set "value" to tws timezone flag */
  12587.   
  12588. ! #define FT_LS_PERS      47      /* set "str" to person part of addr */
  12589. ! #define FT_LS_MBOX      48      /* set "str" to mbox part of addr */
  12590. ! #define FT_LS_HOST      49      /* set "str" to host part of addr */
  12591. ! #define FT_LS_PATH      50      /* set "str" to route part of addr */
  12592. ! #define FT_LS_GNAME     51      /* set "str" to group part of addr */
  12593. ! #define FT_LS_NOTE      52      /* set "str" to comment part of addr */
  12594. ! #define FT_LS_ADDR      53      /* set "str" to mbox@host */
  12595. ! #define FT_LS_822ADDR   54      /* set "str" to 822 format addr */
  12596. ! #define FT_LS_FRIENDLY  55      /* set "str" to "friendly" format addr */
  12597. ! #define FT_LV_HOSTTYPE  56      /* set "value" to addr host type */
  12598. ! #define FT_LV_INGRPF    57      /* set "value" to addr in-group flag */
  12599. ! #define FT_LV_NOHOSTF   58      /* set "value" to addr no-host flag */
  12600.   
  12601.   /* Date Coercion */
  12602. ! #define FT_LOCALDATE    59      /* Coerce date to local timezone */
  12603. ! #define FT_GMTDATE      60      /* Coerce date to gmt */
  12604.   
  12605.   /* pre-format processing */
  12606. ! #define FT_PARSEDATE    61      /* parse comp into a date (tws) struct */
  12607. ! #define FT_PARSEADDR    62      /* parse comp into a mailaddr struct */
  12608. ! #define FT_FORMATADDR   63      /* let external routine format addr */
  12609. ! #define FT_MYMBOX       64      /* do "mymbox" test on comp */
  12610.   
  12611. ! /* misc. */        /* ADDTOSEQ only works if you include "options LBL" */
  12612. ! #define FT_ADDTOSEQ     65      /* add current msg to a sequence */
  12613.   
  12614.   /* conditionals & control flow (must be last) */
  12615. ! #define FT_SAVESTR      66      /* save current str reg */
  12616. ! #define FT_DONE         67      /* stop formatting */
  12617. ! #define FT_PAUSE        68      /* pause */
  12618. ! #define FT_NOP          69      /* nop */
  12619. ! #define FT_GOTO         70      /* (relative) goto */
  12620. ! #define FT_IF_S_NULL    71      /* test if "str" null */
  12621. ! #define FT_IF_S         72      /* test if "str" non-null */
  12622. ! #define FT_IF_V_EQ      73      /* test if "value" = literal */
  12623. ! #define FT_IF_V_NE      74      /* test if "value" != literal */
  12624. ! #define FT_IF_V_GT      75      /* test if "value" > literal */
  12625. ! #define FT_IF_MATCH     76      /* test if "str" contains literal */
  12626. ! #define FT_IF_AMATCH    77      /* test if "str" starts with literal */
  12627. ! #define FT_S_NULL       78      /* V = 1 if "str" null */
  12628. ! #define FT_S_NONNULL    79      /* V = 1 if "str" non-null */
  12629. ! #define FT_V_EQ         80      /* V = 1 if "value" = literal */
  12630. ! #define FT_V_NE         81      /* V = 1 if "value" != literal */
  12631. ! #define FT_V_GT         82      /* V = 1 if "value" > literal */
  12632. ! #define FT_V_MATCH      83      /* V = 1 if "str" contains literal */
  12633. ! #define FT_V_AMATCH     84      /* V = 1 if "str" starts with literal */
  12634.   
  12635. ! #define IF_FUNCS FT_S_NULL      /* start of "if" functions */
  12636. *** ../mh-6.7.2/h/local.h    Thu Oct 29 14:56:18 1987
  12637. --- h/local.h    Thu Feb  6 09:37:46 1992
  12638. ***************
  12639. *** 1,19 ****
  12640.   /* local.h - fine the -lndir include file */
  12641.   
  12642.   #ifndef    BSD42
  12643.   #include <sys/types.h>
  12644. ! #else    BSD42
  12645.   #include <sys/param.h>
  12646. ! #endif    BSD42
  12647.   
  12648.   #ifndef    BSD42
  12649.   #ifndef NDIR
  12650. ! #include <dir.h>
  12651. ! #else    NDIR
  12652.   #include <ndir.h>
  12653. ! #endif  NDIR
  12654. ! #else    BSD42
  12655.   #include <sys/dir.h>
  12656. ! #endif    BSD42
  12657.   
  12658.   #include <sys/stat.h>
  12659. --- 1,24 ----
  12660.   /* local.h - fine the -lndir include file */
  12661. + /* @(#)$Id: local.h,v 1.3 1992/02/06 17:37:44 jromine Exp $ */
  12662.   
  12663.   #ifndef    BSD42
  12664.   #include <sys/types.h>
  12665. ! #else    /* BSD42 */
  12666.   #include <sys/param.h>
  12667. ! #endif
  12668.   
  12669.   #ifndef    BSD42
  12670.   #ifndef NDIR
  12671. ! #ifndef    SYS5DIR
  12672. ! #include <dir.h>        /* last choice */
  12673. ! #else    /* SYS5DIR */
  12674. ! #include <dirent.h>
  12675. ! #endif
  12676. ! #else    /* NDIR */
  12677.   #include <ndir.h>
  12678. ! #endif
  12679. ! #else    /* BSD42 */
  12680.   #include <sys/dir.h>
  12681. ! #endif
  12682.   
  12683.   #include <sys/stat.h>
  12684. *** /dev/null    Tue Dec 15 08:01:10 1992
  12685. --- h/md5.h    Mon Oct 26 08:38:59 1992
  12686. ***************
  12687. *** 0 ****
  12688. --- 1,71 ----
  12689. + /* @(#)$Id: md5.h,v 1.2 1992/10/26 16:38:50 jromine Exp $ */
  12690. + /* taken from RFC-1321/Appendices A.1/A.2 */
  12691. + 
  12692. + /* GLOBAL.H - RSAREF types and constants
  12693. +  */
  12694. + 
  12695. + /* PROTOTYPES should be set to one if and only if the compiler supports
  12696. +   function argument prototyping.
  12697. + The following makes PROTOTYPES default to 0 if it has not already
  12698. +   been defined with C compiler flags.
  12699. +  */
  12700. + #ifndef PROTOTYPES
  12701. + #define PROTOTYPES 0
  12702. + #endif
  12703. + 
  12704. + /* POINTER defines a generic pointer type */
  12705. + typedef unsigned char *POINTER;
  12706. + 
  12707. + /* UINT2 defines a two byte word */
  12708. + typedef unsigned short int UINT2;
  12709. + 
  12710. + /* UINT4 defines a four byte word */
  12711. + typedef unsigned long int UINT4;
  12712. + 
  12713. + /* PROTO_LIST is defined depending on how PROTOTYPES is defined above.
  12714. + If using PROTOTYPES, then PROTO_LIST returns the list, otherwise it
  12715. +   returns an empty list.
  12716. +  */
  12717. + #if PROTOTYPES
  12718. + #define PROTO_LIST(list) list
  12719. + #else
  12720. + #define PROTO_LIST(list) ()
  12721. + #endif
  12722. + 
  12723. + /* MD5.H - header file for MD5C.C
  12724. +  */
  12725. + 
  12726. + /* Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All
  12727. + rights reserved.
  12728. + 
  12729. + License to copy and use this software is granted provided that it
  12730. + is identified as the "RSA Data Security, Inc. MD5 Message-Digest
  12731. + Algorithm" in all material mentioning or referencing this software
  12732. + or this function.
  12733. + 
  12734. + License is also granted to make and use derivative works provided
  12735. + that such works are identified as "derived from the RSA Data
  12736. + Security, Inc. MD5 Message-Digest Algorithm" in all material
  12737. + mentioning or referencing the derived work.
  12738. + 
  12739. + RSA Data Security, Inc. makes no representations concerning either
  12740. + the merchantability of this software or the suitability of this
  12741. + software for any particular purpose. It is provided "as is"
  12742. + without express or implied warranty of any kind.
  12743. + 
  12744. + These notices must be retained in any copies of any part of this
  12745. + documentation and/or software.
  12746. +  */
  12747. + 
  12748. + /* MD5 context. */
  12749. + typedef struct {
  12750. +   UINT4 state[4];                                   /* state (ABCD) */
  12751. +   UINT4 count[2];        /* number of bits, modulo 2^64 (lsb first) */
  12752. +   unsigned char buffer[64];                         /* input buffer */
  12753. + } MD5_CTX;
  12754. + 
  12755. + void MD5Init PROTO_LIST ((MD5_CTX *));
  12756. + void MD5Update PROTO_LIST
  12757. +   ((MD5_CTX *, unsigned char *, unsigned int));
  12758. + void MD5Final PROTO_LIST ((unsigned char [16], MD5_CTX *));
  12759. + 
  12760. *** ../mh-6.7.2/h/mh.h    Thu Jan 23 16:03:59 1992
  12761. --- h/mh.h    Mon Dec 14 09:10:47 1992
  12762. ***************
  12763. *** 1,5 ****
  12764.   /* mh.h - main header file for all of MH */
  12765. ! /* @(#)$Id: mh.h,v 2.7 1992/01/24 00:03:50 jromine Exp $ */
  12766.   
  12767.   
  12768.   /* Well-used constants */
  12769. --- 1,5 ----
  12770.   /* mh.h - main header file for all of MH */
  12771. ! /* @(#)$Id: mh.h,v 2.18 1992/12/14 17:10:43 jromine Exp $ */
  12772.   
  12773.   
  12774.   /* Well-used constants */
  12775. ***************
  12776. *** 10,15 ****
  12777. --- 10,16 ----
  12778.   #define ALL        ""
  12779.   #define NULLCP        ((char *) 0)
  12780.   #define NULLVP        ((char **) 0)
  12781. + #define    Nbby        8    /* number of bits/byte */
  12782.   
  12783.   #define MAXARGS        1000    /* max arguments to exec */
  12784.   
  12785. ***************
  12786. *** 22,30 ****
  12787.   #endif
  12788.   #define DMAXFOLDER       4    /* typical number of digits */
  12789.   
  12790. ! #if !defined(BSD42) && !defined(BSD41A) && !defined(VMUNIX) && !defined(hpux)
  12791.   #define    vfork        fork
  12792. ! #endif    not BSD            /* how sad... */
  12793.   
  12794.   /*   */
  12795.   
  12796. --- 23,31 ----
  12797.   #endif
  12798.   #define DMAXFOLDER       4    /* typical number of digits */
  12799.   
  12800. ! #if (!defined(BSD42) && !defined(BSD41A) && !defined(VMUNIX) && !defined(hpux)) || defined(_AIX)
  12801.   #define    vfork        fork
  12802. ! #endif    /* not BSD */        /* how sad... */
  12803.   
  12804.   /*   */
  12805.   
  12806. ***************
  12807. *** 67,76 ****
  12808.   
  12809.       char   *foldpath;        /* Pathname of folder           */
  12810.   
  12811. !     char    msgflags;        /* Folder status bits           */
  12812.   #ifndef    MTR
  12813.       char    pad1[sizeof (int) - sizeof (char)];
  12814. ! #endif    not MTR
  12815.   #define READONLY  0x01        /*     No write access to folder */
  12816.   #define    SEQMOD      0x02        /*     folder's sequences modifed */
  12817.   #define    MHPATH      0x04        /*     mhpath-style folder handling */
  12818. --- 68,77 ----
  12819.   
  12820.       char   *foldpath;        /* Pathname of folder           */
  12821.   
  12822. !     int     msgflags;        /* Folder status bits           */
  12823.   #ifndef    MTR
  12824.       char    pad1[sizeof (int) - sizeof (char)];
  12825. ! #endif /* not MTR */
  12826.   #define READONLY  0x01        /*     No write access to folder */
  12827.   #define    SEQMOD      0x02        /*     folder's sequences modifed */
  12828.   #define    MHPATH      0x04        /*     mhpath-style folder handling */
  12829. ***************
  12830. *** 78,104 ****
  12831.   #define    MODIFIED  0x10        /*     msh in-core folder modified */
  12832.   #define    FBITS    "\020\01READONLY\02SEQMOD\03MHPATH\04OTHERS\05MODIFIED"
  12833.   
  12834. ! /* Note well: msgstats[] is a short, so we have 16 bits to work
  12835.       with.  The first 5 are for standard MH message flags,
  12836. !     this leaves us 11 for user-defined attributes.  Of these,
  12837. !     1 is reserved for future internal use, so this leaves
  12838. !     users 10.                        */
  12839. ! #define    NATTRS    10        /* could be 11, see above    */
  12840.       char   *msgattrs[NATTRS + 1];/* folder attributes        */
  12841. !     short   attrstats;        /* public=0/private=1        */
  12842. ! #ifndef    MTR
  12843. !     char    pad2[sizeof (int) - sizeof (short)];
  12844. ! #endif    not MTR
  12845.   
  12846.       int        lowoff;        /* low element in msgstats[] */
  12847.       int        hghoff;        /* hgh element in msgstats[] */
  12848.   
  12849.   #ifndef    MTR
  12850. !     short   msgstats[1];    /* msg status            */
  12851. ! #else    MTR
  12852. !     short  *msgbase;        /* msg base            */
  12853. !     short  *msgstats;        /* msg status            */
  12854. ! #endif    MTR
  12855.   #define EXISTS        0x0001    /*     exists            */
  12856.   #define DELETED        0x0002    /*     deleted            */
  12857.   #define SELECTED    0x0004    /*     selected for use        */
  12858. --- 79,102 ----
  12859.   #define    MODIFIED  0x10        /*     msh in-core folder modified */
  12860.   #define    FBITS    "\020\01READONLY\02SEQMOD\03MHPATH\04OTHERS\05MODIFIED"
  12861.   
  12862. ! /* Note well: msgstats[] is a int, so we have 16 or 32 bits to work
  12863.       with.  The first 5 are for standard MH message flags,
  12864. !     this leaves us 11 (or 27) for user-defined attributes.  Of
  12865. !     these, 1 is reserved for future internal use, so this leaves
  12866. !     users 10 (or 26).                    */
  12867. ! #define    NATTRS    ((sizeof(int)*Nbby)-6)         /*  see above    */
  12868.       char   *msgattrs[NATTRS + 1];/* folder attributes        */
  12869. !     int     attrstats;        /* public=0/private=1        */
  12870.   
  12871.       int        lowoff;        /* low element in msgstats[] */
  12872.       int        hghoff;        /* hgh element in msgstats[] */
  12873.   
  12874.   #ifndef    MTR
  12875. !     int     msgstats[1];    /* msg status            */
  12876. ! #else /* MTR */
  12877. !     int    *msgbase;        /* msg base            */
  12878. !     int    *msgstats;        /* msg status            */
  12879. ! #endif /* MTR */
  12880.   #define EXISTS        0x0001    /*     exists            */
  12881.   #define DELETED        0x0002    /*     deleted            */
  12882.   #define SELECTED    0x0004    /*     selected for use        */
  12883. ***************
  12884. *** 110,122 ****
  12885.   #define    MBITS    "\020\01EXISTS\02DELETED\03SELECTED\04NEW\05UNSEEN"
  12886.   
  12887.   #ifndef    MTR
  12888. ! #define    MSIZE(mp,lo,hi)    \
  12889.           ((unsigned) (sizeof *mp + ((hi) + 2) * sizeof *mp -> msgstats))
  12890. ! #else    MTR
  12891. ! #define    MSIZE(mp,lo,hi)    ((unsigned) sizeof *mp)
  12892. ! #define    MSIZEX(mp,lo,hi)    \
  12893.           ((unsigned) (((hi) - (lo) + 1) * sizeof *mp -> msgstats))
  12894. ! #endif    MTR
  12895.   };
  12896.   
  12897.   #define    NULLMP    ((struct msgs *) 0)
  12898. --- 108,120 ----
  12899.   #define    MBITS    "\020\01EXISTS\02DELETED\03SELECTED\04NEW\05UNSEEN"
  12900.   
  12901.   #ifndef    MTR
  12902. ! #define    MHSIZE(mp,lo,hi)    \
  12903.           ((unsigned) (sizeof *mp + ((hi) + 2) * sizeof *mp -> msgstats))
  12904. ! #else /* MTR */
  12905. ! #define    MHSIZE(mp,lo,hi)    ((unsigned) sizeof *mp)
  12906. ! #define    MHSIZEX(mp,lo,hi)    \
  12907.           ((unsigned) (((hi) - (lo) + 1) * sizeof *mp -> msgstats))
  12908. ! #endif /* MTR */
  12909.   };
  12910.   
  12911.   #define    NULLMP    ((struct msgs *) 0)
  12912. ***************
  12913. *** 158,168 ****
  12914.   
  12915.   #ifndef    LINK
  12916.   #define    LINK    "@"
  12917. ! #endif    not LINK
  12918.   
  12919.   #ifndef    SBACKUP
  12920.   #define    SBACKUP    ","
  12921. ! #endif    not SBACKUP
  12922.   
  12923.   
  12924.   #define OUTPUTLINELEN    72    /* default line length for headers */
  12925. --- 156,166 ----
  12926.   
  12927.   #ifndef    LINK
  12928.   #define    LINK    "@"
  12929. ! #endif /* not LINK */
  12930.   
  12931.   #ifndef    SBACKUP
  12932.   #define    SBACKUP    ","
  12933. ! #endif /* not SBACKUP */
  12934.   
  12935.   
  12936.   #define OUTPUTLINELEN    72    /* default line length for headers */
  12937. ***************
  12938. *** 187,192 ****
  12939. --- 185,191 ----
  12940.   extern char *fileproc;
  12941.   extern char *foldprot;
  12942.   extern char *forwcomps;
  12943. + extern char *inbox;
  12944.   extern char *incproc;
  12945.   extern char *installproc;
  12946.   extern char *lproc;
  12947. ***************
  12948. *** 230,236 ****
  12949.   #ifdef    OVERHEAD
  12950.   extern int  fd_def;
  12951.   extern int  fd_ctx;
  12952. ! #endif    OVERHEAD
  12953.   
  12954.   extern char *invo_name;        /* pgm invocation name */
  12955.   extern char *mypath;        /* user's $HOME */
  12956. --- 229,235 ----
  12957.   #ifdef    OVERHEAD
  12958.   extern int  fd_def;
  12959.   extern int  fd_ctx;
  12960. ! #endif /* OVERHEAD */
  12961.   
  12962.   extern char *invo_name;        /* pgm invocation name */
  12963.   extern char *mypath;        /* user's $HOME */
  12964. ***************
  12965. *** 284,289 ****
  12966. --- 283,289 ----
  12967.   char   *m_maildir ();
  12968.   char   *m_mailpath ();
  12969.   char   *m_name ();
  12970. + int    m_putenv ();
  12971.   void    m_readefs ();
  12972.   struct msgs *m_remsg ();
  12973.   void    m_replace ();
  12974. ***************
  12975. *** 310,316 ****
  12976.   int     pidstatus ();
  12977.   void    printsw ();
  12978.   void    push ();
  12979. - int    putenv ();
  12980.   char   *pwd ();
  12981.   char   *r1bindex ();
  12982.   int    refile ();
  12983. --- 310,315 ----
  12984. ***************
  12985. *** 331,352 ****
  12986.   
  12987.   #include "../h/strings.h"
  12988.   
  12989. - 
  12990.   /* should be in <stdio.h> */
  12991.   
  12992. ! #if    !defined(SYS5) && !defined(ncr)
  12993.   typedef struct _iobuf  *FP;
  12994.   FP   popen ();
  12995. ! #else    SYS5
  12996.   #define    FP    FILE*
  12997. ! #endif    SYS5
  12998.   
  12999.   
  13000.   /* miscellaneous */
  13001.   
  13002. ! #if !defined(BSD42) && !defined(hpux) && !defined(ncr)
  13003.   #define    rename(f1,f2)    (link (f1, f2) != NOTOK ? unlink (f1) : NOTOK)
  13004. ! #endif    not BSD42
  13005.   
  13006.   #define    setsig(s,f)    if (signal (s, SIG_IGN) != SIG_IGN) \
  13007.                   (void) signal (s, f)
  13008. --- 330,350 ----
  13009.   
  13010.   #include "../h/strings.h"
  13011.   
  13012.   /* should be in <stdio.h> */
  13013.   
  13014. ! #if    !defined(SYS5) && !defined(ncr) && !defined(_AIX) && !defined(OSF1) && !defined(__convex__)
  13015.   typedef struct _iobuf  *FP;
  13016.   FP   popen ();
  13017. ! #else /* SYS5 */
  13018.   #define    FP    FILE*
  13019. ! #endif /* SYS5 */
  13020.   
  13021.   
  13022.   /* miscellaneous */
  13023.   
  13024. ! #if !defined(BSD42) && !defined(hpux) && !defined(ncr) && !defined(_AIX) && !defined(RENAME)
  13025.   #define    rename(f1,f2)    (link (f1, f2) != NOTOK ? unlink (f1) : NOTOK)
  13026. ! #endif    /* not BSD42 */
  13027.   
  13028.   #define    setsig(s,f)    if (signal (s, SIG_IGN) != SIG_IGN) \
  13029.                   (void) signal (s, f)
  13030. ***************
  13031. *** 353,366 ****
  13032.   #define    setsigx(i,s,f)    if ((i = signal (s, SIG_IGN)) != SIG_IGN) \
  13033.                   (void) signal (s, f)
  13034.   
  13035. - #ifndef    TYPESIG
  13036. - #ifdef    SUN40
  13037. - #define    TYPESIG    void
  13038. - #else    /* use old V7 default */
  13039. - #define    TYPESIG    int
  13040. - #endif
  13041. - #endif    not TYPESIG
  13042. - 
  13043.   #if    defined(sun) && !defined(NFS)
  13044.   #define    NFS
  13045.   #endif
  13046. --- 351,356 ----
  13047. ***************
  13048. *** 367,370 ****
  13049. --- 357,365 ----
  13050.   
  13051.   #ifdef    NFS
  13052.   #define    ruserpass    _ruserpass
  13053. + #endif
  13054. + 
  13055. + #if (defined(BSD44) || defined(SUN40) || defined(hpux) \
  13056. +     || defined(_AIX) || defined (sgi)) && !defined(UNISTD)
  13057. + #define       UNISTD
  13058.   #endif
  13059. *** /dev/null    Tue Dec 15 08:01:10 1992
  13060. --- h/mhn.h    Tue Oct 20 09:32:28 1992
  13061. ***************
  13062. *** 0 ****
  13063. --- 1,69 ----
  13064. + /* mhn.h - definitions for mhn & friends */
  13065. + /* @(#)$Id: mhn.h,v 1.2 1992/10/16 17:13:19 jromine Exp $ */
  13066. + 
  13067. + #define    VRSN_FIELD    "MIME-Version"
  13068. + #define    VRSN_VALUE    "1.0"
  13069. + 
  13070. + #define    XXX_FIELD_PRF    "Content-"
  13071. + 
  13072. + #define    TYPE_FIELD    "Content-Type"
  13073. + 
  13074. + #define    ENCODING_FIELD    "Content-Transfer-Encoding"
  13075. + 
  13076. + #define    ID_FIELD    "Content-ID"
  13077. + 
  13078. + #define    DESCR_FIELD    "Content-Description"
  13079. + 
  13080. + 
  13081. + #define    isatom(c) \
  13082. +         (!isspace (c) \
  13083. +         && !iscntrl (c) \
  13084. +         && (c) != '(' \
  13085. +         && (c) != ')' \
  13086. +         && (c) != '<' \
  13087. +         && (c) != '>' \
  13088. +         && (c) != '@' \
  13089. +         && (c) != ',' \
  13090. +         && (c) != ';' \
  13091. +         && (c) != ':' \
  13092. +         && (c) != '\\' \
  13093. +         && (c) != '"' \
  13094. +         && (c) != '.' \
  13095. +         && (c) != '[' \
  13096. +         && (c) != ']')
  13097. + 
  13098. + #define    istoken(c) \
  13099. +         (!isspace (c) \
  13100. +         && !iscntrl (c) \
  13101. +         && (c) != '(' \
  13102. +         && (c) != ')' \
  13103. +         && (c) != '<' \
  13104. +         && (c) != '>' \
  13105. +         && (c) != '@' \
  13106. +         && (c) != ',' \
  13107. +         && (c) != ';' \
  13108. +         && (c) != ':' \
  13109. +         && (c) != '\\' \
  13110. +         && (c) != '"' \
  13111. +         && (c) != '/' \
  13112. +         && (c) != '[' \
  13113. +         && (c) != ']' \
  13114. +         && (c) != '?' \
  13115. +         && (c) != '=')
  13116. + 
  13117. + /* MTR: removed now, since likely to go away in the future
  13118. +         && (c) != '.' \
  13119. +  */
  13120. + 
  13121. + /*   */
  13122. + 
  13123. + #define    CPERLIN    76
  13124. + #define    BPERLIN    (CPERLIN / 4)
  13125. + #define    LPERMSG    632
  13126. + #define    CPERMSG    (LPERMSG * CPERLIN)
  13127. + 
  13128. + /*   */
  13129. + 
  13130. + #if    defined(BSD42) || defined(SOCKETS)
  13131. + #define    FTP
  13132. + #endif
  13133. *** ../mh-6.7.2/h/mshsbr.h    Thu Apr  5 16:04:17 1990
  13134. --- h/mshsbr.h    Tue May 12 15:04:02 1992
  13135. ***************
  13136. *** 1,5 ****
  13137.   /* mshsbr.h - definitions for msh */
  13138. ! /* @(#)$Id: mshsbr.h,v 1.3 90/04/05 15:06:34 sources Exp $ */
  13139.   
  13140.   struct Cmd {
  13141.       char    line[BUFSIZ];
  13142. --- 1,5 ----
  13143.   /* mshsbr.h - definitions for msh */
  13144. ! /* @(#)$Id: mshsbr.h,v 1.5 1992/05/12 22:04:01 jromine Exp $ */
  13145.   
  13146.   struct Cmd {
  13147.       char    line[BUFSIZ];
  13148. ***************
  13149. *** 29,39 ****
  13150.       
  13151.       struct tws  m_tb;
  13152.   
  13153.       short   m_stats;
  13154.   #define CUR (1 << (FFATTRSLOT + NATTRS))
  13155.   #ifdef    BPOP
  13156.   #define    VIRTUAL    SELECT_EMPTY
  13157. ! #endif    BPOP
  13158.   };
  13159.   
  13160.   /*   */
  13161. --- 29,43 ----
  13162.       
  13163.       struct tws  m_tb;
  13164.   
  13165. +     short   m_flags;
  13166. + #define    MHNCHK    0x0001    /* did nontext check */
  13167. + #define    MHNYES    0x0002    /*   .. and known to be non-text */
  13168. + 
  13169.       short   m_stats;
  13170.   #define CUR (1 << (FFATTRSLOT + NATTRS))
  13171.   #ifdef    BPOP
  13172.   #define    VIRTUAL    SELECT_EMPTY
  13173. ! #endif /* BPOP */
  13174.   };
  13175.   
  13176.   /*   */
  13177. ***************
  13178. *** 71,77 ****
  13179.   #ifdef    BSD42
  13180.   extern int  should_intr;    /* signal handler should interrupt call */
  13181.   extern jmp_buf sigenv;        /* the environment pointer */
  13182. ! #endif    BSD42
  13183.   
  13184.   
  13185.   long    lseek ();
  13186. --- 75,81 ----
  13187.   #ifdef    BSD42
  13188.   extern int  should_intr;    /* signal handler should interrupt call */
  13189.   extern jmp_buf sigenv;        /* the environment pointer */
  13190. ! #endif /* BSD42 */
  13191.   
  13192.   
  13193.   long    lseek ();
  13194. *** ../mh-6.7.2/h/rcvmail.h    Thu Oct 29 14:56:16 1987
  13195. --- h/rcvmail.h    Mon Dec 14 16:20:23 1992
  13196. ***************
  13197. *** 1,4 ****
  13198. --- 1,5 ----
  13199.   /* rcvmail.h - rcvmail hook definitions */
  13200. + /* @(#)$Id: rcvmail.h,v 1.3 1992/12/15 00:20:22 jromine Exp $ */
  13201.   
  13202.   #ifndef    MMDFMTS
  13203.   #include <ctype.h>
  13204. ***************
  13205. *** 7,25 ****
  13206.   #include <stdio.h>
  13207.   #include <sys/types.h>
  13208.   #include "../mts/sendmail/smail.h"
  13209. ! #else    MMDFMTS
  13210.   #include "../mts/mmdf/util.h"
  13211.   #include "../mts/mmdf/mmdf.h"
  13212. ! #endif    MMDFMTS
  13213.   
  13214.   
  13215.   #ifndef    MMDFI
  13216.   #define    RCV_MOK    0
  13217.   #define    RCV_MBX    1
  13218. ! #else    MMDFI
  13219.   #define    RCV_MOK    RP_MOK
  13220.   #define    RCV_MBX    RP_MECH
  13221. ! #endif    MMDFI
  13222.   
  13223.   
  13224.   #ifdef    NRTC            /* sigh */
  13225. --- 8,26 ----
  13226.   #include <stdio.h>
  13227.   #include <sys/types.h>
  13228.   #include "../mts/sendmail/smail.h"
  13229. ! #else    /* MMDFMTS */
  13230.   #include "../mts/mmdf/util.h"
  13231.   #include "../mts/mmdf/mmdf.h"
  13232. ! #endif    /* MMDFMTS */
  13233.   
  13234.   
  13235.   #ifndef    MMDFI
  13236.   #define    RCV_MOK    0
  13237.   #define    RCV_MBX    1
  13238. ! #else    /* MMDFI */
  13239.   #define    RCV_MOK    RP_MOK
  13240.   #define    RCV_MBX    RP_MECH
  13241. ! #endif    /* MMDFI */
  13242.   
  13243.   
  13244.   #ifdef    NRTC            /* sigh */
  13245. ***************
  13246. *** 28,31 ****
  13247.   
  13248.   #define    RCV_MOK    RP_MOK
  13249.   #define    RCV_MBX    RP_MECH
  13250. ! #endif    NRTC
  13251. --- 29,32 ----
  13252.   
  13253.   #define    RCV_MOK    RP_MOK
  13254.   #define    RCV_MBX    RP_MECH
  13255. ! #endif    /* NRTC */
  13256. *** ../mh-6.7.2/h/scansbr.h    Mon Dec  2 12:45:58 1991
  13257. --- h/scansbr.h    Tue Nov 10 09:27:14 1992
  13258. ***************
  13259. *** 1,5 ****
  13260.   /* scansbr.h - definitions for scan () */
  13261. ! /* $Header: /i1/db3/src/bs/mh-develop/mh-6.7-new/h/RCS/scansbr.h,v 1.2 1991/12/02 20:45:51 jromine Exp $ */
  13262.   
  13263.   extern char *scanl;
  13264.   
  13265. --- 1,5 ----
  13266.   /* scansbr.h - definitions for scan () */
  13267. ! /* $Id: scansbr.h,v 1.7 1992/11/10 17:27:11 jromine Exp $ */
  13268.   
  13269.   extern char *scanl;
  13270.   
  13271. ***************
  13272. *** 8,28 ****
  13273.   #define    SCNEOF    0        /* empty message */
  13274.   #define    SCNERR    (-1)        /* error message */
  13275.   #define    SCNNUM    (-2)        /* number out of range */
  13276.   
  13277.   
  13278.   #ifndef    UK
  13279.   #define    FORMAT    \
  13280. ! "%4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%| %>%>\
  13281.   %02(mon{date})/%02(mday{date})%<{date} %|*%>\
  13282. ! %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  13283.   %{subject}%<{body}<<%{body}>>%>\n"
  13284. ! #else UK
  13285.   #define    FORMAT    \
  13286. ! "%4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%| %>%>\
  13287.   %02(mday{date})/%02(mon{date})%<{date} %|*%>\
  13288. ! %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  13289.   %{subject}%<{body}<<%{body}>>%>\n"
  13290. ! #endif    UK
  13291.   
  13292.   #define    WIDTH    78
  13293.   
  13294. --- 8,29 ----
  13295.   #define    SCNEOF    0        /* empty message */
  13296.   #define    SCNERR    (-1)        /* error message */
  13297.   #define    SCNNUM    (-2)        /* number out of range */
  13298. + #define    SCNFAT    (-3)        /* fatal error */
  13299.   
  13300.   
  13301.   #ifndef    UK
  13302.   #define    FORMAT    \
  13303. ! "%4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  13304.   %02(mon{date})/%02(mday{date})%<{date} %|*%>\
  13305. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  13306.   %{subject}%<{body}<<%{body}>>%>\n"
  13307. ! #else /* UK */
  13308.   #define    FORMAT    \
  13309. ! "%4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  13310.   %02(mday{date})/%02(mon{date})%<{date} %|*%>\
  13311. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  13312.   %{subject}%<{body}<<%{body}>>%>\n"
  13313. ! #endif /* UK */
  13314.   
  13315.   #define    WIDTH    78
  13316.   
  13317. *** ../mh-6.7.2/h/strings.h    Thu Jan 23 15:16:49 1992
  13318. --- h/strings.h    Thu Nov 12 11:34:32 1992
  13319. ***************
  13320. *** 1,14 ****
  13321.   /* strings.h - define standard string functions */
  13322. ! /* @(#)$Id: strings.h,v 1.8 1992/01/23 23:16:46 jromine Exp $ */
  13323.   
  13324.   #ifndef    _STRINGS        /* once-only... */
  13325.   #define    _STRINGS
  13326.   
  13327.   #ifdef    SYS5
  13328.   #define    index    strchr
  13329.   #define    rindex    strrchr
  13330. ! #endif    SYS5
  13331.   
  13332.   char   *index ();
  13333.   char   *mktemp ();
  13334.   char   *rindex ();
  13335. --- 1,37 ----
  13336.   /* strings.h - define standard string functions */
  13337. ! /* @(#)$Id: strings.h,v 1.18 1992/11/12 19:34:05 jromine Exp $ */
  13338.   
  13339.   #ifndef    _STRINGS        /* once-only... */
  13340.   #define    _STRINGS
  13341.   
  13342. + #ifdef AUX
  13343. + #include <stdlib.h>
  13344. + #endif
  13345. + 
  13346. + #ifdef _AIX
  13347. + #include <string.h>
  13348. + #include <stdlib.h>
  13349. + 
  13350. + #define bcmp(b1,b2,length)    memcmp(b1, b2, length)
  13351. + #define    bcopy(b1,b2,length)    (void) memcpy (b2, b1, length)
  13352. + #define    bcpy(b1,b2,length)    memcmp (b1, b2, length)
  13353. + #define    bzero(b,length)        (void) memset (b, 0, length)
  13354. + 
  13355. + #else /* _AIX */
  13356. + 
  13357.   #ifdef    SYS5
  13358.   #define    index    strchr
  13359.   #define    rindex    strrchr
  13360. ! #endif /* SYS5 */
  13361.   
  13362. + #if    defined(BSD42) || defined(SVR4)
  13363. + #ifndef    SVR4
  13364. + #include <strings.h>
  13365. + #else
  13366. + #include <string.h>
  13367. + #include <stdlib.h>
  13368. + #endif
  13369. + #else    /* not BSD42 || SVR4 */
  13370.   char   *index ();
  13371.   char   *mktemp ();
  13372.   char   *rindex ();
  13373. ***************
  13374. *** 26,35 ****
  13375. --- 49,65 ----
  13376.   char   *strncat ();
  13377.   int     strncmp ();
  13378.   char   *strncpy ();
  13379. + #endif
  13380.   
  13381. + #ifndef    SVR4
  13382.   char   *getenv ();
  13383.   char   *calloc (), *malloc (), *realloc ();
  13384. + #endif    /* SVR4 */
  13385.   
  13386. + #if defined(__HIGHC__) || __GNUC__ == 2
  13387. + #define    bcopy(s,d,l)    memcpy(d,s,l)
  13388. + #endif
  13389. + 
  13390.   #ifdef    SYS5
  13391.   #include <memory.h>
  13392.   #define bcmp(b1,b2,length)    memcmp(b1, b2, length)
  13393. ***************
  13394. *** 36,41 ****
  13395.   #define    bcopy(b1,b2,length)    (void) memcpy (b2, b1, length)
  13396.   #define    bcpy(b1,b2,length)    memcmp (b1, b2, length)
  13397.   #define    bzero(b,length)        (void) memset (b, 0, length)
  13398. ! #endif    SYS5
  13399. ! 
  13400. ! #endif    not _STRINGS
  13401. --- 66,71 ----
  13402.   #define    bcopy(b1,b2,length)    (void) memcpy (b2, b1, length)
  13403.   #define    bcpy(b1,b2,length)    memcmp (b1, b2, length)
  13404.   #define    bzero(b,length)        (void) memset (b, 0, length)
  13405. ! #endif /* SYS5 */
  13406. ! #endif    /* _AIX */
  13407. ! #endif /* not _STRINGS */
  13408. *** ../mh-6.7.2/miscellany/README    Fri Apr  6 11:24:13 1990
  13409. --- miscellany/README    Thu Dec  3 14:59:31 1992
  13410. ***************
  13411. *** 1,4 ****
  13412. ! miscellany/README $Revision: 1.3 $ $Date: 90/04/06 11:24:12 $
  13413.   
  13414. ! This directory contains some useful things for MH users and installers.
  13415.   
  13416. --- 1,5 ----
  13417. ! $Id: README,v 1.8 1992/11/20 17:05:30 jromine Exp $
  13418.   
  13419. ! The "miscellany/" directory contains some useful things for MH
  13420. ! users and installers.
  13421.   
  13422. ***************
  13423. *** 7,10 ****
  13424.   compress-4.0    MH Patches are sent out compressed.
  13425. ! less-5.0    "less is more" - a more/pg-like pager (v5)
  13426. ! patch-2.0.12    The famous patch program.  MH updates are sent as patches.
  13427.   
  13428. --- 8,11 ----
  13429.   compress-4.0    MH Patches are sent out compressed.
  13430. ! less-177    "less is more" - a more/pg-like pager (ver. 177)
  13431. ! patch-2.0.12u8    The famous patch program.  MH updates are sent as patches.
  13432.   
  13433. ***************
  13434. *** 12,13 ****
  13435. --- 13,15 ----
  13436.   
  13437. + audit        A perl package to parse and process messages 
  13438.   convert        Utilities for converting to/from other mailbox formats.
  13439. ***************
  13440. *** 14,22 ****
  13441.   libndir        The new directory routines for sites that don't have them.
  13442. ! mem        A reminder system.
  13443. ! mh-e        Brian Reid's MHE system
  13444. ! mhe        GNU Emacs interface to MH
  13445.   mtrenv        Some of Marshall T. Rose's MH environment
  13446.   netnews        Making netnews directories MH folders under 4BSD
  13447. ! rcvtrip        A script mhook.
  13448.   scripts        Some useful scripts
  13449.   sortf        Sort a folder by arbitrary fields (for MH6.6)
  13450. --- 16,28 ----
  13451.   libndir        The new directory routines for sites that don't have them.
  13452. ! mem        A reminder system using an appointment folder.
  13453. ! mh-e        GNU Emacs interface to MH (probably not the newest version)
  13454. ! mhe        Brian Reid's MHE system
  13455.   mtrenv        Some of Marshall T. Rose's MH environment
  13456. + multi-media    Multi-media mail as specified by RFC 1341 (MIME)
  13457.   netnews        Making netnews directories MH folders under 4BSD
  13458. ! rcvtrip        A script mhook which will annoy all posters of
  13459. !         mailing lists the user might be on.
  13460.   scripts        Some useful scripts
  13461. + sendmail    A replacement local mailer which uses the MMDF
  13462. +         maildrop format
  13463.   sortf        Sort a folder by arbitrary fields (for MH6.6)
  13464. *** /dev/null    Tue Dec 15 08:01:10 1992
  13465. --- miscellany/multi-media/READ-ME    Mon Oct 26 08:57:54 1992
  13466. ***************
  13467. *** 0 ****
  13468. --- 1,257 ----
  13469. + $Id: READ-ME,v 1.3 1992/10/26 16:57:51 jromine Exp $
  13470. + 
  13471. + [ READ-ME - Wed Oct 21 15:35:57 1992 - multi-media MH for MH 6.7 - /mtr ]
  13472. + 
  13473. + 
  13474. +                    NOTICE
  13475. + 
  13476. +      This package is openly available but is NOT in the public domain.
  13477. +      You are allowed and encouraged to take this software and use it for
  13478. +      any lawful purpose.  However, as a condition of use, you are required
  13479. +      to "hold harmless" all contributors.
  13480. + 
  13481. +      Permission to use, copy, modify, and distribute this software and
  13482. +      its documentation for any purpose and without fee is hereby
  13483. +      granted, provided that this notice be retained unaltered,  and that
  13484. +      the name of any contributors shall not be used in advertising or
  13485. +      publicity pertaining to distribution of the software without
  13486. +      specific written prior permission.   No contributor makes any
  13487. +      representations about the suitability of this software for any
  13488. +      purpose.  It is provided "as is" without express or implied
  13489. +      warranty.
  13490. + 
  13491. +     ALL CONTRIBUTORS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  13492. +     SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
  13493. +     AND FITNESS FOR THE PARTICULAR PURPOSE, TITLE, AND
  13494. +     NON-INFRINGEMENT.
  13495. + 
  13496. +     IN NO EVENT SHALL ANY CONTRIBUTOR BE LIABLE FOR ANY SPECIAL,
  13497. +     INDIRECT OR CONSEQUENTIAL DAMAGES, WHETHER IN CONTRACT, TORT, OR
  13498. +     OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH, THE
  13499. +     USE OR PERFORMANCE OF THIS SOFTWARE.
  13500. + 
  13501. + 
  13502. +      Following are sources of software for manipulating various MIME content
  13503. +      types.  The script support/general/bootmhn.sh (which is run when
  13504. +      you do "make inst-all") will look for these programs and create the
  13505. +      global mhn_defaults file accordingly.  Since this script will
  13506. +      look for the programs detailed below, you should do all of the
  13507. +      installation here prior to running "make inst-all".  Also, the
  13508. +      programs should be installed in either the MH library area
  13509. +      (e.g., /usr/local/lib/mh/) or in your $PATH.
  13510. + 
  13511. + 
  13512. +                 text/richtext
  13513. + 
  13514. +      There are two programs for rendering text/richtext, rt2raw and
  13515. +      richtext. 
  13516. + 
  13517. +      1. r2raw - a really dumb richtext interpreter
  13518. + 
  13519. +      This is found in the MH distribution:
  13520. + 
  13521. +     % cd miscellany/multi-media/misc/
  13522. +     % cc -o rt2raw rt2raw.c
  13523. + 
  13524. +      and then copy rt2raw to your MH library area.
  13525. + 
  13526. + 
  13527. +      2. richtext - a termcap-based interpreter
  13528. + 
  13529. +      This is found in the MetaMail distribution:    
  13530. + 
  13531. +     host    thumper.bellcore.com
  13532. +     dir    pub/nsb/
  13533. +     file    mm.tar.Z
  13534. +     mode    binary
  13535. + 
  13536. +      Now run these commands
  13537. + 
  13538. +     % mkdir mm
  13539. +     % cd mm
  13540. +     % uncompress < ../mm.tar.Z | tar xvpf -
  13541. +     % cd richmail
  13542. +     % make richtext
  13543. + 
  13544. +      and then copy richtext to your MH library area.
  13545. + 
  13546. + 
  13547. +                     image
  13548. + 
  13549. +      There are several programs available for rending images: xv, pbmplus,
  13550. +      and jpeg.  To use any of these, you need to be running under the
  13551. +      X window system.  When bootmhn.sh runs, it will generate commands
  13552. +      for a monochrome monitor.  If you're running on a greyscale or
  13553. +      color monitor, you should change the commands accordingly.
  13554. + 
  13555. +      1. xv version 2.11
  13556. + 
  13557. +      There may be a more recent version by the time you read this file:
  13558. + 
  13559. +     host    ftp.cis.upenn.edu
  13560. +     dir    pub/
  13561. +     file    xv-2.11.tar.Z
  13562. +     mode    binary
  13563. + 
  13564. +      Read the installation instructions and install the xv binary
  13565. +      somewhere in your $PATH.
  13566. + 
  13567. +      2. pbmplus
  13568. + 
  13569. +      There may be a more recent version by the time you read this file:
  13570. + 
  13571. +     host    ftp.uu.net
  13572. +     dir    pub/window-sys/X/contrib
  13573. +     file    pbmplus10dec91.tar.Z
  13574. +     mode    binary
  13575. + 
  13576. +      3. JPEG
  13577. + 
  13578. +      There may be a more recent version by the time you read this file:
  13579. + 
  13580. +     host    ftp.uu.net
  13581. +     dir    graphics/jpeg/
  13582. +     file    jpegsrc.v3.tar.Z
  13583. +     mode    binary
  13584. + 
  13585. +      Read the installation instructions and install the djpeg binary
  13586. +      somewhere in your $PATH.
  13587. + 
  13588. + 
  13589. +                     audio
  13590. + 
  13591. +      This is platform dependent.  At present, only detailed information
  13592. +      for the SPARC and the HP 9000/710 is presented.
  13593. + 
  13594. +      1. SPARC
  13595. + 
  13596. +      The SPARC has a telephone-quality audio-chip and an internal
  13597. +      speaker.  If you want to record audio, you'll need to buy a
  13598. +      microphone.  For reasons not worth going into, most mic's don't
  13599. +      have enough gain, and you have to put the thing right next to your
  13600. +      lips.  However, Isaac Salzman of SMI suggests, and I concur, that
  13601. +      the best mic to get is SONY's ECM-K7.  This costs about US$50, but
  13602. +      is well worth it: you can put the mic on your desk and it will
  13603. +      still pick up your voice.
  13604. + 
  13605. +      The "native" encoding for the audio-chip is 8-bit u-law sampled at
  13606. +      8000/second .  Prior to SunOS 4.1, audio files contained simply the
  13607. +      encoded audio.  However, in SunOS 4.1 or later, SMI introduced a
  13608. +      file format containing a header followed by the encoded audio.  For
  13609. +      now, we'll use the content type audio/basic to refer to the raw
  13610. +      audio, and the content type audio/x-next to refer to the file
  13611. +      format (NeXT developed the file format and SMI supports a subset of
  13612. +      it).  When dealing audio/basic, you simply cat to/from /dev/audio.
  13613. +      When dealing with audio/x-next, you can use the play and record
  13614. +      programs found in the /usr/demo/SOUND/ directory.
  13615. + 
  13616. +      In addition, in OpenWindows 3.0 or later, SMI added support for a
  13617. +      compressed u-law encoding based on the CCITT G.721 ADPCM algorithm.
  13618. +      Before audio encoded in this fashion can be heard, it must be
  13619. +      converted back to 8-bit u-law.  Conversions to and from the two
  13620. +      encodings can be done with the adpcm_enc and adpcm_dec programs
  13621. +      found in the $OPENWINHOME/bin/xview/ directory.
  13622. + 
  13623. +      If you are running something earlier than SunOS 4.1, I suggest that
  13624. +      you immediately get a copy of the raw2audio, play, and record
  13625. +      programs, so you can generate audio files.  The source is avilable
  13626. +      in the SunOS 4.1 Demos installation.  If you can't find these
  13627. +      programs, then when bootmhn.sh runs, it will just cat directly
  13628. +      to/from /dev/audio.
  13629. + 
  13630. +      If you do have the raw2audio, play, and record programs (regardless
  13631. +      of the version of SunOS you're running), then apply some patches:
  13632. + 
  13633. +     % (cd /usr/demo/SOUND; patch) < miscellany/multi-media/SPARC/SOUND.diff
  13634. +     % cd /usr/demo/SOUND
  13635. +     % make raw2audio
  13636. + 
  13637. +      Be sure to put /usr/demo/SOUND in your $PATH so that bootmhn.sh can
  13638. +      find the programs there.  (Alternately, you could copy these
  13639. +      programs to another directory which is in your $PATH.)
  13640. + 
  13641. +      You might also consider running /usr/demo/SOUND/x_gaintool, so you
  13642. +      can fiddle with the volume controls whenever you like.
  13643. + 
  13644. +      2. HP 9000/710
  13645. + 
  13646. +      The HP-Apollo 9000/710 workstation has a telephone-quality audio
  13647. +      chip and an internal speaker.  If you want to record audio, you'll
  13648. +      need to buy a microphone.  As with the SPARC, just about any
  13649. +      microphone with a standard mini jack will do.  Comments in the
  13650. +      preceding section that apply to selections of a microphone for the
  13651. +      SPARC probably also apply here. 
  13652. + 
  13653. +      The audio programs that may be used with mhn -- player, splayer,
  13654. +      recorder, and srecorder -- are provided by HP in source form in the
  13655. +      directory /usr/audio/examples/.  The README file in that directory
  13656. +      documents the various audio utility programs for recording and
  13657. +      playing sounds.  Be sure to put /usr/audio/examples in your $PATH
  13658. +      so that bootmhn.sh can find the programs there.  (Alternately, you
  13659. +      could copy these programs to another directory which is in your
  13660. +      $PATH.)
  13661. + 
  13662. +      Before any of the aforementioned programs can be used, the audio
  13663. +      device files must be created by running
  13664. +      /usr/audio/bin/make_audio_dev, and two daemons must be started:
  13665. +      /usr/etc/ncs/llbd and /usr/audio/bin/Aserver.  Refer to Audio(5)
  13666. +      for detailed, step by step instructions on how to do these things.
  13667. +      Alternatively, refer to the HP publication "Audio Users Guide"
  13668. +      (HP order number A1991-90609, November 1991 version).
  13669. + 
  13670. +      The audio devices support several "native" encodings that vary as
  13671. +      to which of the audio device files is used: one of
  13672. +      /dev/audio[BEI][ALU], where E=external jack, I=internal speaker,
  13673. +      B=both; A=8-bit ALaw, L=16-bit linear, U=8-bit MuLaw.  It is
  13674. +      possible to "cat" a raw audio data file of the appropriate type to
  13675. +      or from one of these devices. For example, a SPARC .au file may be
  13676. +      played by running this command:
  13677. + 
  13678. +         cat bark.au >/dev/audioIU
  13679. + 
  13680. +      (You must create the audio device files before you can cat anything
  13681. +      to them; again, refer to Audio(5) for information on how to do this.)
  13682. + 
  13683. +      There is, as of HP-UX 8.07, no supplied tool a la the SPARC's raw2audio
  13684. +      to add headers to audio data files that describe the audio data
  13685. +      encodings.  Rather than looking for headers in the sound data, the
  13686. +      audio tools rely on user-supplied information, such as file
  13687. +      extensions or command line options, to inform the tools about the
  13688. +      types and sampling rates of the audio data.
  13689. + 
  13690. +      Audio file names have the form 
  13691. + 
  13692. +         <file name>[["."<sample rate>]"."<type>]
  13693. + 
  13694. +     where
  13695. + 
  13696. +         <sample rate> ::= 1#DIGIT"000"/ 1#DIGIT"k"
  13697. +         <type> ::= "u" / "al" / "au" / "wav" / "snd" / "l8" / 
  13698. +                         "lo8" / "l16"
  13699. + 
  13700. +     Mulaw                           u
  13701. +     Alaw                            al
  13702. +     Sun                             au
  13703. +     Microsoft RIFF Waveform         wav
  13704. +     Macintosh                       snd
  13705. +     Linear8                         l8
  13706. +     Linear8Offset                   lo8
  13707. +     Linear16                        l16
  13708. + 
  13709. +     Examples: 
  13710. + 
  13711. +         bark.au
  13712. +         bark.8000.au
  13713. +         bark.8k.au
  13714. + 
  13715. +      As with the SPARC, the default sample rate is 8000 Hz.
  13716. + 
  13717. +      The /usr/audio/bin/audio_demo program may be used to convert
  13718. +      manually among different sound types, as well as to play, to
  13719. +      record, and to edit the sounds.  Unfortunately, the audio_demo
  13720. +      program does not accept command line arguments, so it is not quite
  13721. +      as suitable for invocation from mhn as are the player and recorder
  13722. +      programs.
  13723. + 
  13724. +      You might also consider running /usr/audio/examples/acontrol, so you
  13725. +      can fiddle with the volume controls whenever you like.
  13726. *** /dev/null    Tue Dec 15 08:01:10 1992
  13727. --- miscellany/multi-media/SPARC/SOUND.diff    Fri Feb 21 16:10:47 1992
  13728. ***************
  13729. *** 0 ****
  13730. --- 1,99 ----
  13731. + *** :raw2audio.c    Thu Oct 11 13:12:39 1990
  13732. + --- raw2audio.c    Fri Nov  1 17:20:00 1991
  13733. + ***************
  13734. + *** 23,29 ****
  13735. +   /* Local variables */
  13736. +   char *prog;
  13737. +   char prog_desc[] = "Convert raw data to audio file format";
  13738. + ! char prog_opts[] = "o:s:p:e:c:i:f?";    /* getopt() flags */
  13739. +   
  13740. +   char        *Stdin = "stdin";
  13741. +   char        *Stdout = "stdout";
  13742. + --- 23,29 ----
  13743. +   /* Local variables */
  13744. +   char *prog;
  13745. +   char prog_desc[] = "Convert raw data to audio file format";
  13746. + ! char prog_opts[] = "o:s:p:e:c:i:fF?";    /* getopt() flags */
  13747. +   
  13748. +   char        *Stdin = "stdin";
  13749. +   char        *Stdout = "stdout";
  13750. + ***************
  13751. + *** 34,39 ****
  13752. + --- 34,40 ----
  13753. +   char        *Info = NULL;        /* pointer to info data */
  13754. +   unsigned    Ilen = 0;        /* length of info data */
  13755. +   int        Force = 0;        /* rewrite file header, if present */
  13756. + + int        Strip = 0;        /* strip header */
  13757. +   unsigned    Offset = 0;        /* byte offset into raw data */
  13758. +   Audio_hdr    Hdr;            /* audio header structure */
  13759. +   char        *ofile;            /* output temporary file name */
  13760. + ***************
  13761. + *** 139,144 ****
  13762. + --- 140,148 ----
  13763. +           Info = optarg;        /* set information string */
  13764. +           Ilen = strlen(Info);
  13765. +           break;
  13766. + +     case 'F':
  13767. + +         Strip++;        /* strip header */
  13768. + +         /* and fall... */
  13769. +       case 'f':
  13770. +           Force++;        /* force header rewrite */
  13771. +           break;
  13772. + ***************
  13773. + *** 161,166 ****
  13774. + --- 165,174 ----
  13775. +               if (Hdr.bytes_per_unit < 4)
  13776. +                   err++;
  13777. +               break;
  13778. + +         case AUDIO_ENCODING_ADPCM:
  13779. + +             if (Hdr.bytes_per_unit != 1)
  13780. + +                 err++;
  13781. + +             break;
  13782. +           }
  13783. +           if (err > 0) {
  13784. +               Error(stderr, "%s: encoding/precision mismatch\n",
  13785. + ***************
  13786. + *** 317,322 ****
  13787. + --- 325,331 ----
  13788. +           /* Write the audio file header first. */
  13789. +           if (Hdr.data_size != AUDIO_UNKNOWN_SIZE)
  13790. +               Hdr.data_size -= Offset;
  13791. + +         if (Strip) goto copydata;
  13792. +           err = audio_write_filehdr(ofd, &Hdr, Info, Ilen);
  13793. +           if (err != AUDIO_SUCCESS)
  13794. +               goto writeerror;
  13795. + ***************
  13796. + *** 435,443 ****
  13797. +           *dst = AUDIO_ENCODING_LINEAR;
  13798. +       else if (strncmp(str, "FLOAT", i) == 0)
  13799. +           *dst = AUDIO_ENCODING_FLOAT;
  13800. +       else {
  13801. +           Error(stderr,
  13802. + !             "%s: encoding must be one of: ULAW, LINEAR, FLOAT\n", prog);
  13803. +           return (1);
  13804. +       }
  13805. +       return (0);
  13806. + --- 444,454 ----
  13807. +           *dst = AUDIO_ENCODING_LINEAR;
  13808. +       else if (strncmp(str, "FLOAT", i) == 0)
  13809. +           *dst = AUDIO_ENCODING_FLOAT;
  13810. + +     else if (strncmp(str, "ADPCM", i) == 0)
  13811. + +         *dst = AUDIO_ENCODING_ADPCM;
  13812. +       else {
  13813. +           Error(stderr,
  13814. + !             "%s: encoding must be one of: ULAW, LINEAR, FLOAT, ADPCM\n", prog);
  13815. +           return (1);
  13816. +       }
  13817. +       return (0);
  13818. + *** multimedia/:audio_hdr.h    Thu Oct 11 13:12:45 1990
  13819. + --- multimedia/audio_hdr.h    Fri Nov  1 09:47:12 1991
  13820. + ***************
  13821. + *** 72,77 ****
  13822. + --- 72,78 ----
  13823. +   #define    AUDIO_ENCODING_ALAW    (2)    /* ISDN A-law */
  13824. +   #define    AUDIO_ENCODING_LINEAR    (3)    /* PCM 2's-complement (0-center) */
  13825. +   #define    AUDIO_ENCODING_FLOAT    (4)    /* IEEE float (-1. <-> +1.) */
  13826. + + #define    AUDIO_ENCODING_ADPCM    (23)    /* CCITT G.721*/
  13827. +   
  13828. +   
  13829. +   /* Value used for indeterminate size (e.g., data passed through a pipe) */
  13830. *** /dev/null    Tue Dec 15 08:01:10 1992
  13831. --- miscellany/multi-media/misc/rt2raw.c    Fri Feb 21 16:10:49 1992
  13832. ***************
  13833. *** 0 ****
  13834. --- 1,55 ----
  13835. + /* taken straight from the MIME specification, to use with multi-media MH, do:
  13836. + 
  13837. +     mhn-show-text/richtext: rt2raw < %f | fmt -78 | more
  13838. + 
  13839. +    in your .mhn_profile.
  13840. + 
  13841. +    Note that MTR doesn't use this program.  He uses NB's richtext program
  13842. +    instead (the one that comes with MetaMail).  See RICHTEXT.setup for the
  13843. +    details.
  13844. +  */
  13845. + 
  13846. + #include <stdio.h>
  13847. + #include <ctype.h>
  13848. + main() {
  13849. +     int c, i;
  13850. +     char token[50];
  13851. + 
  13852. +     while((c = getc(stdin)) != EOF) {
  13853. +         if (c == '<') {
  13854. +             for (i=0; (c = getc(stdin)) != '>'
  13855. +                       && c != EOF; ++i) {
  13856. +                 token[i] = isupper(c) ? tolower(c) : c;
  13857. +             }
  13858. +             if (c == EOF) break;
  13859. +             token[i] = NULL;
  13860. +             if (!strcmp(token, "lt")) {
  13861. +                 putc('<', stdout);
  13862. +             } else if (!strcmp(token, "nl")) {
  13863. +                 putc('\n', stdout);
  13864. +             } else if (!strcmp(token, "/paragraph")) {
  13865. +                 puts("\n\n", stdout);
  13866. +             } else if (!strcmp(token, "comment")) {
  13867. +                 int commct=1;
  13868. +                 while (commct > 0) {
  13869. +                     while ((c = getc(stdin)) != '<'
  13870. +                      && c != EOF) ;
  13871. +                     if (c == EOF) break;
  13872. +                     for (i=0; (c = getc(stdin)) != '>'
  13873. +                        && c != EOF; ++i) {
  13874. +                         token[i] = isupper(c) ?
  13875. +                          tolower(c) : c;
  13876. +                     }
  13877. +                     if (c== EOF) break;
  13878. +                     token[i] = NULL;
  13879. +                     if (!strcmp(token, "/comment")) --commct;
  13880. +                     if (!strcmp(token, "comment"))  ++commct;
  13881. +                 }
  13882. +             } /* Ignore all other tokens */
  13883. +         } else if (c != '\n') {
  13884. +             putc(c, stdout);
  13885. +         }
  13886. +     }
  13887. +     putc('\n', stdout); /* for good measure */
  13888. +     exit(0);
  13889. + }
  13890. *** /dev/null    Tue Dec 15 08:01:10 1992
  13891. --- miscellany/multi-media/misc/showtimes.sh    Mon Apr 27 14:39:57 1992
  13892. ***************
  13893. *** 0 ****
  13894. --- 1,94 ----
  13895. + : run this script through /bin/sh
  13896. + 
  13897. + C=/tmp/st$$.ctx L=/tmp/st$$.lst P=/tmp/st$$.prf
  13898. + 
  13899. + trap "rm -f $C $L $P" 0 1 2 3 13 15
  13900. + 
  13901. + echo "MH-Sequences:" > $P
  13902. + cat ${MH-$HOME/.mh_profile} >> $P
  13903. + MH="$P" export MH
  13904. + cp ${MHCONTEXT-`mhpath +`/context} $C
  13905. + MHCONTEXT="$C" export MHCONTEXT
  13906. + 
  13907. + F= M= N=
  13908. + for A in $*
  13909. + do
  13910. +     case "$A" in
  13911. +     -file)    if [ ! -z "$F" -o ! -z "$M" ]; then
  13912. +             echo "st: do not mix files and messages" 1>&2
  13913. +             exit 1
  13914. +         fi
  13915. +         F="-file" N="file "
  13916. +         ;;
  13917. + 
  13918. +     +*|@*)    if [ ! -z "$F" ]; then
  13919. +             echo "st: only one folder at a time" 1>&2
  13920. +             exit 1
  13921. +         fi
  13922. +         F="$A" N="$F:"
  13923. +         ;;
  13924. + 
  13925. +     *)    if [ ! -z "$M" ]; then
  13926. +             echo "st: only one message at a time" 1>&2
  13927. +             exit 1
  13928. +         fi
  13929. +         M="$A"
  13930. +         ;;
  13931. +     esac
  13932. + done
  13933. + 
  13934. + if mhn -list $F $M > $L; then
  13935. +     if [ -z "$F" ]; then
  13936. +     N="+`folder -fast`:"
  13937. +     fi
  13938. +     if [ -z "$M" ]; then
  13939. +     M="`mhpath cur`"
  13940. +     M="`basename $M`"
  13941. +     fi
  13942. + else
  13943. +     exit 1;
  13944. + fi
  13945. + 
  13946. + cat $L
  13947. + 
  13948. + X=0 Y=0
  13949. + Z=`xdpyinfo | fgrep 'dimensions:'| awk '{ print $2; }'`
  13950. + XX="`echo $Z | sed -e 's%\(.*\)x.*%\1%'`"
  13951. + YY="`echo $Z | sed -e 's%.*x\(.*\)%\1%'`"
  13952. + XX="`expr \( $XX \* 5 \) / 12`"
  13953. + YY="`expr \( $YY \* 2 \) / 3`"
  13954. + 
  13955. + echo -n "st> "
  13956. + while read A; do
  13957. +     case "$A" in
  13958. +     [123456789]*|0)
  13959. +         O="`fgrep \ $A\  $L | sed -e 's%..........................................\(.*\)%\1%'`"
  13960. +         if [ -z "$O" ]; then
  13961. +             echo "no such part number"
  13962. +         else
  13963. +             xterm -geometry =80x20+$X+$Y \
  13964. +             -title "$O (part $A of $N$M)" -e \
  13965. +             mhn -nolist -show -part "$A" $F $M &
  13966. + 
  13967. +             X=`expr $X + 90` Y=`expr $Y + 60`
  13968. +             if [ $X -gt $XX ]; then
  13969. +                 X=0
  13970. +             fi
  13971. +             if [ $Y -gt $YY ]; then
  13972. +                 Y=0
  13973. +             fi
  13974. +         fi
  13975. +         ;;
  13976. + 
  13977. +     list|"")
  13978. +         cat $L
  13979. +         ;;
  13980. + 
  13981. +     *)    echo "enter part number to display"
  13982. +         ;;
  13983. +     esac
  13984. +     echo -n "st> "
  13985. + done
  13986. + echo ""
  13987. + 
  13988. + exit 0
  13989. *** /dev/null    Tue Dec 15 08:01:10 1992
  13990. --- miscellany/multi-media/profiles/mhn_defaults    Thu Dec 10 14:45:28 1992
  13991. ***************
  13992. *** 0 ****
  13993. --- 1,12 ----
  13994. + mhn-compose-audio/basic: /usr/demo/SOUND/record | /usr/demo/SOUND/raw2audio -F
  13995. + mhn-compose-audio/x-next: /usr/demo/SOUND/record | /usr/openwin/bin/adpcm_enc
  13996. + mhn-charset-iso-8859-1: xterm -fn '-*-*-medium-r-normal-*-*-120-*-*-c-*-iso8859-*' -e %s
  13997. + mhn-show-application/PostScript: %plpr -Pps
  13998. + mhn-show-audio/basic: %p/usr/demo/SOUND/raw2audio 2>/dev/null | play
  13999. + mhn-show-audio/x-next: %p/usr/openwin/bin/adpcm_dec | /usr/demo/SOUND/play
  14000. + mhn-show-image: %pxv -geometry =-0+0 %f
  14001. + mhn-show-text/richtext: %p/usr/local/lib/mh/richtext -p %F
  14002. + mhn-store-application/PostScript: %m%P.ps
  14003. + mhn-store-audio/basic: | /usr/demo/SOUND/raw2audio -e ulaw -s 8000 -c 1 > %m%P.au
  14004. + mhn-store-audio/x-next: %m%P.au
  14005. + mhn-store-text: %m%P.txt
  14006. *** /dev/null    Tue Dec 15 08:01:10 1992
  14007. --- miscellany/multi-media/profiles/mtr.mh_profile    Sat Oct 17 22:40:07 1992
  14008. ***************
  14009. *** 0 ****
  14010. --- 1,59 ----
  14011. + Path:        mhbox
  14012. + Alternate-Mailboxes: mrose*
  14013. + Draft-Folder:    drafts
  14014. + Folder-Protect:    700
  14015. + Msg-Protect:    600
  14016. + Sequence-Negation: ^
  14017. + lproc:        show
  14018. + moreproc:    less
  14019. + mshproc:    msh
  14020. + showproc:    mhl
  14021. + ex-next:    zz
  14022. + prompter-next:    vi
  14023. + da-server:    wp2.psi.net
  14024. + ali:        -alias aliases
  14025. + anno:        -inplace
  14026. + bomb:        -annotate -fcc +outbox -form repl.bomb -inplace -nocc all
  14027. +             -whatnow push
  14028. + burst:        -inplace
  14029. + dist:        -annotate -form dist.comps -inplace
  14030. + forw:        -annotate -editor rapid -form forw.comps -inplace -mime
  14031. + fym:        -annotate -fcc +outbox -form repl.fym -inplace -nocc all
  14032. +             -whatnow push -filter mhl.fym
  14033. + hnfy:        -annotate -fcc +outbox -form repl.hnfy -inplace -nocc all
  14034. +             -whatnow push
  14035. + inc:        -apop -form scan.time
  14036. + msgchk:        -apop
  14037. + msh:        -scan -topcur
  14038. + next:        -noheader
  14039. + ok:        -annotate -fcc +outbox -form repl.ok -inplace -nocc all
  14040. +             -whatnow push
  14041. + oops:        -annotate -fcc +outbox -form repl.oops -inplace -nocc all
  14042. +             -whatnow push
  14043. + pick:        -sequence select -list
  14044. + pop:        -rpop -form scan.timely
  14045. + popi:        -apop
  14046. + popf:        -pop
  14047. + prev:        -noheader
  14048. + push:        -alias aliases -forward -mime -msgid -push -verbose
  14049. + pushf:        -push
  14050. + rapid:        -rapid
  14051. + repl:        -annotate -fcc +outbox -inplace -cc all -nocc me
  14052. + scan:        -form scan.time
  14053. + send:        -alias aliases -mime -msgid -verbose
  14054. + sendf:        -alias aliases -mime -msgid -verbose -draftfolder +drafts
  14055. + show:        -noheader
  14056. + ssortm:        -limit 0 -textfield subject
  14057. + thanks:        -annotate -fcc +outbox -form repl.thanks -inplace -nocc all
  14058. +             -whatnow push
  14059. + whom:        -alias aliases
  14060. + vmh:        -novmhproc
  14061. + yl:        -annotate -fcc +outbox -form repl.yl -inplace -nocc all
  14062. +             -whatnow push
  14063. + Split-Delay:    180
  14064. + automhnproc:    mhn
  14065. + mhnproc:    mhn
  14066. + mcomp:        -editor rapid -form comp.mhn
  14067. + mhn:        -list -nomoreproc
  14068. + mhn-cache:    /tmp
  14069. + mhn-storage:    /tmp
  14070. *** /dev/null    Tue Dec 15 08:01:10 1992
  14071. --- miscellany/multi-media/profiles/mtr.mhn_profile.openwindows    Sat Oct 17 22:39:44 1992
  14072. ***************
  14073. *** 0 ****
  14074. --- 1 ----
  14075. + mhn-show-application/PostScript: pageview -
  14076. No differences encountered
  14077. *** /dev/null    Tue Dec 15 08:01:10 1992
  14078. --- miscellany/sendmail/README    Thu Nov  5 19:40:56 1992
  14079. ***************
  14080. *** 0 ****
  14081. --- 1,8 ----
  14082. + # miscellany/sendmail/README
  14083. + 
  14084. + spooler.c    -- a replacement local delivery mailer for sendmail that
  14085. +         was written by Terry West (terry@rand.org) and has been
  14086. +         in use there for many years now.
  14087. + 
  14088. +         It writes maildrops in the MMDF/MH ctrl/A format so you
  14089. +         can avoid munging "From " lines.
  14090. *** /dev/null    Tue Dec 15 08:01:10 1992
  14091. --- miscellany/sendmail/spooler.c    Thu Nov  5 14:28:52 1992
  14092. ***************
  14093. *** 0 ****
  14094. --- 1,204 ----
  14095. + /* spooler.c --  MH style mailer to write to /usr/spool/mail/<user>
  14096. +  *
  14097. +  *     Mlocal, P=/etc/spooler,  F=lsDFSmn, S=10, R=20, A=spooler $u
  14098. +  */
  14099. + 
  14100. + 
  14101. + #define FLOCK   /* uses flock() if defined, lockf() otherwise. */
  14102. + 
  14103. + #include <stdio.h>
  14104. + #include <sys/types.h>
  14105. + #include <sys/stat.h>
  14106. + #include <sys/file.h>
  14107. + #include <pwd.h>
  14108. + #include "sysexits.h"
  14109. + 
  14110. + #define SPOOLDIR "/usr/spool/mail"
  14111. + 
  14112. + char *delim = "\1\1\1\1\n";
  14113. + char *ME = "/etc/spooler";
  14114. + 
  14115. + FILE *mboxopen();
  14116. + FILE *fp_in;
  14117. + 
  14118. + main( argc, argv )
  14119. + int argc;
  14120. + char **argv;
  14121. + {
  14122. +     register int rc, anyerrs;
  14123. +     char tmpfile[100];
  14124. + 
  14125. +     if( *++argv == NULL ) {
  14126. +     fprintf( stderr, "%s: no recipients.\n", ME );
  14127. +     exit( EX_USAGE );
  14128. +     }
  14129. + 
  14130. +     if( argc == 2 ) {           /* single recipient, don't need tmp copy */
  14131. +     fp_in = stdin;
  14132. +     rc = localmail( *argv );
  14133. +     }
  14134. +     else {
  14135. +     if(( rc = copyfile( tmpfile )) == 0 ) {     /* sets fp_in */
  14136. +         for( anyerrs = 0; *argv; argv++ ) {
  14137. +         rewind( fp_in );
  14138. +         if(( rc = localmail( *argv )))
  14139. +             anyerrs++;
  14140. +         }
  14141. +         if( !anyerrs )
  14142. +         unlink( tmpfile );
  14143. +     }
  14144. +     }
  14145. + 
  14146. +     exit( rc );
  14147. + }
  14148. + 
  14149. + 
  14150. + 
  14151. + localmail( user )
  14152. + char   *user;
  14153. + {
  14154. +     register FILE *fp;
  14155. +     register int count, n;
  14156. +     register char buf[BUFSIZ];
  14157. +     register char mailbox[BUFSIZ];
  14158. +     register struct stat sb;
  14159. + 
  14160. +     sprintf( mailbox, "%s/%s", SPOOLDIR, user );
  14161. + 
  14162. +     if( stat( mailbox, &sb ) == -1 ) {
  14163. +     if( create_mbox( mailbox, user ))
  14164. +         return(EX_TEMPFAIL);
  14165. +     }
  14166. + 
  14167. +     if(( fp = mboxopen( mailbox )) == 0 )
  14168. +     return(EX_TEMPFAIL);
  14169. +     fwrite( delim, sizeof(char), strlen(delim), fp );
  14170. +     while(( count = fread( buf, sizeof(char), BUFSIZ, fp_in))) {
  14171. +     n = fwrite( buf, sizeof(char), count, fp );
  14172. +     if( n != count ) {
  14173. +         fprintf( stderr, "%s write error: %d read, %d written\n",
  14174. +         ME, count, n );
  14175. +         mboxclose(fp);
  14176. +         return(-1);
  14177. +     }
  14178. +     }
  14179. +     fwrite( delim, sizeof(char), strlen(delim), fp );
  14180. +     mboxclose(fp);
  14181. + 
  14182. +     return(0);
  14183. + }
  14184. + 
  14185. + 
  14186. + create_mbox( mbox, user )
  14187. + register char *mbox, *user;
  14188. + {
  14189. +     register int fd;
  14190. +     register struct passwd *pw;
  14191. + 
  14192. +     if(( fd = creat( mbox, 0600 )) == -1 )
  14193. +     return -1;
  14194. +     if(( pw = getpwnam( user )) != NULL ) {
  14195. +     fchown( fd, pw->pw_uid, pw->pw_gid );
  14196. +     }
  14197. +     close( fd );
  14198. + 
  14199. +     return 0;
  14200. + }
  14201. + 
  14202. + 
  14203. + FILE *
  14204. + mboxopen( mailbox )
  14205. + register char *mailbox;
  14206. + {
  14207. +     register FILE *fp;
  14208. +     register int i;
  14209. + 
  14210. +     if(( fp = fopen( mailbox, "a" )) == NULL ) {
  14211. +     fprintf( stderr, "%s:  Can't open %s for appending\n", ME, mailbox );
  14212. +     return(0);
  14213. +     }
  14214. + 
  14215. +     /* lock the mailbox */
  14216. + 
  14217. + #define NLOCKTRYS 20        /* almost a 2 min. wait should be enough even */
  14218. +                 /* after a long vacation */
  14219. + 
  14220. +     for( i = 0; i < NLOCKTRYS; i++ ) {
  14221. + #ifdef FLOCK
  14222. +     if( flock( fileno(fp), LOCK_EX | LOCK_NB ) == 0)    /* got it ok */
  14223. + #else
  14224. +     if( lockf( fileno(fp), F_TLOCK, 0) == 0 )
  14225. + #endif FLOCK
  14226. +         break;
  14227. +     /* fprintf(stderr, "can't lock, sleeping 5 sec...\n"); */
  14228. +     sleep(5);
  14229. +     }
  14230. + /*
  14231. +  *  If lockf worked perfectly (ie, rpc.lockd didn't die) this would be
  14232. +  *  just fine.
  14233. +  */
  14234. + #ifdef DontDoThis
  14235. +     if( i == NLOCKTRYS ) {
  14236. +     fprintf( stderr, "%s:  Can't lock %s\n", ME, mailbox);
  14237. +     return(0);
  14238. +     }
  14239. + #endif
  14240. + 
  14241. +     fseek( fp, 0, 2 );
  14242. + 
  14243. +     return(fp);
  14244. + }
  14245. + 
  14246. + 
  14247. + mboxclose(fp)
  14248. + FILE *fp;
  14249. + {
  14250. + /*todo: unlockit.  --not really necessary */
  14251. +     fclose(fp);
  14252. + }
  14253. + 
  14254. + 
  14255. + 
  14256. + /*
  14257. +  *  collect stdin to a tmp file
  14258. +  */
  14259. + copyfile( tmpfile )
  14260. + register char *tmpfile;
  14261. + {
  14262. +     struct stat sb;
  14263. +     register int pid, count, n;
  14264. +     register char buf[BUFSIZ];
  14265. +     register FILE *fp;
  14266. + 
  14267. +     pid = getpid();
  14268. + 
  14269. +     while( 1 ) {
  14270. +     sprintf( tmpfile, "/tmp/spooler.%05d", pid );
  14271. +     if( stat( tmpfile, &sb ) == -1 )    /* ok, this file doesn't exist */
  14272. +         break;
  14273. +     pid++;
  14274. +     }
  14275. + 
  14276. +     if(( fp = fopen( tmpfile, "w" )) == NULL ) {
  14277. +     fprintf( stderr, "%s:  Can't open %s\n", ME, tmpfile );
  14278. +     return(EX_TEMPFAIL);
  14279. +     }
  14280. + 
  14281. +     while(( count = fread( buf, sizeof(char), BUFSIZ, stdin ))) {
  14282. +     n = fwrite( buf, sizeof(char), count, fp );
  14283. +     if( n != count ) {
  14284. +         fprintf( stderr, "%s: copyfile, write error: %d read, %d written\n",
  14285. +         ME, count, n );
  14286. +         fclose(fp);
  14287. +         return(-1);
  14288. +     }
  14289. +     }
  14290. + 
  14291. +     fp_in = freopen( tmpfile, "r", fp );
  14292. +     if( fp_in == NULL ) {
  14293. +     fprintf( stderr, "%s: freopen on %s failed\n", ME, tmpfile );
  14294. +     return(-1);
  14295. +     }
  14296. + 
  14297. +     return(0);
  14298. + }
  14299. *** ../mh-6.7.2/mts/mh/hosts.c    Mon Feb  5 14:51:53 1990
  14300. --- mts/mh/hosts.c    Mon Dec 14 16:20:24 1992
  14301. ***************
  14302. *** 1,4 ****
  14303. --- 1,7 ----
  14304.   /* hosts.c - find out the official name of a host */
  14305. + #ifndef    lint
  14306. + static char ident[] = "@(#)$Id: hosts.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  14307. + #endif    /* lint */
  14308.   
  14309.   /* LINTLIBRARY */
  14310.   
  14311. ***************
  14312. *** 5,11 ****
  14313.   #undef    NETWORK
  14314.   #if    defined(BSD41A) || defined(BSD42) || defined(SOCKETS)
  14315.   #define    NETWORK
  14316. ! #endif    not (defined(BSD41A) || defined(BSD42) || defined(SOCKETS))
  14317.   
  14318.   #include "../h/strings.h"
  14319.   #include <stdio.h>
  14320. --- 8,14 ----
  14321.   #undef    NETWORK
  14322.   #if    defined(BSD41A) || defined(BSD42) || defined(SOCKETS)
  14323.   #define    NETWORK
  14324. ! #endif    /* not (defined(BSD41A) || defined(BSD42) || defined(SOCKETS)) */
  14325.   
  14326.   #include "../h/strings.h"
  14327.   #include <stdio.h>
  14328. ***************
  14329. *** 13,19 ****
  14330.   #include <ctype.h>
  14331.   #if    defined(BSD42) || defined(SOCKETS)
  14332.   #include <netdb.h>
  14333. ! #endif    BSD42 or SOCKETS
  14334.   
  14335.   
  14336.   #define    NOTOK    (-1)
  14337. --- 16,22 ----
  14338.   #include <ctype.h>
  14339.   #if    defined(BSD42) || defined(SOCKETS)
  14340.   #include <netdb.h>
  14341. ! #endif    /* BSD42 or SOCKETS */
  14342.   
  14343.   
  14344.   #define    NOTOK    (-1)
  14345. ***************
  14346. *** 30,41 ****
  14347.       static char buffer[BUFSIZ];
  14348.   #if    defined(BSD42) || defined(SOCKETS)
  14349.       register struct hostent *hp;
  14350. ! #endif    BSD42 or SOCKETS
  14351. ! #endif    NETWORK
  14352.   
  14353.       for (p = name, q = site; *p; p++, q++)
  14354.       *q = isupper (*p) ? tolower (*p) : *p;
  14355. !     *q = NULL;
  14356.       q = site;
  14357.   
  14358.       if (uleq (LocalName (), site))
  14359. --- 33,44 ----
  14360.       static char buffer[BUFSIZ];
  14361.   #if    defined(BSD42) || defined(SOCKETS)
  14362.       register struct hostent *hp;
  14363. ! #endif    /* BSD42 or SOCKETS */
  14364. ! #endif    /* NETWORK */
  14365.   
  14366.       for (p = name, q = site; *p; p++, q++)
  14367.       *q = isupper (*p) ? tolower (*p) : *p;
  14368. !     *q = 0;
  14369.       q = site;
  14370.   
  14371.       if (uleq (LocalName (), site))
  14372. ***************
  14373. *** 47,59 ****
  14374.       free (q);
  14375.       return buffer;
  14376.       }
  14377. ! #endif    BSD41A
  14378.   #if    defined(BSD42) || defined(SOCKETS)
  14379.       if (hp = gethostbyname (q)) {
  14380.       (void) strcpy (buffer, hp -> h_name);
  14381.       return buffer;
  14382.       }
  14383. ! #endif    BSD42 or SOCKETS
  14384.   
  14385.       return NULL;
  14386.   }
  14387. --- 50,62 ----
  14388.       free (q);
  14389.       return buffer;
  14390.       }
  14391. ! #endif    /* BSD41A */
  14392.   #if    defined(BSD42) || defined(SOCKETS)
  14393.       if (hp = gethostbyname (q)) {
  14394.       (void) strcpy (buffer, hp -> h_name);
  14395.       return buffer;
  14396.       }
  14397. ! #endif    /* BSD42 or SOCKETS */
  14398.   
  14399.       return NULL;
  14400.   }
  14401. *** ../mh-6.7.2/mts/mmdf/hosts.c    Thu Oct 29 14:58:02 1987
  14402. --- mts/mmdf/hosts.c    Mon Dec 14 16:20:24 1992
  14403. ***************
  14404. *** 1,4 ****
  14405. --- 1,7 ----
  14406.   /* hosts.c - use MMDF to get hostname information */
  14407. + #ifndef    lint
  14408. + static char ident[] = "@(#)$Id: hosts.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  14409. + #endif    /* lint */
  14410.   
  14411.   /* LINTLIBRARY */
  14412.   
  14413. ***************
  14414. *** 8,14 ****
  14415.   #include "ch.h"
  14416.   #ifdef    MMDFII
  14417.   #include "dm.h"
  14418. ! #endif    MMDFII
  14419.   #include "../zotnet/mts.h"
  14420.   
  14421.   /* 
  14422. --- 11,17 ----
  14423.   #include "ch.h"
  14424.   #ifdef    MMDFII
  14425.   #include "dm.h"
  14426. ! #endif    /* MMDFII */
  14427.   #include "../zotnet/mts.h"
  14428.   
  14429.   /* 
  14430. ***************
  14431. *** 36,42 ****
  14432.           : ch == (Chan *) NULL ? LocalName ()
  14433.           : buffer);
  14434.   }
  14435. ! #else    MMDFII
  14436.   
  14437.   extern char *invo_name;
  14438.   
  14439. --- 39,45 ----
  14440.           : ch == (Chan *) NULL ? LocalName ()
  14441.           : buffer);
  14442.   }
  14443. ! #else    /* MMDFII */
  14444.   
  14445.   extern char *invo_name;
  14446.   
  14447. ***************
  14448. *** 64,67 ****
  14449.           return buffer;
  14450.       }
  14451.   }
  14452. ! #endif    MMDFII
  14453. --- 67,70 ----
  14454.           return buffer;
  14455.       }
  14456.   }
  14457. ! #endif    /* MMDFII */
  14458. *** ../mh-6.7.2/mts/sendmail/hosts.c    Tue Feb  6 12:58:03 1990
  14459. --- mts/sendmail/hosts.c    Mon Dec 14 16:20:25 1992
  14460. ***************
  14461. *** 1,4 ****
  14462. --- 1,7 ----
  14463.   /* hosts.c - find out the official name of a host */
  14464. + #ifndef    lint
  14465. + static char ident[] = "@(#)$Id: hosts.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  14466. + #endif    /* lint */
  14467.   
  14468.   /* LINTLIBRARY */
  14469.   
  14470. ***************
  14471. *** 14,20 ****
  14472.   #include <ctype.h>
  14473.   #if    defined(BSD42) || defined(SOCKETS)
  14474.   #include <netdb.h>
  14475. ! #endif    BSD42 or SOCKETS
  14476.   
  14477.   
  14478.   #define    NOTOK    (-1)
  14479. --- 17,23 ----
  14480.   #include <ctype.h>
  14481.   #if    defined(BSD42) || defined(SOCKETS)
  14482.   #include <netdb.h>
  14483. ! #endif    /* BSD42 or SOCKETS */
  14484.   
  14485.   
  14486.   #define    NOTOK    (-1)
  14487. ***************
  14488. *** 40,46 ****
  14489.               site[BUFSIZ];
  14490.   #if    defined(BSD42) || defined(SOCKETS)
  14491.       register struct hostent *hp;
  14492. ! #endif    BSD42 or SOCKETS
  14493.       static char buffer[BUFSIZ];
  14494.       register char **r;
  14495.       register struct host   *h;
  14496. --- 43,49 ----
  14497.               site[BUFSIZ];
  14498.   #if    defined(BSD42) || defined(SOCKETS)
  14499.       register struct hostent *hp;
  14500. ! #endif    /* BSD42 or SOCKETS */
  14501.       static char buffer[BUFSIZ];
  14502.       register char **r;
  14503.       register struct host   *h;
  14504. ***************
  14505. *** 47,53 ****
  14506.   
  14507.       for (p = name, q = site; *p; p++, q++)
  14508.       *q = isupper (*p) ? tolower (*p) : *p;
  14509. !     *q = NULL;
  14510.       q = site;
  14511.   
  14512.       if (uleq (LocalName (), site))
  14513. --- 50,56 ----
  14514.   
  14515.       for (p = name, q = site; *p; p++, q++)
  14516.       *q = isupper (*p) ? tolower (*p) : *p;
  14517. !     *q = 0;
  14518.       q = site;
  14519.   
  14520.       if (uleq (LocalName (), site))
  14521. ***************
  14522. *** 59,65 ****
  14523.       free (q);
  14524.       return buffer;
  14525.       }
  14526. ! #endif    BSD41A
  14527.   #if    defined(BSD42) || defined(SOCKETS)
  14528.   #ifndef    BIND
  14529.       sethostent (1);
  14530. --- 62,68 ----
  14531.       free (q);
  14532.       return buffer;
  14533.       }
  14534. ! #endif    /* BSD41A */
  14535.   #if    defined(BSD42) || defined(SOCKETS)
  14536.   #ifndef    BIND
  14537.       sethostent (1);
  14538. ***************
  14539. *** 68,74 ****
  14540.       (void) strcpy (buffer, hp -> h_name);
  14541.       return buffer;
  14542.       }
  14543. ! #endif    BSD42 or SOCKETS
  14544.   
  14545.       if (hosts.h_name || init_hs ())
  14546.       for (h = hosts.h_next; h; h = h -> h_next)
  14547. --- 71,77 ----
  14548.       (void) strcpy (buffer, hp -> h_name);
  14549.       return buffer;
  14550.       }
  14551. ! #endif    /* BSD42 or SOCKETS */
  14552.   
  14553.       if (hosts.h_name || init_hs ())
  14554.       for (h = hosts.h_next; h; h = h -> h_next)
  14555. ***************
  14556. *** 108,134 ****
  14557.       h = &hosts;
  14558.       while (fgets (buffer, sizeof buffer, fp) != NULL) {
  14559.       if (cp = index (buffer, '#'))
  14560. !         *cp = NULL;
  14561.       if (cp = index (buffer, '\n'))
  14562. !         *cp = NULL;
  14563.       for (cp = buffer; *cp; cp++)
  14564.           if (isspace (*cp))
  14565.           *cp = ' ';
  14566.       for (cp = buffer; isspace (*cp); cp++)
  14567.           continue;
  14568. !     if (*cp == NULL)
  14569.           continue;
  14570.   
  14571.       q = aliases;
  14572.       if (cp = index (dp = cp, ' ')) {
  14573. !         *cp = NULL;
  14574.           for (cp++; *cp; cp++) {
  14575.           while (isspace (*cp))
  14576.               cp++;
  14577. !         if (*cp == NULL)
  14578.               break;
  14579.           if (cp = index (*q++ = cp, ' '))
  14580. !             *cp = NULL;
  14581.           else
  14582.               break;
  14583.           if (q >= aliases + NALIASES)
  14584. --- 111,137 ----
  14585.       h = &hosts;
  14586.       while (fgets (buffer, sizeof buffer, fp) != NULL) {
  14587.       if (cp = index (buffer, '#'))
  14588. !         *cp = 0;
  14589.       if (cp = index (buffer, '\n'))
  14590. !         *cp = 0;
  14591.       for (cp = buffer; *cp; cp++)
  14592.           if (isspace (*cp))
  14593.           *cp = ' ';
  14594.       for (cp = buffer; isspace (*cp); cp++)
  14595.           continue;
  14596. !     if (*cp == 0)
  14597.           continue;
  14598.   
  14599.       q = aliases;
  14600.       if (cp = index (dp = cp, ' ')) {
  14601. !         *cp = 0;
  14602.           for (cp++; *cp; cp++) {
  14603.           while (isspace (*cp))
  14604.               cp++;
  14605. !         if (*cp == 0)
  14606.               break;
  14607.           if (cp = index (*q++ = cp, ' '))
  14608. !             *cp = 0;
  14609.           else
  14610.               break;
  14611.           if (q >= aliases + NALIASES)
  14612. ***************
  14613. *** 136,142 ****
  14614.           }
  14615.       }
  14616.   
  14617. !     *q = NULL;
  14618.   
  14619.       h -> h_next = (struct host *) calloc (1, sizeof *h);
  14620.       h = h -> h_next;
  14621. --- 139,145 ----
  14622.           }
  14623.       }
  14624.   
  14625. !     *q = 0;
  14626.   
  14627.       h -> h_next = (struct host *) calloc (1, sizeof *h);
  14628.       h = h -> h_next;
  14629. ***************
  14630. *** 145,151 ****
  14631.           (char **) calloc ((unsigned) (q - aliases + 1), sizeof *q);
  14632.       for (q = aliases; *q; q++)
  14633.           *r++ = getcpy (*q);
  14634. !     *r = NULL;
  14635.       }
  14636.   
  14637.       (void) fclose (fp);
  14638. --- 148,154 ----
  14639.           (char **) calloc ((unsigned) (q - aliases + 1), sizeof *q);
  14640.       for (q = aliases; *q; q++)
  14641.           *r++ = getcpy (*q);
  14642. !     *r = 0;
  14643.       }
  14644.   
  14645.       (void) fclose (fp);
  14646. *** ../mh-6.7.2/mts/sendmail/smail.c    Tue Feb  6 12:58:45 1990
  14647. --- mts/sendmail/smail.c    Mon Nov  9 10:19:43 1992
  14648. ***************
  14649. *** 1,4 ****
  14650. --- 1,7 ----
  14651.   /* smail.c - MH interface to SendMail/SMTP */
  14652. + #ifndef    lint
  14653. + static char ident[] = "@(#)$Id: smail.c,v 1.21 1992/11/09 18:19:32 jromine Exp $";
  14654. + #endif
  14655.   
  14656.   /* LINTLIBRARY */
  14657.   
  14658. ***************
  14659. *** 13,19 ****
  14660.      expect SendMail to be well-behaved and not hang on us.  The only time
  14661.      I've ever seen Sendmail hang was with a bogus configuration file...
  14662.    */
  14663. ! #endif    BSD42
  14664.   #ifdef    SENDMAILBUG
  14665.   /*
  14666.    * It appears that some versions of Sendmail will return Code 451
  14667. --- 16,22 ----
  14668.      expect SendMail to be well-behaved and not hang on us.  The only time
  14669.      I've ever seen Sendmail hang was with a bogus configuration file...
  14670.    */
  14671. ! #endif    /* BSD42 */
  14672.   #ifdef    SENDMAILBUG
  14673.   /*
  14674.    * It appears that some versions of Sendmail will return Code 451
  14675. ***************
  14676. *** 25,44 ****
  14677.    */
  14678.   #ifndef    SENDMAIL
  14679.   #undef        SENDMAILBUG
  14680. ! #endif    not SENDMAIL
  14681. ! #endif    SENDMAILBUG
  14682.   
  14683.   #ifdef hpux    
  14684.   /* HP-UX has this capability. It also handles (some) signals. */
  14685.   #define BSD42 
  14686. ! #endif hpux
  14687.   
  14688.   #if    !defined(BSD42) && !defined(SOCKETS)
  14689.   #undef    SMTP
  14690. ! #endif    not BSD42 and not SOCKETS
  14691.   #ifdef    SMTP
  14692.   #undef    SENDMAIL
  14693. ! #endif    SMTP
  14694.   
  14695.   
  14696.   #include "../h/strings.h"
  14697. --- 28,47 ----
  14698.    */
  14699.   #ifndef    SENDMAIL
  14700.   #undef        SENDMAILBUG
  14701. ! #endif    /* not SENDMAIL */
  14702. ! #endif    /* SENDMAILBUG */
  14703.   
  14704.   #ifdef hpux    
  14705.   /* HP-UX has this capability. It also handles (some) signals. */
  14706.   #define BSD42 
  14707. ! #endif /* hpux */
  14708.   
  14709.   #if    !defined(BSD42) && !defined(SOCKETS)
  14710.   #undef    SMTP
  14711. ! #endif    /* not BSD42 and not SOCKETS */
  14712.   #ifdef    SMTP
  14713.   #undef    SENDMAIL
  14714. ! #endif    /* SMTP */
  14715.   
  14716.   
  14717.   #include "../h/strings.h"
  14718. ***************
  14719. *** 48,53 ****
  14720. --- 51,60 ----
  14721.   #include <ctype.h>
  14722.   #include <signal.h>
  14723.   
  14724. + #ifndef    TYPESIG
  14725. + #define    TYPESIG    int
  14726. + #endif
  14727. + 
  14728.   #define    NOTOK    (-1)
  14729.   #define    OK    0
  14730.   #define    DONE    1
  14731. ***************
  14732. *** 60,65 ****
  14733. --- 67,73 ----
  14734.   #define    min(a,b)    ((a) < (b) ? (a) : (b))
  14735.   
  14736.   
  14737. +         /* these codes must all be different! */
  14738.   #define    SM_OPEN     90      /* Changed from 30 in case of nameserver flakiness */
  14739.   #define    SM_HELO     20
  14740.   #define    SM_RSET     15
  14741. ***************
  14742. *** 66,85 ****
  14743.   #define    SM_MAIL     40
  14744.   #define    SM_RCPT    120
  14745.   #define    SM_DATA     20
  14746. ! #define    SM_TEXT    120
  14747. ! #define    SM_DOT    120
  14748. ! #define    SM_QUIT     20
  14749.   #define    SM_CLOS     10
  14750.   
  14751.   /*   */
  14752.   
  14753. ! static int    alrmser ();
  14754.   
  14755.   static int  sm_addrs = 0;
  14756.   static int  sm_alarmed = 0;
  14757.   #ifndef    SMTP
  14758.   static int  sm_child = NOTOK;
  14759. ! #endif    not SMTP
  14760.   static int  sm_debug = 0;
  14761.   static int  sm_nl = TRUE;
  14762.   static int  sm_verbose = 0;
  14763. --- 74,93 ----
  14764.   #define    SM_MAIL     40
  14765.   #define    SM_RCPT    120
  14766.   #define    SM_DATA     20
  14767. ! #define    SM_TEXT    150
  14768. ! #define    SM_DOT    180
  14769. ! #define    SM_QUIT     30
  14770.   #define    SM_CLOS     10
  14771.   
  14772.   /*   */
  14773.   
  14774. ! static TYPESIG    alrmser ();
  14775.   
  14776.   static int  sm_addrs = 0;
  14777.   static int  sm_alarmed = 0;
  14778.   #ifndef    SMTP
  14779.   static int  sm_child = NOTOK;
  14780. ! #endif    /* not SMTP */
  14781.   static int  sm_debug = 0;
  14782.   static int  sm_nl = TRUE;
  14783.   static int  sm_verbose = 0;
  14784. ***************
  14785. *** 87,92 ****
  14786. --- 95,105 ----
  14787.   static  FILE * sm_rfp = NULL;
  14788.   static  FILE * sm_wfp = NULL;
  14789.   
  14790. + #ifdef    MPOP
  14791. + static    int  sm_ispool = 0;
  14792. + static    char sm_tmpfil[BUFSIZ];
  14793. + #endif /* MPOP */
  14794. + 
  14795.   static char *sm_noreply = "No reply text given";
  14796.   static char *sm_moreply = "; ";
  14797.   
  14798. ***************
  14799. *** 99,104 ****
  14800. --- 112,123 ----
  14801.   static int    rclient(), sm_ierror(), smtalk(), sm_wrecord(), sm_wstream();
  14802.   static int    sm_werror(), smhear(), sm_rrecord(), sm_rerror();
  14803.   
  14804. + #ifdef    MPOP
  14805. + extern    int    errno, sys_nerr;
  14806. + extern    char   *sys_errlist[];
  14807. + extern    char  **brkstring (), **copyip (), *getcpy ();
  14808. + #endif
  14809. + 
  14810.   /*   */
  14811.   
  14812.   #ifndef    SMTP
  14813. ***************
  14814. *** 120,130 ****
  14815. --- 139,157 ----
  14816.       char   *vec[15];
  14817.   
  14818.       if (watch)
  14819. + #ifndef    SUN40
  14820.       verbose = TRUE;
  14821. + #else    /* to show the transaction, -watch must imply -snoop */
  14822. +     debug = verbose = TRUE;
  14823. + #endif
  14824.       sm_verbose = verbose;
  14825.       sm_debug = debug;
  14826.       if (sm_rfp != NULL && sm_wfp != NULL)
  14827.       return RP_OK;
  14828. + #ifdef ZMAILER
  14829. +     if (client == NULL || *client == '\0')
  14830. +     client = "localhost";
  14831. + #endif
  14832.   
  14833.       if (pipe (pdi) == NOTOK)
  14834.       return sm_ierror ("no pipes");
  14835. ***************
  14836. *** 157,162 ****
  14837. --- 184,190 ----
  14838.           vecp = 0;
  14839.           vec[vecp++] = r1bindex (sendmail, '/');
  14840.           vec[vecp++] = "-bs";
  14841. + #ifndef ZMAILER
  14842.           vec[vecp++] = watch ? "-odi" : "-odb";
  14843.           vec[vecp++] = "-oem";
  14844.           vec[vecp++] = "-om";
  14845. ***************
  14846. *** 163,169 ****
  14847.   #ifndef    RAND
  14848.           if (verbose)
  14849.           vec[vecp++] = "-ov";
  14850. ! #endif    not RAND
  14851.           vec[vecp++] = NULL;
  14852.   
  14853.           (void) setgid (getegid ());
  14854. --- 191,198 ----
  14855.   #ifndef    RAND
  14856.           if (verbose)
  14857.           vec[vecp++] = "-ov";
  14858. ! #endif    /* not RAND */
  14859. ! #endif    /* not ZMAILER */
  14860.           vec[vecp++] = NULL;
  14861.   
  14862.           (void) setgid (getegid ());
  14863. ***************
  14864. *** 198,203 ****
  14865. --- 227,237 ----
  14866.               (void) sm_end (NOTOK);
  14867.               return RP_RPLY;
  14868.           }
  14869. + #ifndef ZMAILER
  14870. +         (void) smtalk(SM_HELO, "ONEX");
  14871. + #endif /* not ZMAILER */
  14872. +         if (watch)
  14873. +         (void) smtalk(SM_HELO, "VERB on");
  14874.           if (client && *client)
  14875.           switch (smtalk (SM_HELO, "HELO %s", client)) {
  14876.               case 250: 
  14877. ***************
  14878. *** 210,216 ****
  14879.           return RP_OK;
  14880.       }
  14881.   }
  14882. ! #else    SMTP
  14883.   
  14884.   /*   */
  14885.   
  14886. --- 244,250 ----
  14887.           return RP_OK;
  14888.       }
  14889.   }
  14890. ! #else    /* SMTP */
  14891.   
  14892.   /*   */
  14893.   
  14894. ***************
  14895. *** 226,243 ****
  14896.                       sd2;
  14897.   
  14898.       if (watch)
  14899.       verbose = TRUE;
  14900.       sm_verbose = verbose;
  14901.       sm_debug = debug;
  14902.       if (sm_rfp != NULL && sm_wfp != NULL)
  14903.       return RP_OK;
  14904. ! #if    !defined(SENDMTS) || defined(MMDFII)
  14905. !     if (client == NULL || *client == NULL)
  14906.       client = LocalName ();
  14907.   #endif
  14908.   
  14909.       if ((sd1 = rclient (server, "tcp", "smtp")) == NOTOK)
  14910.       return RP_BHST;
  14911.       if ((sd2 = dup (sd1)) == NOTOK) {
  14912.       (void) close (sd1);
  14913.       return sm_ierror ("unable to dup");
  14914. --- 260,308 ----
  14915.                       sd2;
  14916.   
  14917.       if (watch)
  14918. + #if defined(SUN40) && !defined(MMDFII)
  14919. +     debug = verbose = TRUE;
  14920. + #else
  14921.       verbose = TRUE;
  14922. + #endif
  14923.       sm_verbose = verbose;
  14924.       sm_debug = debug;
  14925.       if (sm_rfp != NULL && sm_wfp != NULL)
  14926.       return RP_OK;
  14927. ! #ifdef ZMAILER
  14928. !     if (client == NULL || *client == '\0')
  14929. !     client = "localhost";
  14930. ! #else
  14931. ! #if    !defined(SENDMTS) || defined(MMDFII) || defined(SVR4)
  14932. !     if (client == NULL || *client == 0)
  14933.       client = LocalName ();
  14934.   #endif
  14935. + #endif    /* ZMAILER */
  14936.   
  14937. + #ifdef    MPOP
  14938. +     if (sm_ispool)
  14939. +     goto all_done;
  14940. + #endif
  14941.       if ((sd1 = rclient (server, "tcp", "smtp")) == NOTOK)
  14942.       return RP_BHST;
  14943. + #ifdef    MPOP
  14944. +     if (sm_ispool) {
  14945. +     if (sm_rfp) {
  14946. +         (void) alarm (SM_CLOS);
  14947. +         (void) fclose (sm_rfp);
  14948. +         (void) alarm (0);
  14949. +         sm_rfp = NULL;
  14950. +     }
  14951. +     if ((sm_wfp = fdopen (sd1, "w")) == NULL) {
  14952. +         (void) unlink (sm_tmpfil);
  14953. +         (void) close (sd1);
  14954. +         return sm_ierror ("unable to fdopen");
  14955. +     }
  14956. + all_done: ;
  14957. +     sm_reply.text[sm_reply.length = 0] = NULL;
  14958. +     return (sm_reply.code = RP_OK);
  14959. +     }
  14960. + #endif /* MPOP */
  14961.       if ((sd2 = dup (sd1)) == NOTOK) {
  14962.       (void) close (sd1);
  14963.       return sm_ierror ("unable to dup");
  14964. ***************
  14965. *** 265,270 ****
  14966. --- 330,342 ----
  14967.           (void) sm_end (NOTOK);
  14968.           return RP_RPLY;
  14969.       }
  14970. + #if    !(defined(ZMAILER) || defined(MMDFII))
  14971. +     (void) smtalk(SM_HELO, "ONEX");
  14972. + #endif /* not ZMAILER */
  14973. + #ifndef    MMDFII
  14974. +     if (watch)
  14975. +     (void) smtalk(SM_HELO, "VERB on");
  14976. + #endif
  14977.       if (client && *client)
  14978.       switch (smtalk (SM_HELO, "HELO %s", client)) {
  14979.           case 250: 
  14980. ***************
  14981. *** 279,284 ****
  14982. --- 351,360 ----
  14983.   }
  14984.   
  14985.   
  14986. + #ifdef    MPOP
  14987. + #define    MAXARGS    1000
  14988. + #endif /* MPOP */
  14989. + 
  14990.   static int rclient (server, protocol, service)
  14991.   char   *server,
  14992.          *protocol,
  14993. ***************
  14994. *** 286,299 ****
  14995.   {
  14996.       int     sd;
  14997.       char    response[BUFSIZ];
  14998.   
  14999.       if ((sd = client (server, protocol, service, FALSE, response)) != NOTOK)
  15000.       return sd;
  15001.   
  15002.       (void) sm_ierror ("%s", response);
  15003.       return NOTOK;
  15004.   }
  15005. ! #endif    SMTP
  15006.   
  15007.   /*   */
  15008.   
  15009. --- 362,407 ----
  15010.   {
  15011.       int     sd;
  15012.       char    response[BUFSIZ];
  15013. + #ifdef    MPOP
  15014. +     char   *cp;
  15015. + #endif /* MPOP */
  15016.   
  15017.       if ((sd = client (server, protocol, service, FALSE, response)) != NOTOK)
  15018.       return sd;
  15019.   
  15020. + #ifdef    MPOP
  15021. +     if (!server && servers && (cp = index (servers, '/'))) {
  15022. +     register char  **ap;
  15023. +     char   *arguments[MAXARGS];
  15024. + 
  15025. +     (void) copyip (brkstring (cp = getcpy (servers), " ", "\n"),
  15026. +                arguments);
  15027. + 
  15028. +     for (ap = arguments; *ap; ap++)
  15029. +         if (**ap == '/') {
  15030. +         register char *dp;
  15031. + 
  15032. +         if ((dp = rindex (*ap, '/')) && *++dp == NULL)
  15033. +             *--dp = NULL;
  15034. +         (void) sprintf (sm_tmpfil, "%s/smtpXXXXXX", *ap);
  15035. +         (void) mktemp (sm_tmpfil);
  15036. + 
  15037. +         if ((sd = creat (sm_tmpfil, 0600)) != NOTOK) {
  15038. +             sm_ispool = 1;
  15039. +             break;
  15040. +         }
  15041. +         }
  15042. + 
  15043. +     free (cp);
  15044. +     if (sd != NOTOK)
  15045. +         return sd;
  15046. +     }
  15047. + #endif /* MPOP */
  15048. + 
  15049.       (void) sm_ierror ("%s", response);
  15050.       return NOTOK;
  15051.   }
  15052. ! #endif    /* SMTP */
  15053.   
  15054.   /*   */
  15055.   
  15056. ***************
  15057. *** 301,306 ****
  15058. --- 409,423 ----
  15059.   register int    mode;
  15060.   register char   *from;
  15061.   {
  15062. + #ifdef    MPOP
  15063. +     if (sm_ispool && !sm_wfp) {
  15064. +     (void) strlen (strcpy (sm_reply.text,
  15065. +                    "unable to create new spool file"));
  15066. +     sm_reply.code = NOTOK;
  15067. +     return RP_BHST;
  15068. +     }
  15069. + #endif /* MPOP */
  15070. + 
  15071.       switch (smtalk (SM_MAIL, "%s FROM:<%s>",
  15072.           mode == S_SEND ? "SEND" : mode == S_SOML ? "SOML"
  15073.           : mode == S_SAML ? "SAML" : "MAIL", from)) {
  15074. ***************
  15075. *** 322,334 ****
  15076.   
  15077.   #ifdef    BERK
  15078.   /* ARGUSED */
  15079. ! #endif    BERK
  15080.   
  15081.   int     sm_wadr (mbox, host, path)
  15082.   register char   *mbox;
  15083.   #ifndef    BERK
  15084.   register
  15085. ! #endif    not BERK
  15086.        char   *host,
  15087.           *path;
  15088.   {
  15089. --- 439,451 ----
  15090.   
  15091.   #ifdef    BERK
  15092.   /* ARGUSED */
  15093. ! #endif    /* BERK */
  15094.   
  15095.   int     sm_wadr (mbox, host, path)
  15096.   register char   *mbox;
  15097.   #ifndef    BERK
  15098.   register
  15099. ! #endif    /* not BERK */
  15100.        char   *host,
  15101.           *path;
  15102.   {
  15103. ***************
  15104. *** 336,344 ****
  15105.       switch (smtalk (SM_RCPT, host && *host ? "RCPT TO:<%s%s@%s>"
  15106.                          : "RCPT TO:<%s%s>",
  15107.                    path ? path : "", mbox, host)) {
  15108. ! #else    BERK
  15109.       switch (smtalk (SM_RCPT, "RCPT TO:%s", mbox)) {
  15110. ! #endif    BERK
  15111.       case 250: 
  15112.       case 251: 
  15113.           sm_addrs++;
  15114. --- 453,461 ----
  15115.       switch (smtalk (SM_RCPT, host && *host ? "RCPT TO:<%s%s@%s>"
  15116.                          : "RCPT TO:<%s%s>",
  15117.                    path ? path : "", mbox, host)) {
  15118. ! #else    /* BERK */
  15119.       switch (smtalk (SM_RCPT, "RCPT TO:%s", mbox)) {
  15120. ! #endif    /* BERK */
  15121.       case 250: 
  15122.       case 251: 
  15123.           sm_addrs++;
  15124. ***************
  15125. *** 348,354 ****
  15126.   #ifdef SENDMAILBUG
  15127.           sm_addrs++;
  15128.           return RP_OK;
  15129. ! #endif SENDMAILBUG
  15130.       case 421: 
  15131.       case 450: 
  15132.       case 452: 
  15133. --- 465,471 ----
  15134.   #ifdef SENDMAILBUG
  15135.           sm_addrs++;
  15136.           return RP_OK;
  15137. ! #endif /* SENDMAILBUG */
  15138.       case 421: 
  15139.       case 450: 
  15140.       case 452: 
  15141. ***************
  15142. *** 381,387 ****
  15143.   #ifdef SENDMAILBUG
  15144.           sm_nl = TRUE;
  15145.           return RP_OK;
  15146. ! #endif SENDMAILBUG
  15147.       case 421: 
  15148.           return RP_NO;
  15149.   
  15150. --- 498,504 ----
  15151.   #ifdef SENDMAILBUG
  15152.           sm_nl = TRUE;
  15153.           return RP_OK;
  15154. ! #endif /* SENDMAILBUG */
  15155.       case 421: 
  15156.           return RP_NO;
  15157.   
  15158. ***************
  15159. *** 426,432 ****
  15160.       case 451: 
  15161.   #ifdef SENDMAILBUG
  15162.           return RP_OK;
  15163. ! #endif SENDMAILBUG
  15164.       case 452: 
  15165.       default: 
  15166.           return RP_NO;
  15167. --- 543,549 ----
  15168.       case 451: 
  15169.   #ifdef SENDMAILBUG
  15170.           return RP_OK;
  15171. ! #endif /* SENDMAILBUG */
  15172.       case 452: 
  15173.       default: 
  15174.           return RP_NO;
  15175. ***************
  15176. *** 454,460 ****
  15177.       default: 
  15178.           break;
  15179.       }
  15180. ! #endif    not SMTP
  15181.       if (sm_rfp == NULL && sm_wfp == NULL)
  15182.       return RP_OK;
  15183.   
  15184. --- 571,577 ----
  15185.       default: 
  15186.           break;
  15187.       }
  15188. ! #endif    /* not SMTP */
  15189.       if (sm_rfp == NULL && sm_wfp == NULL)
  15190.       return RP_OK;
  15191.   
  15192. ***************
  15193. *** 474,482 ****
  15194.           (void) kill (sm_child, SIGKILL);
  15195.           discard (sm_rfp);
  15196.           discard (sm_wfp);
  15197. ! #else    SMTP
  15198.           (void) smtalk (SM_QUIT, "QUIT");
  15199. ! #endif    not SMTP
  15200.           if (type == NOTOK) {
  15201.           sm_reply.code = sm_note.code;
  15202.           (void) strncpy (sm_reply.text, sm_note.text,
  15203. --- 591,599 ----
  15204.           (void) kill (sm_child, SIGKILL);
  15205.           discard (sm_rfp);
  15206.           discard (sm_wfp);
  15207. ! #else    /* SMTP */
  15208.           (void) smtalk (SM_QUIT, "QUIT");
  15209. ! #endif    /* not SMTP */
  15210.           if (type == NOTOK) {
  15211.           sm_reply.code = sm_note.code;
  15212.           (void) strncpy (sm_reply.text, sm_note.text,
  15213. ***************
  15214. *** 484,489 ****
  15215. --- 601,619 ----
  15216.           }
  15217.           break;
  15218.       }
  15219. + #ifdef    MPOP
  15220. + #ifdef    SMTP
  15221. +     if (sm_ispool) {
  15222. +     sm_ispool = 0;
  15223. + 
  15224. +     if (sm_wfp) {
  15225. +         (void) unlink (sm_tmpfil);
  15226. +         (void) fclose (sm_wfp);
  15227. +         sm_wfp = NULL;
  15228. +     }
  15229. +     }
  15230. + #endif
  15231. + #endif /* MPOP */
  15232.       if (sm_rfp != NULL) {
  15233.       (void) alarm (SM_CLOS);
  15234.       (void) fclose (sm_rfp);
  15235. ***************
  15236. *** 499,507 ****
  15237.       status = pidwait (sm_child);
  15238.   
  15239.       sm_child = NOTOK;
  15240. ! #else    SMTP
  15241.       status = 0;
  15242. ! #endif    SMTP
  15243.       sm_rfp = sm_wfp = NULL;
  15244.   
  15245.       return (status ? RP_BHST : RP_OK);
  15246. --- 629,637 ----
  15247.       status = pidwait (sm_child);
  15248.   
  15249.       sm_child = NOTOK;
  15250. ! #else    /* SMTP */
  15251.       status = 0;
  15252. ! #endif    /* SMTP */
  15253.       sm_rfp = sm_wfp = NULL;
  15254.   
  15255.       return (status ? RP_BHST : RP_OK);
  15256. ***************
  15257. *** 509,514 ****
  15258. --- 639,994 ----
  15259.   
  15260.   /*   */
  15261.   
  15262. + #ifdef    MPOP
  15263. + #ifdef    SMTP
  15264. + #include <sys/types.h>
  15265. + #include <sys/stat.h>
  15266. + 
  15267. + 
  15268. + int    sm_bulk (file)
  15269. + char   *file;
  15270. + {
  15271. +     int        cc,
  15272. +         i,
  15273. +         j,
  15274. +         k,
  15275. +         result;
  15276. +     long    pos;
  15277. +     register char *dp;
  15278. +     char   *bp,
  15279. +        *cp,
  15280. +         buffer[BUFSIZ],
  15281. +         sender[BUFSIZ];
  15282. +     FILE   *fp,
  15283. +        *gp;
  15284. + 
  15285. +     gp = NULL;
  15286. +     k = strlen (file) - sizeof ".bulk";
  15287. +     if ((fp = fopen (file, "r")) == NULL) {
  15288. +     (void) sprintf (bp = sm_reply.text, "unable to read %s: ", file);
  15289. +     bp += strlen (bp);
  15290. +     if (errno > 0 && errno < sys_nerr)
  15291. +         (void) sprintf (bp, "%s", sys_errlist[errno]);
  15292. +     else
  15293. +         (void) sprintf (bp, "Error %d", errno);
  15294. +     sm_reply.length = strlen (sm_reply.text);
  15295. +     sm_reply.code = NOTOK;
  15296. +     return RP_BHST;
  15297. +     }
  15298. +     if (sm_debug) {
  15299. +     printf ("reading file %s\n", file);
  15300. +     (void) fflush (stdout);
  15301. +     }
  15302. + 
  15303. +     i = j = 0;
  15304. +     while (fgets (buffer, sizeof buffer, fp)) {
  15305. +     if (j++ == 0)
  15306. +         (void) strcpy (sender, buffer + sizeof "MAIL FROM:" - 1);
  15307. +     if (strcmp (buffer, "DATA\r\n") == 0) {
  15308. +         i = 1;
  15309. +         break;
  15310. +     }
  15311. +     }
  15312. +     if (i == 0) {
  15313. +     if (sm_debug) {
  15314. +         printf ("no DATA...\n");
  15315. +         (void) fflush (stdout);
  15316. +     }
  15317. + losing0: ;
  15318. +     (void) sprintf (buffer, "%s.bad", file);
  15319. +     (void) rename (file, buffer);
  15320. +     if (gp) {
  15321. +         (void) sprintf (buffer, "%*.*sA.bulk", k, k, file);
  15322. +         (void) unlink (buffer);
  15323. +         (void) fclose (gp);
  15324. +     }
  15325. +     (void) fclose (fp);
  15326. +     return RP_OK;
  15327. +     }
  15328. +     if (j < 3) {
  15329. +     if (sm_debug) {
  15330. +         printf ("no %srecipients...\n", j < 1 ? "sender or " : "");
  15331. +         (void) fflush (stdout);
  15332. +     }
  15333. +     goto losing0;
  15334. +     }
  15335. + 
  15336. +     if ((cp = malloc ((unsigned) (cc = (pos = ftell (fp)) + 1))) == NULL) {
  15337. +     sm_reply.length = strlen (strcpy (sm_reply.text, "out of memory"));
  15338. + losing1: ;
  15339. +     sm_reply.code = NOTOK;
  15340. +     (void) fclose (fp);
  15341. +     return RP_BHST;
  15342. +     }
  15343. +     (void) fseek (fp, 0L, 0);
  15344. +     for (dp = cp, i = 0; i++ < j; dp += strlen (dp))
  15345. +     if (fgets (dp, cc - (dp - cp), fp) == NULL) {
  15346. +         sm_reply.length = strlen (strcpy (sm_reply.text, "premature eof"));
  15347. + losing2: ;
  15348. +         free (cp);
  15349. +         goto losing1;
  15350. +     }
  15351. +     *dp = NULL;
  15352. + 
  15353. +     for (dp = cp, i = cc - 1; i > 0; dp += cc, i -= cc)
  15354. +     if ((cc = write (fileno (sm_wfp), dp, i)) == NOTOK) {
  15355. + losing3: ;
  15356. +         (void) strcpy (bp = sm_reply.text, "error writing to server: ");
  15357. +         bp += strlen (bp);
  15358. +         if (errno > 0 && errno < sys_nerr)
  15359. +         (void) sprintf (bp, "%s", sys_errlist[errno]);
  15360. +         else
  15361. +         (void) sprintf (bp, "Error %d", errno);
  15362. +         sm_reply.length = strlen (sm_reply.text);
  15363. +         goto losing2;
  15364. +     }
  15365. +     else
  15366. +         if (sm_debug) {
  15367. +         printf ("wrote %d octets to server\n", cc);
  15368. +         (void) fflush (stdout);
  15369. +         }
  15370. + 
  15371. +     for (dp = cp, i = 0; i++ < j; dp = index (dp, '\n'), dp++) {
  15372. +     if (sm_debug) {
  15373. +         if (bp = index (dp, '\r'))
  15374. +         *bp = NULL;
  15375. +         printf ("=> %s\n", dp);
  15376. +         (void) fflush (stdout);
  15377. +         if (bp)
  15378. +         *bp = '\r';
  15379. +     }
  15380. + 
  15381. +     switch (smhear () + (i == 1 ? 1000 : i != j ? 2000 : 3000)) {
  15382. +         case 1000 + 250:
  15383. +             sm_addrs = 0;
  15384. +             result = RP_OK;
  15385. +         break;
  15386. + 
  15387. +         case 1000 + 500: 
  15388. +         case 1000 + 501: 
  15389. +         case 1000 + 552: 
  15390. +         case 2000 + 500: 
  15391. +         case 2000 + 501:
  15392. +         result = RP_PARM;
  15393. +         (void) smtalk (SM_RSET, "RSET");
  15394. +         free (cp);
  15395. +         goto losing0;
  15396. + 
  15397. +         case 2000 + 250:
  15398. +         case 2000 + 251:
  15399. +         sm_addrs++;
  15400. +             result = RP_OK;
  15401. +         break;
  15402. + 
  15403. +         case 2000 + 451: 
  15404. + #ifdef SENDMAILBUG
  15405. +         sm_addrs++;
  15406. +         result = RP_OK;
  15407. +         break;
  15408. + #endif
  15409. +         case 2000 + 421: 
  15410. +         case 2000 + 450: 
  15411. +         case 2000 + 452: 
  15412. +         result = RP_NO;
  15413. +         goto bad_addr;
  15414. + 
  15415. +         case 2000 + 550: 
  15416. +         case 2000 + 551: 
  15417. +         case 2000 + 552: 
  15418. +         case 2000 + 553: 
  15419. +         result = RP_USER;
  15420. + bad_addr: ;
  15421. +         if (k <= 0 || strcmp (sender, "<>\r\n") == 0)
  15422. +             break;
  15423. +         if (gp == NULL) {
  15424. +             int        l;
  15425. +             (void) sprintf (buffer, "%*.*sA.bulk", k, k, file);
  15426. +             if ((gp = fopen (buffer, "w+")) == NULL)
  15427. +             goto bad_data;
  15428. +             fprintf (gp, "MAIL FROM:<>\r\nRCPT TO:%sDATA\r\n", sender);
  15429. +             l = strlen (sender);
  15430. +             fprintf (gp,
  15431. +                  "To: %*.*s\r\nSubject: Invalid addresses (%s)\r\n",
  15432. +                  l - 4, l - 4, sender + 1, file);
  15433. +             fprintf (gp, "Date: %s\r\nFrom: Postmaster@%s\r\n\r\n",
  15434. +                  dtimenow (), LocalName ());
  15435. +         }
  15436. +         if (bp = index (dp, '\r'))
  15437. +             *bp = NULL;
  15438. +         fprintf (gp, "=>        %s\r\n", dp);
  15439. +         if (bp)
  15440. +             *bp = '\r';
  15441. +         fprintf (gp, "<= %s\r\n", rp_string (result));
  15442. +         (void) fflush (gp);
  15443. +         break;
  15444. + 
  15445. +         case 3000 + 354: 
  15446. + #ifdef SENDMAILBUG
  15447. + ok_data: ;
  15448. + #endif
  15449. +         result = RP_OK;
  15450. +         break;
  15451. + 
  15452. +         case 3000 + 451: 
  15453. + #ifdef SENDMAILBUG
  15454. +         goto ok_data;
  15455. + #endif
  15456. +         case 3000 + 421:
  15457. +         result = RP_NO;
  15458. + bad_data: ;
  15459. +         (void) smtalk (SM_RSET, "RSET");
  15460. +         free (cp);
  15461. +         if (gp) {
  15462. +             (void) sprintf (buffer, "%*.*sA.bulk", k, k, file);
  15463. +             (void) unlink (buffer);
  15464. +             (void) fclose (gp);
  15465. +         }
  15466. +         (void) fclose (fp);
  15467. +         return result;
  15468. + 
  15469. +         case 3000 + 500: 
  15470. +         case 3000 + 501: 
  15471. +         case 3000 + 503: 
  15472. +         case 3000 + 554: 
  15473. +         (void) smtalk (SM_RSET, "RSET");
  15474. +         free (cp);
  15475. +         goto no_dice;
  15476. + 
  15477. +         default:
  15478. +         result = RP_RPLY;
  15479. +         goto bad_data;
  15480. +     }
  15481. +     }
  15482. +     free (cp);
  15483. + 
  15484. +     {
  15485. +     struct stat st;
  15486. + 
  15487. + #ifdef SYS5
  15488. +     cc = BUFSIZ;
  15489. + #else
  15490. +     if (fstat (fileno (sm_wfp), &st) == NOTOK
  15491. +             || (cc = st.st_blksize) < BUFSIZ)
  15492. +         cc = BUFSIZ;
  15493. + #endif
  15494. +     if ((cp = malloc ((unsigned) cc)) == NULL) {
  15495. +         (void) smtalk (SM_RSET, "RSET");
  15496. +         sm_reply.length = strlen (strcpy (sm_reply.text, "out of memory"));
  15497. +         goto losing1;
  15498. +     }
  15499. +     }
  15500. +     (void) fseek (fp, pos, 0);
  15501. +     for (;;) {
  15502. +     int    eof = 0;
  15503. + 
  15504. +     for (dp = cp, i = cc; i > 0; dp += j, i -= j)
  15505. +         if ((j = fread (cp, sizeof *cp, i, fp)) == OK) {
  15506. +         if (ferror (fp)) {
  15507. +             (void) sprintf (bp = sm_reply.text,
  15508. +                     "error reading %s: ", file);
  15509. +             bp += strlen (bp);
  15510. +             if (errno > 0 && errno < sys_nerr)
  15511. +             (void) sprintf (bp, "%s", sys_errlist[errno]);
  15512. +             else
  15513. +             (void) sprintf (bp, "Error %d", errno);
  15514. +             sm_reply.length = strlen (sm_reply.text);
  15515. +             goto losing2;
  15516. +         }
  15517. +         cc = dp - cp;
  15518. +         eof = 1;
  15519. +         break;
  15520. +         }
  15521. + 
  15522. +     for (dp = cp, i = cc; i > 0; dp += j, i -= j)
  15523. +         if ((j = write (fileno (sm_wfp), dp, i)) == NOTOK)
  15524. +         goto losing3;
  15525. +         else
  15526. +         if (sm_debug) {
  15527. +             printf ("wrote %d octets to server\n", j);
  15528. +             (void) fflush (stdout);
  15529. +         }
  15530. + 
  15531. +     if (eof)
  15532. +         break;
  15533. +     }
  15534. +     free (cp);
  15535. + 
  15536. +     switch (smhear ()) {
  15537. +     case 250: 
  15538. +     case 251: 
  15539. + #ifdef SENDMAILBUG
  15540. + ok_dot: ;
  15541. + #endif
  15542. +         result = RP_OK;
  15543. +         (void) unlink (file);
  15544. +         break;
  15545. + 
  15546. +     case 451: 
  15547. + #ifdef SENDMAILBUG
  15548. +         goto ok_dot;
  15549. + #endif
  15550. +     case 452: 
  15551. +     default: 
  15552. +         result = RP_NO;
  15553. +         if (gp) {
  15554. +         (void) sprintf (buffer, "%*.*sA.bulk", k, k, file);
  15555. +         (void) unlink (buffer);
  15556. +         (void) fclose (gp);
  15557. +         gp = NULL;
  15558. +         }
  15559. +         break;
  15560. + 
  15561. +     case 552: 
  15562. +     case 554: 
  15563. + no_dice: ;
  15564. +         result = RP_NDEL;
  15565. +         if (k <= 0 || strcmp (sender, "<>\r\n") == 0) {
  15566. +         (void) unlink (file);
  15567. +         break;
  15568. +         }
  15569. +         if (gp) {
  15570. +         (void) fflush (gp);
  15571. +         (void) ftruncate (fileno (gp), 0L);
  15572. +         (void) fseek (gp, 0L, 0);
  15573. +         }
  15574. +             else {
  15575. +         (void) sprintf (buffer, "%*.*sA.bulk", k, k, file);
  15576. +         if ((gp = fopen (buffer, "w")) == NULL)
  15577. +             break;
  15578. +         }
  15579. +         fprintf (gp, "MAIL FROM:<>\r\nRCPT TO:%sDATA\r\n", sender);
  15580. +         i = strlen (sender);
  15581. +         fprintf (gp, "To: %*.*s\r\nSubject: Failed mail (%s)\r\n",
  15582. +              i - 4, i - 4, sender + 1, file);
  15583. +             fprintf (gp, "Date: %s\r\nFrom: Postmaster@%s\r\n\r\n",
  15584. +              dtimenow (), LocalName ());
  15585. +         break;
  15586. +     }
  15587. + 
  15588. +     if (gp) {
  15589. +     (void) fputs ("\r\n------- Begin Returned message\r\n\r\n", gp);
  15590. +     (void) fseek (fp, pos, 0);
  15591. +     while (fgets (buffer, sizeof buffer, fp)) {
  15592. +         if (buffer[0] == '-')
  15593. +         (void) fputs ("- ", gp);
  15594. +         if (strcmp (buffer, ".\r\n"))
  15595. +         (void) fputs (buffer, gp);
  15596. +     }
  15597. +     (void) fputs ("\r\n------- End Returned Message\r\n\r\n.\r\n", gp);
  15598. +     (void) fflush (gp);
  15599. +     if (!ferror (gp))
  15600. +         (void) unlink (file);
  15601. +     (void) fclose (gp);
  15602. +     }
  15603. +     (void) fclose (fp);
  15604. + 
  15605. +     return result;
  15606. + }
  15607. + #endif
  15608. + #endif /* MPOP */
  15609. + 
  15610. + /*   */
  15611. + 
  15612.   /* VARARGS */
  15613.   
  15614.   static int  sm_ierror (fmt, a, b, c, d)
  15615. ***************
  15616. *** 542,547 ****
  15617. --- 1022,1097 ----
  15618.       (void) fflush (stdout);
  15619.       }
  15620.   
  15621. + #ifdef    MPOP
  15622. +     if (sm_ispool) {
  15623. +     char    file[BUFSIZ];
  15624. + 
  15625. +     if (strcmp (buffer, ".") == 0)
  15626. +         time = SM_DOT;
  15627. +     fprintf (sm_wfp, "%s\r\n", buffer);
  15628. +     switch (time) {
  15629. +         case SM_DOT:
  15630. +             (void) fflush (sm_wfp);
  15631. +             if (ferror (sm_wfp))
  15632. +             return sm_werror ();
  15633. +         (void) sprintf (file, "%s%c.bulk", sm_tmpfil,
  15634. +                 (char) (sm_ispool + 'a' - 1));
  15635. +         if (rename (sm_tmpfil, file) == NOTOK) {
  15636. +             char   *bp;
  15637. +             (void) sprintf (bp = sm_reply.text,
  15638. +                     "error renaming %s to %s: ",
  15639. +                     sm_tmpfil, file);
  15640. +             bp += strlen (bp);
  15641. +             if (errno > 0 && errno < sys_nerr)
  15642. +             (void) sprintf (bp, "%s", sys_errlist[errno]);
  15643. +             else
  15644. +             (void) sprintf (bp, "Error %d", errno);
  15645. +             sm_reply.length = strlen (sm_reply.text);
  15646. +             sm_reply.code = NOTOK;
  15647. +             return RP_BHST;
  15648. +         }
  15649. +         (void) fclose (sm_wfp);
  15650. +         if (sm_wfp = fopen (sm_tmpfil, "w"))
  15651. +             (void) chmod (sm_tmpfil, 0600);
  15652. +         sm_ispool++;
  15653. +         /* and fall... */
  15654. + 
  15655. +         case SM_MAIL:
  15656. +         case SM_RCPT:
  15657. +             result = 250;
  15658. +         break;
  15659. + 
  15660. +         case SM_RSET:
  15661. +         (void) fflush (sm_wfp);
  15662. +         (void) ftruncate (fileno (sm_wfp), 0L);
  15663. +         (void) fseek (sm_wfp, 0L, 0);
  15664. +             result = 250;
  15665. +         break;
  15666. + 
  15667. +         case SM_DATA:
  15668. +             result = 354;
  15669. +         break;
  15670. + 
  15671. +         case SM_QUIT:
  15672. +         (void) unlink (sm_tmpfil);
  15673. +         sm_ispool = 0;
  15674. +             result = 221;
  15675. +         break;
  15676. + 
  15677. +         default:
  15678. +         result = 500;
  15679. +         break;
  15680. +     }
  15681. +     if (sm_debug) {
  15682. +         printf ("<= %d\n", result);
  15683. +         (void) fflush (stdout);
  15684. +     }
  15685. + 
  15686. +     sm_reply.text[sm_reply.length = 0] = NULL;
  15687. +     return (sm_reply.code = result);
  15688. +     }
  15689. + #endif /* MPOP */
  15690. + 
  15691.       sm_alarmed = 0;
  15692.       (void) alarm ((unsigned) time);
  15693.       if ((result = sm_wrecord (buffer, strlen (buffer))) != NOTOK)
  15694. ***************
  15695. *** 561,567 ****
  15696.       return sm_werror ();
  15697.   
  15698.       (void) fwrite (buffer, sizeof *buffer, len, sm_wfp);
  15699. !     fputs ("\r\n", sm_wfp);
  15700.       (void) fflush (sm_wfp);
  15701.   
  15702.       return (ferror (sm_wfp) ? sm_werror () : OK);
  15703. --- 1111,1117 ----
  15704.       return sm_werror ();
  15705.   
  15706.       (void) fwrite (buffer, sizeof *buffer, len, sm_wfp);
  15707. !     (void) fputs ("\r\n", sm_wfp);
  15708.       (void) fflush (sm_wfp);
  15709.   
  15710.       return (ferror (sm_wfp) ? sm_werror () : OK);
  15711. ***************
  15712. *** 574,580 ****
  15713.   register int     len;
  15714.   {
  15715.       register char  *bp;
  15716. !     static char lc = NULL;
  15717.   
  15718.       if (sm_wfp == NULL)
  15719.       return sm_werror ();
  15720. --- 1124,1130 ----
  15721.   register int     len;
  15722.   {
  15723.       register char  *bp;
  15724. !     static char lc = 0;
  15725.   
  15726.       if (sm_wfp == NULL)
  15727.       return sm_werror ();
  15728. ***************
  15729. *** 581,588 ****
  15730.   
  15731.       if (buffer == NULL && len == 0) {
  15732.       if (lc != '\n')
  15733. !         fputs ("\r\n", sm_wfp);
  15734. !     lc = NULL;
  15735.       return (ferror (sm_wfp) ? sm_werror () : OK);
  15736.       }
  15737.   
  15738. --- 1131,1138 ----
  15739.   
  15740.       if (buffer == NULL && len == 0) {
  15741.       if (lc != '\n')
  15742. !         (void) fputs ("\r\n", sm_wfp);
  15743. !     lc = 0;
  15744.       return (ferror (sm_wfp) ? sm_werror () : OK);
  15745.       }
  15746.   
  15747. ***************
  15748. *** 611,627 ****
  15749.   
  15750.   /*   */
  15751.   
  15752.   static int  sm_werror () {
  15753.       sm_reply.length =
  15754.   #ifdef    SMTP
  15755.       strlen (strcpy (sm_reply.text, sm_wfp == NULL ? "no socket opened"
  15756.           : sm_alarmed ? "write to socket timed out"
  15757.           : "error writing to socket"));
  15758. ! #else    not SMTP
  15759.       strlen (strcpy (sm_reply.text, sm_wfp == NULL ? "no pipe opened"
  15760.           : sm_alarmed ? "write to pipe timed out"
  15761.           : "error writing to pipe"));
  15762. ! #endif    not SMTP
  15763.   
  15764.       return (sm_reply.code = NOTOK);
  15765.   }
  15766. --- 1161,1191 ----
  15767.   
  15768.   /*   */
  15769.   
  15770. + #ifdef _AIX
  15771. + /*
  15772. +  * AIX by default will inline the strlen and strcpy commands by redefining
  15773. +  * them as __strlen and __strcpy respectively.  This causes compile problems
  15774. +  * with the #ifdef MPOP in the middle.  Should the #ifdef MPOP be removed,
  15775. +  * remove these #undefs.
  15776. +  */
  15777. + #undef strlen
  15778. + #undef strcpy
  15779. + #endif /* _AIX */
  15780. + 
  15781.   static int  sm_werror () {
  15782.       sm_reply.length =
  15783.   #ifdef    SMTP
  15784.       strlen (strcpy (sm_reply.text, sm_wfp == NULL ? "no socket opened"
  15785.           : sm_alarmed ? "write to socket timed out"
  15786. + #ifdef    MPOP
  15787. +         : sm_ispool ? "error writing to spool file"
  15788. + #endif
  15789.           : "error writing to socket"));
  15790. ! #else    /* !SMTP */
  15791.       strlen (strcpy (sm_reply.text, sm_wfp == NULL ? "no pipe opened"
  15792.           : sm_alarmed ? "write to pipe timed out"
  15793.           : "error writing to pipe"));
  15794. ! #endif    /* !SMTP */
  15795.   
  15796.       return (sm_reply.code = NOTOK);
  15797.   }
  15798. ***************
  15799. *** 641,647 ****
  15800.   
  15801.   again: ;
  15802.   
  15803. !     sm_reply.text[sm_reply.length = 0] = NULL;
  15804.   
  15805.       rp = sm_reply.text, rc = sizeof sm_reply.text - 1;
  15806.       for (more = FALSE; sm_rrecord (bp = buffer, &bc) != NOTOK;) {
  15807. --- 1205,1211 ----
  15808.   
  15809.   again: ;
  15810.   
  15811. !     sm_reply.text[sm_reply.length = 0] = 0;
  15812.   
  15813.       rp = sm_reply.text, rc = sizeof sm_reply.text - 1;
  15814.       for (more = FALSE; sm_rrecord (bp = buffer, &bc) != NOTOK;) {
  15815. ***************
  15816. *** 712,718 ****
  15817.       if (sm_rfp == NULL)
  15818.       return sm_rerror ();
  15819.   
  15820. !     buffer[*len = 0] = NULL;
  15821.   
  15822.       (void) fgets (buffer, BUFSIZ, sm_rfp);
  15823.       *len = strlen (buffer);
  15824. --- 1276,1282 ----
  15825.       if (sm_rfp == NULL)
  15826.       return sm_rerror ();
  15827.   
  15828. !     buffer[*len = 0] = 0;
  15829.   
  15830.       (void) fgets (buffer, BUFSIZ, sm_rfp);
  15831.       *len = strlen (buffer);
  15832. ***************
  15833. *** 724,730 ****
  15834.       else
  15835.       if (buffer[*len - 2] == '\r')
  15836.           *len -= 1;
  15837. !     buffer[*len - 1] = NULL;
  15838.   
  15839.       return OK;
  15840.   }
  15841. --- 1288,1294 ----
  15842.       else
  15843.       if (buffer[*len - 2] == '\r')
  15844.           *len -= 1;
  15845. !     buffer[*len - 1] = 0;
  15846.   
  15847.       return OK;
  15848.   }
  15849. ***************
  15850. *** 738,749 ****
  15851.           : sm_alarmed ? "read from socket timed out"
  15852.           : feof (sm_rfp) ? "premature end-of-file on socket"
  15853.           : "error reading from socket"));
  15854. ! #else    not SMTP
  15855.       strlen (strcpy (sm_reply.text, sm_rfp == NULL ? "no pipe opened"
  15856.           : sm_alarmed ? "read from pipe timed out"
  15857.           : feof (sm_rfp) ? "premature end-of-file on pipe"
  15858.           : "error reading from pipe"));
  15859. ! #endif    not SMTP
  15860.   
  15861.       return (sm_reply.code = NOTOK);
  15862.   }
  15863. --- 1302,1313 ----
  15864.           : sm_alarmed ? "read from socket timed out"
  15865.           : feof (sm_rfp) ? "premature end-of-file on socket"
  15866.           : "error reading from socket"));
  15867. ! #else    /* not SMTP */
  15868.       strlen (strcpy (sm_reply.text, sm_rfp == NULL ? "no pipe opened"
  15869.           : sm_alarmed ? "read from pipe timed out"
  15870.           : feof (sm_rfp) ? "premature end-of-file on pipe"
  15871.           : "error reading from pipe"));
  15872. ! #endif    /* not SMTP */
  15873.   
  15874.       return (sm_reply.code = NOTOK);
  15875.   }
  15876. ***************
  15877. *** 752,763 ****
  15878.   
  15879.   /* ARGSUSED */
  15880.   
  15881. ! static    int alrmser (i)
  15882.   int     i;
  15883.   {
  15884.   #ifndef    BSD42
  15885.       signal (SIGALRM, alrmser);
  15886. ! #endif    BSD42
  15887.       sm_alarmed++;
  15888.   
  15889.       if (sm_debug) {
  15890. --- 1316,1327 ----
  15891.   
  15892.   /* ARGSUSED */
  15893.   
  15894. ! static    TYPESIG alrmser (i)
  15895.   int     i;
  15896.   {
  15897.   #ifndef    BSD42
  15898.       signal (SIGALRM, alrmser);
  15899. ! #endif    /* BSD42 */
  15900.       sm_alarmed++;
  15901.   
  15902.       if (sm_debug) {
  15903. ***************
  15904. *** 817,819 ****
  15905. --- 1381,1447 ----
  15906.       (void) sprintf (buffer, "[%s] %3d %s", text, sm_reply.code, sm_reply.text);
  15907.       return buffer;
  15908.   }
  15909. + 
  15910. + /*   */
  15911. + 
  15912. + #ifdef    MPOP
  15913. + #ifdef    SMTP
  15914. + static char *broken[MAXARGS + 1];
  15915. + 
  15916. + 
  15917. + static char **brkstring (strg, brksep, brkterm)
  15918. + register char  *strg;
  15919. + register char  *brksep,
  15920. +                *brkterm;
  15921. + {
  15922. +     register int    bi;
  15923. +     register char   c,
  15924. +                    *sp;
  15925. + 
  15926. +     sp = strg;
  15927. + 
  15928. +     for (bi = 0; bi < MAXARGS; bi++) {
  15929. +     while (brkany (c = *sp, brksep))
  15930. +         *sp++ = 0;
  15931. +     if (!c || brkany (c, brkterm)) {
  15932. +         *sp = 0;
  15933. +         broken[bi] = 0;
  15934. +         return broken;
  15935. +     }
  15936. + 
  15937. +     broken[bi] = sp;
  15938. +     while ((c = *++sp) && !brkany (c, brksep) && !brkany (c, brkterm))
  15939. +         continue;
  15940. +     }
  15941. +     broken[MAXARGS] = 0;
  15942. + 
  15943. +     return broken;
  15944. + }
  15945. + 
  15946. + 
  15947. + static  brkany (chr, strg)
  15948. + register char   chr,
  15949. +                *strg;
  15950. + {
  15951. +     register char  *sp;
  15952. + 
  15953. +     if (strg)
  15954. +     for (sp = strg; *sp; sp++)
  15955. +         if (chr == *sp)
  15956. +         return 1;
  15957. +     return 0;
  15958. + }
  15959. + 
  15960. + 
  15961. + static char **copyip (p, q)
  15962. + register char **p,
  15963. +               **q;
  15964. + {
  15965. +     while (*p)
  15966. +     *q++ = *p++;
  15967. +     *q = 0;
  15968. + 
  15969. +     return q;
  15970. + }
  15971. + #endif
  15972. + #endif /* MPOP */
  15973. *** ../mh-6.7.2/papers/bboards/Makefile    Tue Mar  6 14:49:43 1990
  15974. --- papers/bboards/Makefile    Thu Feb 13 10:23:48 1992
  15975. ***************
  15976. *** 10,12 ****
  15977.   
  15978. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  15979.               \\nonstopmode\\input $<\\bye; \
  15980. --- 10,12 ----
  15981.   
  15982. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  15983.               \\nonstopmode\\input $<\\bye; \
  15984. *** ../mh-6.7.2/papers/beginners/beginners.tex    Tue May 17 15:38:24 1988
  15985. --- papers/beginners/beginners.tex    Thu Feb 13 10:34:58 1992
  15986. ***************
  15987. *** 4,5 ****
  15988. --- 4,7 ----
  15989.   
  15990. + %$Id: beginners.tex,v 1.2 1992/02/13 18:34:49 jromine Exp $
  15991. + 
  15992.   \def\oneline#1{\par\bigskip\leftline{\tt\hskip.75in#1}}
  15993. ***************
  15994. *** 22,23 ****
  15995. --- 24,28 ----
  15996.   for Xeroxing in suite CS408.
  15997. + \footnote{This document is specific to the environment
  15998. + at the ICS department of U.~C.~Irvine.  For a more general document,
  15999. + see {\sl The Rand MH Message Handling System: Tutorial\/}.}
  16000.   
  16001. *** /dev/null    Tue Dec 15 08:01:10 1992
  16002. --- papers/changes/MHCHANGES    Thu Oct 29 14:54:48 1987
  16003. ***************
  16004. *** 0 ****
  16005. --- 1,1539 ----
  16006. +                MHCHANGES from MH 6.1 to MH 6.5
  16007. + 
  16008. + 
  16009. + Tue Nov 12 11:24:46 1985  /mtr <mrose@nrtc-gremlin>
  16010. + 
  16011. +     MH 6.1 is official.
  16012. + 
  16013. + 
  16014. + Fri Nov 15 19:14:44 1985  /mtr <mrose@nrtc-gremlin>
  16015. + 
  16016. +     uip/{rcvtty,slocal}.c: touch-ups
  16017. + 
  16018. + 
  16019. + Sun Nov 17 16:28:23 1985  /mtr <mrose@nrtc-gremlin>
  16020. + 
  16021. +     conf/doc/{ap,mhl,repl,scan}.rf: note that #ifdef BERK kills
  16022. +         address parsing
  16023. +     conf/makefiles/{doc,uip,support/*,zotnet/*}: make tar command visible
  16024. +     sbr/m_convert.c: oops, new message numbering resulted in bad
  16025. +         diagnostic
  16026. +     papers/*/Makefile: fix LaTeX rule for v2.08
  16027. + 
  16028. + 
  16029. + Tue Nov 19 23:06:16 1985  /mtr <mrose@nrtc-gremlin>
  16030. + 
  16031. +     uip/send.c: de-referencing NULL due to bad precedence, tsk
  16032. + 
  16033. + 
  16034. + Wed Nov 20 10:58:40 1985  /mtr <mrose@nrtc-gremlin>
  16035. + 
  16036. +     MH 6.1 covert update for sbr/m_convert.c, uip/send.c
  16037. + 
  16038. + 
  16039. + Sun Nov 24 18:58:41 1985  /mtr <mrose@nrtc-gremlin>
  16040. + 
  16041. +     uip/slocal.c: some tuning, also fix a bug in usr_pipe()
  16042. +     uip/dropsbr.c: have mbx_copy support noisy
  16043. +     uip/{packf,post,rcvpack,sbboards,slocal}.c: use this change
  16044. + 
  16045. + 
  16046. + Tue Nov 26 00:22:17 1985  /mtr <mrose@nrtc-gremlin>
  16047. + 
  16048. +     uip/refile.c: oops, forgot copy-back on optimzied m_remsg
  16049. + 
  16050. + 
  16051. + Sat Nov 30 22:36:49 1985  /mtr <mrose@nrtc-gremlin>
  16052. + 
  16053. +     zotnet/tws/dtime.c: add #ifdef INETONLY
  16054. +     uip/post.c: for #ifdef BERK don't say {Local,UUCP,Network}
  16055. +         Recipients
  16056. +     conf/doc/sortm.rf: note problem with errors
  16057. +     uip/bbc.c: for getbbvis() insist on readability
  16058. +     support/bboards/bbexp.c: oops, calling pick wrong
  16059. +     conf/doc/pick.rf: document -datefield anomaly
  16060. +     conf/makefiles/support/bboards: oops, left context owned by root
  16061. +     h/mh.h: ruserpass -> _ruserpass for SUN.  why?
  16062. + 
  16063. + 
  16064. + Sun Dec  1 07:58:50 1985  /mtr <mrose@nrtc-gremlin>
  16065. + 
  16066. +     uip/vmh.c: remove double-scroll
  16067. +     uip/annosbr.c: oops, closing fd: without unlocking!
  16068. +     sbr/makedir.c: plug an obscure security hole in inc
  16069. +     uip/mhlsbr.c: read_termcap being called prematurely
  16070. +     zotnet/tws/dtime.c: load tw_sday appropriately
  16071. +     zotnet/tws/*.c: try using numeric timezone for official renditions,
  16072. +         under #ifdef MTR for now
  16073. + 
  16074. + 
  16075. + Sun Dec  1 16:11:03 1985  /mtr <mrose@nrtc-gremlin>
  16076. + 
  16077. +     uip/inc.c: more idiotic de-referncing of NULL, found on SUNs
  16078. +     uip/replsbr.c: ditto
  16079. +     uip/show.c: recognize more of mhl's switches
  16080. + 
  16081. + 
  16082. + Wed Dec  4 23:38:06 1985  /mtr <mrose@nrtc-gremlin>
  16083. + 
  16084. +     zotnet/mts/mts.h: oops for MMDFONLY
  16085. +     conf/{mh-gen.8,makefiles/zotnet/mts}: talk about -Dlocname
  16086. + 
  16087. + 
  16088. + Thu Dec  5 19:55:11 1985  /mtr <mrose@nrtc-gremlin>
  16089. + 
  16090. +     uip/scansbr.c: fix machine dependency pointed out by Chuck Collins
  16091. +     dist/READ-ME: new file talking about make bug
  16092. +     COVER-LETTER, conf/{mh-gen.8,doc/MH.rf}: change UCI -> UCI.EDU
  16093. + 
  16094. + 
  16095. + Fri Dec  6 11:08:20 1985  /mtr <mrose@nrtc-gremlin>
  16096. + 
  16097. +     support/bboards/mmdfII/gen: wrong filename
  16098. + 
  16099. + 
  16100. + Sun Dec  8 18:39:01 1985  /mtr <mrose@nrtc-gremlin>
  16101. + 
  16102. +     uip/send.c: always remove dist file
  16103. +     uip/vmh.c: work on erase-word handling, a bit
  16104. +     uip/folder.c: -fast -vs- -pack fixup
  16105. +     uip/mhlsbr.c: %text defined for date fields
  16106. + 
  16107. + 
  16108. + Tue Dec 10 18:39:37 1985  /mtr <mrose@nrtc-gremlin>
  16109. + 
  16110. +     zotnet/mts/client.c: moved from mts/sendmail/client.c
  16111. +     conf/makefiles/{mts/sendmail,zotnet/mts}: changed
  16112. +     mts/support/llib-lsendmail, zotnet/mts/llib-lmts: changed
  16113. +     mts/sendmail/client.c: 4.2BSD specific only!
  16114. +     conf/config/mts.c, zotnet/mts/mts.h: update
  16115. +     conf/mhconfig.c: update
  16116. +     conf/Makefile: simplify
  16117. + 
  16118. + 
  16119. + Tue Dec 10 21:11:45 1985  /mtr <mrose@nrtc-gremlin>
  16120. + 
  16121. +     conf/mh-gen.8: clear up some sys5 stuff
  16122. +     zotnet/mf/umhook.c: sys5-ize
  16123. +     uip/addrsbr.c: alternate-mailboxes: defaulted wrong under #ifdef
  16124. +         BERK, it's now "<userid>*"
  16125. +     conf/doc/mh-profile.rf: fix documentation to reflect reality
  16126. + 
  16127. + 
  16128. + Tue Dec 10 22:38:23 1985  /mtr <mrose@nrtc-gremlin>
  16129. + 
  16130. +     uip/addrsbr.c: normalize a bit (finally)
  16131. +     uip/addrsbr.c: new routine adrsprintf() to remove #ifdef BANG
  16132. +         dependencies
  16133. +     uip/{post,rcvdist,replsbr,sbboards}.c: use adrsprintf()
  16134. +     uip/post.c: remove #ifdef MF dependency for stand-alone MH,
  16135. +         remove #ifdef DUMB dependency by making addrsbr.c smarter
  16136. +         about being dumber
  16137. +     mts/mmdf/hosts.c: remove #ifdef DUMB dependency (right now,
  16138. +         addrsbr:getm() is the only one that calls it and it doesn't
  16139. +         call it under #ifdef DUMB...
  16140. + 
  16141. + 
  16142. + Tue Dec 10 23:28:20 1985  /mtr <mrose@nrtc-gremlin>
  16143. + 
  16144. +     uip/sbboards.c: oops, typo found by lint
  16145. + 
  16146. + 
  16147. + Wed Dec 11 19:08:20 1985  /mtr <mrose@nrtc-gremlin>
  16148. + 
  16149. +     miscellany/libndir: -lndir for non-BSD sites, graciously supplied
  16150. +         by Kirk McKusick
  16151. + 
  16152. + 
  16153. + Tue Dec 17 08:36:59 1985  /mtr <mrose@nrtc-gremlin>
  16154. + 
  16155. +     uip/send.c: different alert announcement based on -forward
  16156. + 
  16157. + 
  16158. + Tue Dec 17 08:53:52 1985  /mtr <mrose@nrtc-gremlin>
  16159. + 
  16160. +     conf/makefiles/sbr, sbr/cndfree.c: clean-up a bit
  16161. + 
  16162. + 
  16163. + Tue Dec 17 18:26:34 1985  /mtr <mrose@nrtc-gremlin>
  16164. + 
  16165. +     sbr/m_getfld.c, uip/{format,mhl,pick}sbr.c: clean-up indirection
  16166. +         code for less tolerant compilers
  16167. +     uip/bbc.c: add -[no]rcfile switch
  16168. +     uip/msh.c: clean up a diagnostic
  16169. + 
  16170. + 
  16171. + Tue Dec 17 21:42:44 1985  /mtr <mrose@nrtc-gremlin>
  16172. + 
  16173. +     conf/makefiles/sbr, h/mh.h, sbr/llib-lmh: cndfree() removed
  16174. +     sbr/{add,m_{delete,replace}}.c, uip/{mhl,vmh}sbr.c: replace cndfree
  16175. +     sbr/m_foil.c, uip/install-mh.c: compensate
  16176. + 
  16177. + 
  16178. + Wed Dec 18 13:37:09 1985  /mtr <mrose@nrtc-gremlin>
  16179. + 
  16180. +     uip/bbc.c: make second, optimized pass to catch private bboards
  16181. +         that the user knows about
  16182. +     uip/popsbr.c: ditto
  16183. +     uip/popser.c: slight tune-up
  16184. + 
  16185. + 
  16186. + Wed Dec 18 20:27:38 1985  /mtr <mrose@nrtc-gremlin>
  16187. + 
  16188. +     uip/slocal.c: minor touch up
  16189. +     uip/umhook.c: moved from zotnet/mf
  16190. + 
  16191. + 
  16192. + Wed Dec 18 22:51:58 1985  /mtr <mrose@nrtc-gremlin>
  16193. + 
  16194. +     uip/bbc.c: optimize on calling mshproc, check size of maildrop
  16195. +         first; if empty, don't invoke it!
  16196. + 
  16197. + 
  16198. + Thu Dec 19 08:16:54 1985  /mtr <mrose@nrtc-gremlin>
  16199. + 
  16200. +     uip/refile.c: better diagnostic from Fred Blonder
  16201. + 
  16202. + 
  16203. + Thu Dec 19 22:34:23 1985  /mtr <mrose@nrtc-gremlin>
  16204. + 
  16205. +     zotnet/mts/client.c: #ifdef BIND code when no gethostent()
  16206. +     conf/{mh-gen.8,doc/mh-tailor.rf}: document it
  16207. + 
  16208. + 
  16209. + Thu Dec 19 23:58:44 1985  /mtr <mrose@nrtc-gremlin>
  16210. + 
  16211. +     Release MH 6.2 to selected sites, including Berkeley for 4.3BSD testing
  16212. + 
  16213. + 
  16214. + Sun Dec 29 19:58:43 1985  /mtr <mrose@nrtc>
  16215. + 
  16216. +     zotnet/mts/client.c: fix #ifdef BIND stuff a bit
  16217. +     h/mshsbr.h, uip/{mhlsbr,msh,mshcmds}.c: try to fix lost peer
  16218. +         problems...
  16219. +     conf/doc/vmh.rf: update
  16220. +     zotnet/drop/lock.c: not returning right errno
  16221. +     uip/dropsbr.c: ditto, plus not trying enough
  16222. +     conf/makefiles/doc: "make tar" forgetting tmac.h
  16223. +     uip/addrsbr.c: strcpy de-referencing NULL
  16224. +     uip/refile.c: got rid of a spurious \n (!!)
  16225. +     conf/examples/{udel,nrtc-mtr}: new files
  16226. +     h/mh.h, sbr/m_{convert,gmsg}.c, uip/{msh,rcvstore,refile}.c: fix
  16227. +         LOWSEL logic
  16228. +     uip/vmh.c: fix slight bug in sideground handling (misspelled
  16229. +         #ifdef, oops!)
  16230. +     conf/{mh-gen.8,config/mts.c},mts/*/hosts.c: remove the NETWORK option
  16231. + 
  16232. + 
  16233. + Mon Dec 30 20:03:25 1985  /mtr <mrose@nrtc>
  16234. + 
  16235. +     conf/Makefile: options mangled(!?!)
  16236. +     uip/msh.c: if update of mailbox fails, it gets zero'd(!!)
  16237. +         (oops, not checking error condition)
  16238. +     support/pop/popser.c: if update of mailbox fails, clean-up
  16239. +         correctly (no zero problem here!)
  16240. +     uip/inc.c: on truncate of maildrop, remove mailbox map (XXX)
  16241. +     conf/makefiles/uip, uip/{send,whatnowsbr}.c: move send into
  16242. +         the WhatNow shell
  16243. +     uip/sendsbr.c: new file
  16244. +     conf/doc/whatnow.rf: update
  16245. + 
  16246. + 
  16247. + Tue Dec 31 10:13:44 1985  /mtr <mrose@nrtc>
  16248. + 
  16249. +     conf/doc/vmh.rf: back-down last update
  16250. +     conf/mh-gen.8: forgot an \&
  16251. +     conf/examples/nrtc-{gw,mtr}, h/rcvmail.h: tsk, NRTC running an old
  16252. +         MMDF-II
  16253. + 
  16254. + 
  16255. + Tue Dec 31 13:53:14 1985  /mtr <mrose@nrtc>
  16256. + 
  16257. +     conf/doc/whatnow.rf, uip/whatnowsbr.c: remove "headers" option
  16258. +     conf/doc/ADMIN.rf: clear-up post -debug documentation
  16259. +     conf/doc/{mh-chart,send,post}.rf, uip/{post,send,whatnowsbr}.c: remove
  16260. +         -[no]remove switches
  16261. +     uip/{repl,post}.c: some touch-ups
  16262. + 
  16263. + 
  16264. + Tue Dec 31 19:16:23 1985  /mtr <mrose@nrtc>
  16265. + 
  16266. +     zotnet/tws/{dtime,dtimep}.c: dst fix-ups
  16267. +     conf/doc/send.rf: append, not prepend
  16268. +     uip/rmail.c: slight touch-up
  16269. +     uip/ap.c: oops, not printing all info
  16270. +     zotnet/mf/mf.c: botching trailing comment handling!
  16271. +     uip/scansbr.c: have cpy() omit trailing >>blank<<
  16272. +     sbr/m_gmsg.c: not zero'ing msgstats[] under non-MTR code
  16273. + 
  16274. + 
  16275. + Tue Dec 31 22:23:43 1985  /mtr <mrose@nrtc>
  16276. + 
  16277. +     conf/doc/mhook.rf: minor typos
  16278. +     miscellany/rcvtrip/*: update
  16279. + 
  16280. + 
  16281. + Tue Dec 31 23:21:21 1985  /mtr <mrose@nrtc>
  16282. + 
  16283. +     uip/mhlsbr.c: a bit more pipe trickyness (this gets old real fast)
  16284. +     conf/doc/ADMIN.rf: talk about popd and /etc/rc.local
  16285. +     papers/{myths,mznet}/Makefile: update
  16286. +     uip/bbc.c: augment XTND2 botch diagnostic
  16287. +     uip/msh.c: if popd says BBoard-ID: for a message is 0, read it
  16288. +         ourselves
  16289. + 
  16290. + 
  16291. + Fri Jan  3 13:11:03 1986  /mtr <mrose@nrtc-gremlin>
  16292. + 
  16293. +     uip/bbc.c: SIGTSTP race condition, #undef for now
  16294. + 
  16295. + 
  16296. + Sun Jan  5 20:06:03 1986  /mtr (agent: Marshall Rose) <uci@dewey>
  16297. + 
  16298. +           -- Interface TTI TMA to MH #6.2 --
  16299. +     [ N.B.: The TTI TMA is NOT in the public domain; the MH support for
  16300. +         the TTI TMA IS in the public domain! ]
  16301. +     conf/{mh-gen.8,mhconfig.c,doc/ADMIN.rf}: support "tma on"
  16302. +     conf/makefiles/{doc,uip}: ditto
  16303. +     Makefile: for the moment
  16304. + 
  16305. + 
  16306. + Mon Jan  6 15:25:20 1986  /mtr <mrose@nrtc-gremlin>
  16307. + 
  16308. +     uip/{msh,mshcmds}.c: work on refile
  16309. +     uip/{vmh,msh}.c: support FAST quit (no final refresh on
  16310. +         updated mailbox)
  16311. + 
  16312. + 
  16313. + Tue Jan  7 15:06:05 1986  /mtr <mrose@nrtc-gremlin>
  16314. + 
  16315. +     uip/bbc.c: got the SIGTSTP problem, now wait on child to stop prior
  16316. +         to stopping ourselves...
  16317. + 
  16318. + 
  16319. + Wed Jan  8 23:16:10 1986  /mtr <mrose@nrtc-gremlin>
  16320. + 
  16321. +     uip/trmsbr.c: better defaults for "li" and "co"
  16322. + 
  16323. + 
  16324. + Thu Jan  9 15:29:09 1986  /mtr <mrose@nrtc-gremlin>
  16325. + 
  16326. +            -- Fixes Suggested by Craig Partridge --
  16327. +     support/bboards/mmdfII/bboards/mmdfonly.h: if V4_2BSD on, set BSD42
  16328. +     conf/doc/{mhl,show}.rf: talk more about moreproc
  16329. +     uip/mhlsbr.c: have INTR work as advertised
  16330. +     uip/{send,whatnowsbr}.c: link on dist botched, oops!
  16331. + 
  16332. + 
  16333. + Thu Jan  9 16:31:28 1986  /mtr <mrose@nrtc-gremlin>
  16334. + 
  16335. +     uip/mshcmds.c: don't rmm() messages which don't get refiled
  16336. +     uip/vmh.c: truncate stuff on Scan window (finally)
  16337. +     uip/scansbr.c: work on diagnostics a bit
  16338. + 
  16339. + 
  16340. + Thu Jan  9 22:37:29 1986  /mtr <mrose@nrtc-gremlin>
  16341. + 
  16342. +     MH 6.2 is official, awaiting enhancements Berkeley!
  16343. + 
  16344. + 
  16345. + Fri Jan 10 10:17:57 1986  /mtr <mrose@nrtc-gremlin>
  16346. + 
  16347. +     uip/sbboards.c: botch multiple bboard handling (forgot to rewind
  16348. +         input, thanks to Larry Henry)
  16349. +     support/bboards/mmdfII/bboards/bb_wtmail.c: not handling errors
  16350. +         right
  16351. +     sbr/cpydgst.c: stay symmetric with change to bb_wtmail.c, the code
  16352. +         worked fine, adding matching braces for clarity (!!)
  16353. + 
  16354. + 
  16355. + Sun Jan 12 14:01:25 1986  /mtr <mrose@nrtc-gremlin>
  16356. + 
  16357. +     miscellany/mh-e: new version from James Larus
  16358. + 
  16359. + 
  16360. + Sun Jan 12 22:58:34 1986  /mtr <mrose@nrtc-gremlin>
  16361. + 
  16362. +     uip/bbc.c: getbbvis a bit too agressive, use popd algorithm
  16363. + 
  16364. + 
  16365. + Wed Jan 15 04:43:33 1986  /mtr <mrose@nrtc-gremlin>
  16366. + 
  16367. +     miscellany/netnews/: more stuff
  16368. + 
  16369. + 
  16370. + Wed Jan 15 18:44:32 1986  /mtr <mrose@nrtc-gremlin>
  16371. + 
  16372. +     uip/addrsbr.c: ismymbox() losing under #ifdef DUMB, oops!
  16373. + 
  16374. + 
  16375. + Wed Jan 15 19:03:54 1986  /mtr <mrose@nrtc-gremlin>
  16376. + 
  16377. +     COVER-LETTER: update
  16378. + 
  16379. + 
  16380. + Wed Jan 15 23:15:54 1986  /mtr <mrose@nrtc-gremlin>
  16381. + 
  16382. +     support/pop/popsbr.c: pophack on PASS command
  16383. + 
  16384. + 
  16385. + Fri Jan 17 13:19:23 1986  /mtr <mrose@nrtc-gremlin>
  16386. + 
  16387. +     uip/ali.c: add -noalias for RaJ
  16388. + 
  16389. + 
  16390. + Wed Jan 22 11:13:08 1986  /mtr <mrose@nrtc-gremlin>
  16391. + 
  16392. +     support/pop/popwrd.c: squash bug
  16393. +     h/mh.h: remove sigmask definition
  16394. +     uip/{bbc,vmh}.c: add sigmask if not defined in <signal.h>
  16395. +         (4.3BSD finally wised up!)
  16396. + 
  16397. + 
  16398. + Sun Jan 26 16:57:18 1986  /mtr <mrose@nrtc-gremlin>
  16399. + 
  16400. +     {conf/makefiles/uip,uip/post.c}: lint touch-up
  16401. +     conf/doc/{inc,mh-chart,send,post}.rf: add the #ifdef TMA stuff
  16402. +     sbr/m_remsg.c: tuning
  16403. +     uip/mark.c: re-arrange debug output slightly
  16404. +     h/mh.h: add some padding to fix some m_remsg bugs
  16405. +     uip/{inc,rcvstore}.c: oops, mp -> hghmsg not keeping pace with
  16406. +         m_remsg!
  16407. + 
  16408. + 
  16409. + Mon Jan 27 17:51:07 1986  /mtr <mrose@nrtc-gremlin>
  16410. + 
  16411. +     uip/whatnowsbr.c: forgot to put -[no]push for built-in send
  16412. +     h/addrsbr.h, uip/{addrsbr,post}.c: introduce auxformat(), the
  16413. +         back-end to adrformat(); post calls auxformat directly in
  16414. +         certain cases
  16415. +     uip/{dp,forw}.c: was cheating on adrformat, now on auxformat
  16416. + 
  16417. + 
  16418. + Fri Jan 31 13:25:17 1986  /mtr <mrose@nrtc-gremlin>
  16419. + 
  16420. +     COVER-LETTER: update
  16421. +     support/general/mhl.format: Remove length/width constraints
  16422. + 
  16423. + 
  16424. + Sun Feb  2 14:01:28 1986  /mtr <mrose@nrtc-gremlin>
  16425. + 
  16426. +     zotnet/tws/dtime.c: twsort() fix from John Romine for ALTOS
  16427. +     uip/addrsbr.c: smarter ismymbox for default case
  16428. +     conf/{mh-gen.8,doc/repl.rf}, uip/repl.c: add #ifdef ATHENA code
  16429. + 
  16430. + 
  16431. + Sun Feb  2 20:47:36 1986  /mtr <mrose@nrtc-gremlin>
  16432. + 
  16433. +     miscellany/replies/: new directory
  16434. + 
  16435. + 
  16436. + Mon Feb  3 11:21:49 1986  /mtr <mrose@nrtc-gremlin>
  16437. + 
  16438. +     uip/whatnowsbr.c: oops, slight dist botch
  16439. +     support/general/mhl.format: make date display user-friendly
  16440. +     conf/mh-gen.8: clean-up descriptions of options
  16441. +     uip/sbboards.c: normalize code wrt to MMDF-II BBoards channel
  16442. +     uip/msh.c: when running under vmh and not in control of TTY,
  16443. +         ignore TSTP so BPOP can spool ahead!
  16444. +     papers/{usenix/usenix,multifarious/multifarios,trusted/trusted}.tex:
  16445. +         fix up banners a bit
  16446. + 
  16447. + 
  16448. + Wed Feb  5 09:32:08 1986  /mtr <mrose@nrtc-gremlin>
  16449. + 
  16450. +     support/bboards/mmdfII/READ-ME: update
  16451. + 
  16452. + 
  16453. + Wed Feb  5 11:25:05 1986  /mtr <mrose@nrtc-gremlin>
  16454. +     
  16455. +     MH 6.3 #1[UCI] (nrtc-gremlin) is official, still awaiting Berkeley
  16456. +         enhancements
  16457. + 
  16458. + 
  16459. + Wed Feb  5 14:42:55 1986  /mtr <mrose@nrtc-gremlin>
  16460. + 
  16461. +     zotnet/tws/{tws.h,dtime.c}: new argument to dasctime()
  16462. +     uip/{format,pick}sbr.c: make use of it
  16463. + 
  16464. + 
  16465. + Sun Feb  9 22:14:10 1986  /mtr <mrose@nrtc-gremlin>
  16466. + 
  16467. +     support/pop/syslog.c: #ifdef BSD43 means use standard syslog
  16468. + 
  16469. + 
  16470. + Sun Feb 16 15:40:20 1986  /mtr <mrose@nrtc-gremlin>
  16471. + 
  16472. +     sbr/m_setvis.c: oops, fix-up unseen sequence stuff
  16473. +     uip/whatnowsbr.c: oops, a couple of typos
  16474. + 
  16475. + 
  16476. + Sun Feb 16 19:11:33 1986  /mtr <mrose@nrtc-gremlin>
  16477. + 
  16478. +     -- Incorporate Berkeley enhancements, courtesy of Van Jacobson --
  16479. +     h/{format,scan}sbr.h: updated for new formatsbr stuff
  16480. +     h/mh.h: updated for new m_getfld
  16481. +     conf/MH: new default file
  16482. +     conf/config/config.c: support spost under BERK and SENDMTS
  16483. +     conf/mhconfig.c: support new zotnet/fmt/ directory
  16484. +     conf/makefiles/uip: support spost
  16485. +     conf/makefiles/zotnetM: support new zotnet/fmt/ directory
  16486. +     conf/makefiles/zotnet/fmt: new Makefile
  16487. +     conf/makefiles/zotnet/tws: support for new lex-based date parser
  16488. +     sbr/m_gmsg.c,uip/msh.c: change init of READONLY
  16489. +     sbr/m_getfld.c: re-written, super optimized!
  16490. +     support/general/{digestcomps,mhl.digest,mhl.forward,scan.*}: use
  16491. +         new fmt stuff
  16492. +     zotnet/fmt/: new directory
  16493. +     zotnet/tws/{dtimep.lex,lexedit.sed,lexstring.c}: new files
  16494. +     zotnet/tws/dtime.c: update
  16495. +     uip/{forw,scan,scansbr}.c: use new format stuff
  16496. +     uip/{inc,mhlsbr,mshcmds,replsbr}.c: use new format stuff
  16497. +     uip/trmsbr.c: use stderr for ioctl()s
  16498. +     uip/spost.c: new file
  16499. +     uip/{addr,format}sbr.c: remove, they're in zotnet/fmt/
  16500. + 
  16501. + 
  16502. + Sun Feb 16 23:04:34 1986  /mtr <mrose@nrtc-gremlin>
  16503. + 
  16504. +     zotnet/fmt/: move into sbr/ to avoid loading problems
  16505. +     sbr/{addrsbr,formatsbr,fmtcompile,formataddr}.c: new files
  16506. +     h/fmtcompile.h: new file
  16507. +     conf/makefiles/{sbr,zotnetM}: update
  16508. +     sbr/llib-lmh: update
  16509. + 
  16510. + 
  16511. + Mon Feb 17 20:14:35 1986  /mtr <mrose@nrtc-gremlin>
  16512. + 
  16513. +     support/general/scan.{time,size}: mday/month inverted
  16514. +     sbr/{formatsbr,fmtcompile}.c: bring upto date with MH 6.3+
  16515. +     sbr/formatsbr.c: missing tzone/sday/dst handling!
  16516. +     h/scansbr.h: slight update
  16517. +     uip/scansbr.c: try using formataddr() routine to do "correct"
  16518. +         formatting of scan'd addresses, didn't work! use friendly
  16519. +     zotnet/tws/dtimep.lex: tsk, use lint!  also, fix numeric timezones
  16520. +     sbr/addrsbr.c: some ismymbox fixes for non-BERK code (from 6.3)
  16521. +     sbr/formatsbr.c: not priming the pump!
  16522. +     h/fmtcompile.h, sbr/{formatsbr,fmtcompile}.c: add "friendly"
  16523. +     support/general/scan.time2: call it scan.timely
  16524. +     conf/makefiles/support/general: support scan.timely
  16525. + 
  16526. + 
  16527. + Tue Feb 18 01:13:51 1986  /mtr <mrose@nrtc-gremlin>
  16528. + 
  16529. +     h/formatsbr.h: updates from Van
  16530. + 
  16531. + 
  16532. + Tue Feb 18 02:15:00 1986  /mtr <mrose@nrtc-gremlin>
  16533. + 
  16534. +     uip/bbc.c: upgrade for new m_getfld()
  16535. +     support/general/scan.*, h/scansbr.h: still more changes
  16536. +     support/general/replcomps: still more changes
  16537. + 
  16538. + 
  16539. + Tue Feb 18 22:14:51 1986  /mtr <mrose@nrtc-gremlin>
  16540. + 
  16541. +     sbr/m_getfld.c: eom_action() lacking argument
  16542. +     sbr/m_getfld.c: not working right on packf'd files
  16543. +     uip/{msh,mshcmds}.c: under BPOP, need to fix things so m_getfld()
  16544. +         doesn't dump core!
  16545. + 
  16546. + 
  16547. + Wed Feb 19 00:16:55 1986  /mtr <mrose@nrtc-gremlin>
  16548. + 
  16549. +     uip/dist.c, support/general/distcomps, sbr/fmtcompile.c: updates
  16550. +         from Van
  16551. +     sbr/formatsbr.c: remove ismymbox prime
  16552. +     sbr/fmtcompile.c: use adios(), not exit()!
  16553. + 
  16554. + 
  16555. + Wed Feb 19 00:56:30 1986  /mtr <mrose@nrtc-gremlin>
  16556. + 
  16557. +     sbr/m_getfld.c: different fix for packf'd files from Van
  16558. + 
  16559. + 
  16560. + Wed Feb 19 01:55:40 1986  /mtr <mrose@nrtc-gremlin>
  16561. + 
  16562. +     h/mh.h: add msg_* vars in m_getfld() as externs
  16563. +     uip/{msh,{repl,scan}sbr}.c: remove msg_* declarations
  16564. +     sbr/m_getfld.c: add a bit of BODYEOF support (without slowing it
  16565. +         down, wouldn't want to upset Van!)
  16566. + 
  16567. + 
  16568. + Wed Feb 19 03:11:42 1986  /mtr <mrose@nrtc-gremlin>
  16569. + 
  16570. +     sbr/{formataddr,fmtcompile,m_{draft,getfld,maildir},printsw,pwd}.c:
  16571. +         lint it
  16572. +     uip/{formatsbr,forw,msh,replsbr,scan,scansbr,spost}.c: lint it
  16573. +     support/pop/popser.c: lint it
  16574. +     sbr/formatsbr.c: remove MHFMTDEBUG code
  16575. +     */Makefile: depend 'em
  16576. + 
  16577. + 
  16578. + Wed Feb 19 10:50:04 1986  /mtr <mrose@nrtc-gremlin>
  16579. + 
  16580. +     papers/mh6.4: new interim documentation directory, for 4.3BSD
  16581. +     conf/doc/{MH,ap,dp,mh,mh-chart,mhl,repl,scan}.rf: update
  16582. +     conf/doc/mh-format.rf: new file
  16583. +     support/general/replcomps: oops, should call formataddr on all
  16584. +         addrs
  16585. + 
  16586. + 
  16587. + Thu Feb 20 08:07:49 1986  /mtr <mrose@nrtc-gremlin>
  16588. + 
  16589. +     uip/{a,d}p.c: start working on it
  16590. +     h/formatsbr.h: new variable fmt_norm
  16591. +     sbr/formatsbr.c: use it
  16592. +     h/fmtcompile.c, sbr/{fmtcompile,formatsbr}.c: define "pretty"
  16593. +     sbr/formataddr.c: sight touch-up
  16594. +     uip/formatsbr.c: oops, bug in PUTD()
  16595. +     uip/{fmtcompile,formatsbr}.c: init mn structures in case of error.
  16596. +         This is still buggy since: 1) the structure still doesn't get
  16597. +         reset on errors, and 2) you can still dereference nulls
  16598. +     zotnet/tws/dtimep.lex: slight touch-up
  16599. + 
  16600. + 
  16601. + Thu Feb 20 19:55:20 1986  /mtr <mrose@nrtc-gremlin>
  16602. + 
  16603. +     uip/mhlsbr.c: add formatsbr support
  16604. +     sbr/addrsbr.c: use better default matching in ismymbox
  16605. +     miscellany/mtrenv: update
  16606. +     support/general/mhl.*: update
  16607. + 
  16608. + 
  16609. + Thu Feb 20 22:57:33 1986  /mtr <mrose@nrtc-gremlin>
  16610. +     
  16611. +     MH 6.4 #1[UCI] (nrtc-gremlin) made available to Van Jacobson
  16612. +         for inclusion in 4.3BSD UNIX
  16613. + 
  16614. + 
  16615. + Sun Feb 23 13:59:46 1986  /mtr <mrose@nrtc-gremlin>
  16616. + 
  16617. +     sbr/m_gmsg.c: big bug fix from Terry West.  Thanks, Terry!
  16618. +     h/strings.h: System5 bcopy-equivalents from Doug Gwyn
  16619. +     zotnet/tws/tws.h: support #ifdef ATZ
  16620. +     conf/makefiles/uip: slight lint botch
  16621. + 
  16622. + 
  16623. + Mon Feb 24 17:14:39 1986  /mtr <mrose@nrtc-gremlin>
  16624. + 
  16625. +     uip/inc.c: have -host/-file ask if file doesn't exist
  16626. +     uip/{packf,mshcmds}.c: ditto
  16627. + 
  16628. + 
  16629. + Tue Feb 25 08:08:43 1986  /mtr <mrose@nrtc-gremlin>
  16630. + 
  16631. +     uip/burst.c: another realloc() fix from Terry West
  16632. +     sbr/vfgets.c: ditto
  16633. +     support/pop/popser.c: enhancmenets from Dave Cohrs
  16634. +     conf/doc/pop5.rf: document it
  16635. +     conf/mhconfig.c: support "debug" directive
  16636. +     makefiles/*: use it
  16637. + 
  16638. + 
  16639. + Tue Feb 25 09:47:09 1986  /mtr <mrose@nrtc-gremlin>
  16640. + 
  16641. +     uip/{scan,mshcmds}.c: slight touch-ups
  16642. +     uip/mhlsbr.c: fix up SIGPIPE handling, again
  16643. +     support/general/scan.time: fix up for numeric timezone
  16644. +     uip/scansbr.c: re-support "encrypted"
  16645. +     uip/msh.c: add "exit" command for Dave Farber
  16646. +     miscellany/convert: new directory
  16647. + 
  16648. + 
  16649. + Tue Feb 25 17:45:28 1986  /mtr <mrose@nrtc-gremlin>
  16650. + 
  16651. +     h/mshsbr.h, uip/msh*.c: add direct folder support for symmetry's
  16652. +         sake, ugh!
  16653. + 
  16654. + 
  16655. + Wed Feb 26 21:05:46 1986  /mtr <mrose@nrtc-gremlin>
  16656. + 
  16657. +     uip/sendsbr.c: better diagnostics when post fails
  16658. + 
  16659. + 
  16660. + Thu Feb 27 22:12:53 1986  /mtr <mrose@nrtc-gremlin>
  16661. + 
  16662. +                  -- Van sends updates --
  16663. +     conf/makefiles/uip, h/fmtcompile.h,
  16664. +     sbr/{format{addr,sbr},fmtcompile,addrsbr}.c,
  16665. +     support/general/replcomps, uip/{repl,mhl,scan,whatnow}sbr.c
  16666. + 
  16667. + 
  16668. + Thu Feb 27 22:16:43 1986  /mtr <mrose@nrtc-gremlin>
  16669. + 
  16670. +     sbr/formataddr.c: remove <strings.h>
  16671. +     sbr/addrsbr.c: Van doesn't like "user*" instead of "user" as the
  16672. +         default is-my-mailbox for BERK.  Since he's the BERK-author, I'll
  16673. +         assume he knows what he's doing...
  16674. +     support/general/replcomps: Use "tws", instead of "pretty" for
  16675. +         in-reply-to:
  16676. +     uip/whatnowsbr.c: If -draft{folder,message} and -nodraftfolder are
  16677. +         added as no-ops, make them "hidden" from -help output
  16678. +     uip/{{a,d}p,forw,mhlsbr}.c: update
  16679. + 
  16680. + 
  16681. + Mon Mar  3 10:18:40 1986  /mtr <mrose@nrtc-gremlin>
  16682. + 
  16683. +                -- Van sends fixes to my updates --
  16684. +     uip/mshcmds.c: not resetting scansbr for formatting
  16685. +     uip/scansbr.c: oops, typo!
  16686. + 
  16687. + 
  16688. + Mon Mar  3 16:53:19 1986  /mtr <mrose@nrtc-gremlin>
  16689. + 
  16690. +     uip/sendsbr.c: oops, close() on an uninitialized variable! (thanks
  16691. +         to Jim Koda)
  16692. + 
  16693. + 
  16694. + Tue Mar  4 08:15:17 1986  /mtr <mrose@nrtc-gremlin>
  16695. + 
  16696. +                -- Van sends fixes to my updates --
  16697. +     uip/mhlsbr.c: not resetting mhlsbr for formatting
  16698. +     zotnet/tws/dtimep.lex: not getting MIL-TZ's right
  16699. + 
  16700. + 
  16701. + Tue Mar  4 09:53:31 1986  /mtr <mrose@nrtc-gremlin>
  16702. + 
  16703. +     papers/usenix/: change to realwork/
  16704. + 
  16705. + 
  16706. + Wed Mar  5 12:48:58 1986  /mtr <mrose@nrtc-gremlin>
  16707. + 
  16708. +     dist/READ-ME: oops, forgot usenix name change
  16709. +     conf/makefiles/uip: hmm, interesting loader problem
  16710. + 
  16711. + 
  16712. + Thu Mar  6 13:36:26 1986  /mtr <mrose@nrtc-gremlin>
  16713. + 
  16714. +     uip/addrsbr.c: yet another fix for ismymbox()
  16715. +     uip/replsbr.c: #ifdef ISI code to avoid duplicate replies (due to
  16716. +         Jim Koda)
  16717. + 
  16718. + 
  16719. + Sun Mar  9 14:04:26 1986  /mtr <mrose@nrtc-gremlin>
  16720. + 
  16721. +     conf/mh-gen.8: add a line about chown and sys5
  16722. +     sbr/m_convert.c: better BADRNG diagnostic
  16723. +     uip/mshcmds.c: oops, typo
  16724. + 
  16725. + 
  16726. + Sun Mar  9 14:06:54 1986  /mtr <mrose@nrtc-gremlin>
  16727. + 
  16728. +     h/scansbr.h, sbr/fmtcompile.c: better versions from Van
  16729. +     support/general/{replcomps,scan.timely}: better versions from Van
  16730. +         (snuck the %pretty instead of %tws in, eh Van?)
  16731. +     support/general/{digestcomps,mhl.forward,scan.{size,time}}: update
  16732. + 
  16733. + 
  16734. + Sun Mar  9 18:52:37 1986  /mtr <mrose@nrtc-gremlin>
  16735. + 
  16736. +     h/scansbr.h, support/general/{digestcomps,mhl.forward,scan.*}: update
  16737. + 
  16738. + 
  16739. + Sun Mar  9 20:09:35 1986  /mtr <mrose@nrtc-gremlin>
  16740. + 
  16741. +     zotnet/bboards/bboards.h: add BB_REMOTE flag for bbc
  16742. +     uip/bbc.c: support BB_REMOTE, under #ifdef MTR for the moment
  16743. +     uip/bbc.c: allow bb_aka (again?!?)
  16744. + 
  16745. + 
  16746. + Mon Mar 10 00:43:19 1986  /mtr <mrose@nrtc-gremlin>
  16747. + 
  16748. +     uip/{msh,mshcmds}.c: packf hack, ala refile hack
  16749. +     uip/{post,rcvdist}.c, support/bboards/mmdfII/bboards/bb_wtmail.c:
  16750. +         MMDF-II nameserver support from Steve Kille
  16751. + 
  16752. + 
  16753. + Mon Mar 10 10:17:29 1986  /mtr <mrose@nrtc-gremlin>
  16754. + 
  16755. +     {sbr/formatsbr,uip/scansbr}.c: more optimizations from Van!
  16756. +     sbr/m_getfld.c: Van fixes problems due to losing vanilla-4.2 C
  16757. +         optimizer!
  16758. +     sbr/m_getfld.c: slight touch-up by MTR
  16759. +     uip/bbc.c: remove #ifdef MTR bracketing, code works fine
  16760. +     uip/refile.c: slight touch-ups
  16761. +     sbr/m_getfld.c: on xxxERR returns, forgetting to zero value buffer
  16762. + 
  16763. + 
  16764. + Mon Mar 10 18:08:37 1986  /mtr <mrose@nrtc-gremlin>
  16765. + 
  16766. +     uip/post.c: fix handling of (in)visible addresses
  16767. +     uip/rcvdist.c: re-do to use format facility
  16768. +     uip/{replsbr,forw}.c: touch-ups
  16769. +     conf/config/config.c, h/mh.h: new variable rcvdistcomps
  16770. +     conf/{makefiles/{uip,support/general},doc/mhook.rf}: update
  16771. +     sbr/m_getfld.c: bstring() support for non BSD42, SYS5 systems
  16772. +     conf/doc/ADMIN.rf: update
  16773. + 
  16774. + 
  16775. + Tue Mar 11 19:43:27 1986  /mtr <mrose@nrtc-gremlin>
  16776. + 
  16777. +     h/dropsbr.h, uip/dropsbr.c: new routines mbx_read() and mbx_write()
  16778. +     uip/{msh,mshcmds}.c, support/pop/popser.c: use it
  16779. +     h/{addr,format,scan}sbr.h, sbr/addrsbr.c: slight touch-up
  16780. +     uip/inc.c: slight touch-up
  16781. + 
  16782. + 
  16783. + Sun Mar 16 15:20:27 1986  /mtr <mrose@nrtc-gremlin>
  16784. + 
  16785. +     miscellany/mem: appointment diary support from Ken Yap
  16786. + 
  16787. + 
  16788. + Wed Mar 19 23:00:53 1986  /mtr <mrose@nrtc-gremlin>
  16789. + 
  16790. +     support/pop/popser.c: one last fix for ENOENT mailboxes
  16791. + 
  16792. + 
  16793. + Wed Mar 19 23:12:54 1986  /mtr <mrose@nrtc-gremlin>
  16794. + 
  16795. +                -- Changes for MMDF-IIb --
  16796. +     uip/post.c, support/bboards/mmdfII/bboards/bb_wtmail.c: know about
  16797. +         new mm_winit protocol and RP_NS/RP_DOK responses
  16798. + 
  16799. + 
  16800. + Thu Mar 20 23:05:10 1986  /mtr <mrose@nrtc-gremlin>
  16801. + 
  16802. +     uip/mhlsbr.c: mhl enhancement from JLR permitting a prefix string
  16803. +         for each line of the body (e.g, "component="    > ")
  16804. + 
  16805. + 
  16806. + Fri Mar 21 21:12:39 1986  /mtr <mrose@nrtc-gremlin>
  16807. + 
  16808. +     conf/doc/{MH,mh-format}.rf: typos
  16809. + 
  16810. + 
  16811. + Sat Mar 22 11:51:45 1986  /mtr <mrose@nrtc-gremlin>
  16812. + 
  16813. +              -- Fixes from Phyllis Kantar --
  16814. +     uip/dropsbr.c: typo
  16815. +     conf/doc/{send,pick}.rf: typos
  16816. +     conf/makefiles/doc: forgot $(OPTIONSn) in $(MAN1) definition
  16817. + 
  16818. + 
  16819. + Sat Mar 22 18:24:35 1986  /mtr <mrose@nrtc-gremlin>
  16820. + 
  16821. +     uip/mhmail.c: handle -body better
  16822. + 
  16823. + 
  16824. + Mon Mar 31 15:07:26 1986  /mtr <mrose@nrtc-gremlin>
  16825. + 
  16826. +     uip/replsbr.c: handle bad addresses with better diagnostics
  16827. + 
  16828. + 
  16829. + Wed Apr  2 17:17:32 1986  /mtr <mrose@nrtc-gremlin>
  16830. + 
  16831. +     sbr/addrsbr.c: slight typo in comment
  16832. + 
  16833. + 
  16834. + Sun Apr  6 19:22:52 1986  /mtr <mrose@nrtc-gremlin>
  16835. + 
  16836. +     uip/inc.c: forgot to initialize some FILE*'s; dumps core on
  16837. +         celerity
  16838. + 
  16839. + 
  16840. + Mon Apr  7 09:55:23 1986  /mtr <mrose@nrtc-gremlin>
  16841. + 
  16842. +     mts/sendmail/smail.c: slight "client" check
  16843. + 
  16844. + 
  16845. + Wed Apr  9 12:04:56 1986  /mtr <mrose@nrtc-gremlin>
  16846. + 
  16847. +              -- Van fixes some more bugs --
  16848. +     sbr/m_getfld.c: not handling buffer boundary cases right
  16849. +     uip/replsbr.c: not adding "," correctly when concatenating an
  16850. +         address string during message scan
  16851. +     sbr/formatsbr.c: mymbox test dumped core if address parse failed
  16852. +     h/{fmtcompile,formatsbr}.h, sbr/{fmtcompile,formatsbr}.c: more
  16853. +         enhancements
  16854. + 
  16855. + 
  16856. + Wed Apr  9 12:36:58 1986  /mtr <mrose@nrtc-gremlin>
  16857. + 
  16858. +             -- MTR actually gets to fix something! --
  16859. +     sbr/m_getfld.c: messages with an empty body caused inc to
  16860. +         prematurely think the maildrop had reached EOF.  Believe it
  16861. +         or not, the mhmail fix last month exercised this!
  16862. + 
  16863. + 
  16864. + Wed Apr  9 22:08:37 1986  /mtr <mrose@nrtc-gremlin>
  16865. + 
  16866. +     uip/vmh.c: output non-standard control characters in carat format
  16867. + 
  16868. + 
  16869. + Thu Apr 10 02:26:52 1986  /mtr <mrose@nrtc-gremlin>
  16870. + 
  16871. +     Makefile: touch-up "make distribution"
  16872. +     conf/examples/nrtc-*-mtr: remove
  16873. +     conf/makefiles/uip: touch-up
  16874. +     conf/doc/MH.rf: add TMA stuff, conditionally
  16875. + 
  16876. + 
  16877. + Thu Apr 10 03:47:48 1986  /mtr <mrose@nrtc-gremlin>
  16878. + 
  16879. +     sbr/m_getfld.c: Van fixes Marshall's fix
  16880. + 
  16881. + 
  16882. + Thu Apr 10 10:42:25 1986  /mtr <mrose@nrtc-gremlin>
  16883. + 
  16884. +     uip/scansbr.c: recognize the 822 "Encrypted:" header instead of
  16885. +         doing a uprf() on the body
  16886. +     uip/{scan,mshcmds}.c: recognize SCNENC return from scan ()
  16887. + 
  16888. + 
  16889. + Thu Apr 10 15:06:59 1986  /mtr <mrose@nrtc-gremlin>
  16890. + 
  16891. +     conf/config/bboards.*: mail reports to PostMaster
  16892. + 
  16893. + 
  16894. + Sat Apr 12 16:32:21 1986  /mtr <mrose@nrtc-gremlin>
  16895. + 
  16896. +     uip/post.c: try to keep fcc:s under MH-directory so links are
  16897. +         maintained
  16898. + 
  16899. + 
  16900. + Mon Apr 14 22:56:46 1986  /mtr <mrose@nrtc-gremlin>
  16901. + 
  16902. +     support/bboards/bbexp.c: not ending msh correctly, msh tried
  16903. +         to update the maildrop even though it was already locked
  16904. +         by bbexp
  16905. + 
  16906. + 
  16907. + 
  16908. + Mon Apr 14 23:52:03 1986  /mtr <mrose@nrtc-gremlin>
  16909. + 
  16910. +     sbr/m_getfld.c: locc() not range checking on cnt
  16911. + 
  16912. + 
  16913. + Thu Apr 17 13:25:20 1986  /mtr <mrose@nrtc-gremlin>
  16914. + 
  16915. +     sbr/addrsbr.c: fix from Terry West, more alternate-mailbox misery
  16916. + 
  16917. + 
  16918. + Thu Apr 17 20:51:53 1986  /mtr <mrose@nrtc-gremlin>
  16919. + 
  16920. +     zotnet/mts/lock.c: add some more #ifdefs to support stand-alone
  16921. +         locking library
  16922. +     conf/examples/udel*: update
  16923. +     papers/myths/: remove
  16924. +     conf/makefile/papers: update
  16925. + 
  16926. + 
  16927. + Mon Apr 21 10:22:09 1986  /mtr <mrose@nrtc-gremlin>
  16928. + 
  16929. +     zotnet/mf/mf.c: sanity check in getadrx() on string to parse
  16930. + 
  16931. + 
  16932. + Mon Apr 21 17:31:43 1986  /mtr <mrose@nrtc-gremlin>
  16933. + 
  16934. +     uip/{inc,post}.c: slight mods for TMA mods
  16935. +     conf/doc/mh-chart.rf: ditto
  16936. + 
  16937. + 
  16938. + Thu Apr 24 00:19:35 1986  /mtr <mrose@nrtc-gremlin>
  16939. + 
  16940. +     conf/doc/mh-chart.rf: slight mods for TMA mods
  16941. + 
  16942. + 
  16943. + Thu Apr 24 10:34:06 1986  /mtr <mrose@nrtc-gremlin>
  16944. + 
  16945. +     zotnet/mts/lock.c: lint touch-up
  16946. +     support/pop/popd.c: ditto
  16947. + 
  16948. + 
  16949. + Thu Apr 24 19:37:09 1986  /mtr <mrose@nrtc-gremlin>
  16950. + 
  16951. +     conf/doc/ADMIN.rf: typos
  16952. + 
  16953. + 
  16954. + Thu Apr 24 20:13:28 1986  /mtr <mrose@nrtc-gremlin>
  16955. + 
  16956. +     uip/msgchk.c: print out last read date
  16957. +     conf/makefiles/uip: add tws dependency
  16958. + 
  16959. + 
  16960. + Thu Apr 24 23:53:57 1986  /mtr <mrose@nrtc-gremlin>
  16961. + 
  16962. +                   -- From Craig Partridge --
  16963. +     support/bboards/mmdfII/bboards/*: bug fixes for MMDF-IIb
  16964. +     conf/mh-gen.8: mention that MMDF-IIb has the BBoards distribution
  16965. + 
  16966. + 
  16967. + Fri Apr 25 00:01:50 1986  /mtr <mrose@nrtc-gremlin>
  16968. + 
  16969. +     conf/ADMIN.rf: slight touch-up
  16970. + 
  16971. + 
  16972. + Fri Apr 25 10:47:19 1986  /mtr <mrose@nrtc-gremlin>
  16973. + 
  16974. +     uip/trmsbr.c: use stdout (not stderr) for termcap checking
  16975. + 
  16976. + 
  16977. + Fri Apr 25 13:39:55 1986  /mtr <mrose@nrtc-gremlin>
  16978. + 
  16979. +                -- From Craig Partridge --
  16980. +     support/bboards/mmdfII/bboards/getbbent.c: bad field in BBoards file
  16981. +         causes hang, note it and skip!
  16982. + 
  16983. + 
  16984. + Sun Apr 27 17:23:56 1986  /mtr <mrose@nrtc-gremlin>
  16985. + 
  16986. +     uip/scansbr.c: recognition of 822 Encrypted: header a bit botched
  16987. +     h/scansbr.h, support/general/scan.*: support encrypted
  16988. + 
  16989. + 
  16990. + Mon Apr 28 21:00:21 1986  /mtr <mrose@nrtc-gremlin>
  16991. + 
  16992. +             -- Yet Another Fix from Terry --
  16993. +     uip/dropsbr.c: another typo
  16994. + 
  16995. + 
  16996. + Tue Apr 29 20:17:11 1986  /mtr <mrose@nrtc-gremlin>
  16997. + 
  16998. +     conf/doc/mhook.rf: extra tip with SendMail and slocal
  16999. + 
  17000. + 
  17001. + Thu May  1 15:30:07 1986  /mtr <mrose@nrtc-gremlin>
  17002. + 
  17003. +                -- From Craig Partridge --
  17004. +     support/pop/mmdfII/pop/READ-ME: fixes
  17005. + 
  17006. + 
  17007. + Fri May  2 16:35:11 1986  /mtr <mrose@nrtc-gremlin>
  17008. + 
  17009. +               -- More Bug Fixes from Van --
  17010. +     uip/scansbr.c: check return from fclose()
  17011. +     uip/inc.c: avoid locking/stat race condition
  17012. +     sbr/m_sync.c: lock signals out during update of sequences
  17013. + 
  17014. + 
  17015. + Fri May  2 17:02:01 1986  /mtr <mrose@nrtc-gremlin>
  17016. + 
  17017. +     uip/show.c: WHATNOW botch fixed by Jim Valerio
  17018. + 
  17019. + 
  17020. + Sat May  3 01:37:15 1986  /mtr <mrose@nrtc-gremlin>
  17021. + 
  17022. +     sbr/{m_{sync,update},pidwait}.c, uip/{bbc,sendsbr,vmh}: inspired
  17023. +         by Van's 4.2BSD signal optimizations
  17024. + 
  17025. + 
  17026. + Sat May  3 02:49:29 1986  /mtr <mrose@nrtc-gremlin>
  17027. + 
  17028. +     zotnet/tws/{tws.h,dtime.c,dtimep.lex}: fixes for DST
  17029. +     conf/makefiles/zotnet/tws: add -n to lex's invocation
  17030. + 
  17031. + 
  17032. + Sun May  4 13:28:23 1986  /mtr <mrose@nrtc-gremlin>
  17033. + 
  17034. +     uip/msgchk.c: change the "last read" message to use alpha-timezones
  17035. + 
  17036. + 
  17037. + Sun May  4 14:18:15 1986  /mtr <mrose@nrtc-gremlin>
  17038. + 
  17039. +     support/general/replcomps: use %tws instead of %pretty
  17040. +     support/general/mhl.*: streamline slight
  17041. + 
  17042. + 
  17043. + Sun May  4 16:10:36 1986  /mtr <mrose@nrtc-gremlin>
  17044. + 
  17045. +     conf/doc/mh.rf: forgot about TMA stuff
  17046. +     conf/makefiles/doc: forgot rcvstore
  17047. + 
  17048. + 
  17049. + Sun May  4 17:49:43 1986  /mtr <mrose@nrtc-gremlin>
  17050. + 
  17051. +     sbr/pidwait.c, uip/{bbc,sendsbr,vmh}.c: back off signal handling
  17052. +         modifications
  17053. + 
  17054. + Sun May  4 18:08:47 1986  /mtr <mrose@nrtc-gremlin>
  17055. + 
  17056. +     MH 6.5 #1[UCI] (nrtc-gremlin) made available to Van Jacobson
  17057. +         for inclusion in 4.3BSD UNIX
  17058. + 
  17059. + 
  17060. + Mon May  5 13:32:37 1986  /mtr <mrose@nrtc-gremlin>
  17061. + 
  17062. +     uip/trmsbr.c: try Van's version for a while
  17063. +     miscellany/patch: updates from Van
  17064. + 
  17065. + 
  17066. + Mon May  5 16:07:12 1986  /mtr <mrose@nrtc-gremlin>
  17067. + 
  17068. +     support/bboards/mmdfII/bboards/bb_wtmail.c: patch for IDIOTIC change
  17069. +         in qu_rtxt()
  17070. + 
  17071. + 
  17072. + Wed May  7 13:16:45 1986  /mtr <mrose@nrtc-gremlin>
  17073. + 
  17074. +     uip/post.c: modification for fcc:s broke stand-alone behavior for
  17075. +         daemons, etc.; use old method as a fall-back
  17076. +     sbr/m_foil.c: also improve modification a bit
  17077. +     support/pop/smtpd.c: dead weight
  17078. + 
  17079. + 
  17080. + Thu May  8 17:50:22 1986  /mtr <mrose@nrtc-gremlin>
  17081. + 
  17082. +     support/bboards/bbexp.c: set the mode on the archive file if
  17083. +         creating it, since m_gmprot() isn't a good default for this
  17084. +         application
  17085. + 
  17086. + 
  17087. + Sun May 11 12:40:34 1986  /mtr <mrose@nrtc-gremlin>
  17088. + 
  17089. +     miscellany/scripts/READ-ME: add amhmail description
  17090. +     miscellany/scripts/amhmail.sh: new script
  17091. + 
  17092. + 
  17093. + Mon May 12 09:12:39 1986  /mtr <mrose@nrtc-gremlin>
  17094. + 
  17095. +     sbr/m_getfld.c: new version of matchc() from Van that doesn't
  17096. +         give the SUN indigestion
  17097. + 
  17098. + 
  17099. + Tue May 13 07:59:36 1986  /mtr <mrose@nrtc-gremlin>
  17100. + 
  17101. +     uip/replsbr.c: some fixes from Van
  17102. + 
  17103. + 
  17104. + Tue May 13 15:14:07 1986  /mtr <mrose@nrtc-gremlin>
  17105. + 
  17106. +                -- Some Fixes from Hokey --
  17107. +     uip/vmh.c: a few more SYS5 dependencies
  17108. +     zotnet/tws/dtimep.lex: added #include strings.h
  17109. +     conf/makefiles/zotnet/tws: added dependency for above
  17110. +     uip/post.c: pre-emptive reference of discard to help SYS5 loader
  17111. +     conf/examples/plus5: update
  17112. +     miscellany/less/Makefile: add SHELL=/bin/sh
  17113. +     sbr/m_getfld.c: slight redeclaration for SYS5
  17114. + 
  17115. + 
  17116. + Tue May 13 17:44:47 1986  /mtr <mrose@nrtc-gremlin>
  17117. + 
  17118. +     sbr/{fmtcompile,formatsbr}.c, support/pop/popwrd.c,
  17119. +     uip/{ap,inc,rcvtty,post,spost,whatnowsbr}.c:
  17120. +         add some lint stuff
  17121. +     conf/makefiles/uip: better lint support for TMA
  17122. + 
  17123. + 
  17124. + Thu May 15 16:36:19 1986  /mtr <mrose@nrtc-gremlin>
  17125. + 
  17126. +     uip/{inc,msgchk,post,send}.c: improve #define-dependent
  17127. +         switches declarations
  17128. + 
  17129. + 
  17130. + Thu May 15 17:09:34 1986  /mtr <mrose@nrtc-gremlin>
  17131. + 
  17132. +     uip/msgchk.c, conf/doc/{mh-chart,msgchk}.rf: add -[no]date,
  17133. +         and -[no]notify type switches
  17134. + 
  17135. + 
  17136. + Tue May 20 19:09:15 1986  /mtr <mrose@nrtc-gremlin>
  17137. + 
  17138. +     uip/scan.c: free'ing a static, tsk
  17139. + 
  17140. + 
  17141. + Tue May 20 22:51:13 1986  /mtr <mrose@nrtc-gremlin>
  17142. + 
  17143. +                  -- From Steve Smith --
  17144. +     conf/examples/ridge: config file
  17145. +     sbr/{m_gmsg,pwd}.c: although SYS5, uses <ndir.h>
  17146. +     uip/show.c: not null-terminating argvector
  17147. +     uip/{bbc,vmh}.c: although SYS5, has SIGTSTP
  17148. +     uip/sbboards.c: pre-emptive reference of discard to help SYS5 loader
  17149. +     conf/{mh-gen.8,mhconfig.c}: add "oldload none"
  17150. + 
  17151. + 
  17152. + Wed May 21 10:10:21 1986  /mtr <mrose@nrtc-gremlin>
  17153. + 
  17154. +     uip/{rcvdist,replsbr}.c: malloc/free fixes from Steve Smith
  17155. + 
  17156. + 
  17157. + Wed May 21 20:51:47 1986  /mtr <mrose@nrtc-gremlin>
  17158. + 
  17159. +     conf/{mh-gen.8,doc/{ADMIN,MH}.rf, papers/*/*, COVER-LETTER: update
  17160. +         mail addresses
  17161. + 
  17162. + 
  17163. + Thu May 22 08:05:03 1986  /mtr <mrose@nrtc-gremlin>
  17164. + 
  17165. +             -- Two New Documents from UCI --
  17166. +     conf/makefiles/{papers,dist}: update
  17167. +     dist/READ-ME: remove
  17168. +     conf/doc/MH.rf: update
  17169. +     papers/beginners: new paper "MH for Beginners"
  17170. +     papers/mh4mm: new paper "MH for MM Users"
  17171. + 
  17172. + 
  17173. + Thu May 22 08:13:17 1986  /mtr <mrose@nrtc-gremlin>
  17174. + 
  17175. +     conf/mh-gen.rf: update
  17176. + 
  17177. + 
  17178. + Thu May 22 15:08:06 1986  /mtr <mrose@nrtc-gremlin>
  17179. + 
  17180. +     support/general/replcomps: typo
  17181. + 
  17182. + 
  17183. + Tue May 27 19:35:38 1986  /mtr <mrose@nrtc-gremlin>
  17184. + 
  17185. +     support/pop/popd.c: support for 4.3BSD syslog
  17186. + 
  17187. + 
  17188. + Wed May 28 12:44:21 1986  /mtr <mrose@nrtc-gremlin>
  17189. + 
  17190. +     sbr/fmtcompile.c: allow literal '%'s in format files
  17191. + 
  17192. + 
  17193. + Wed May 28 16:56:40 1986  /mtr <mrose@nrtc-gremlin>
  17194. + 
  17195. +     conf/examples/nrtc-gremlin: add -125 switch for GHS compiler
  17196. +     sbr/getans.c,uip/{mhlsbr,prompter,rcvtty,sendsbr}.c: a bit more
  17197. +         careful with the setjmp()
  17198. + 
  17199. + 
  17200. + Thu May 29 23:42:54 1986  /mtr <mrose@nrtc-gremlin>
  17201. + 
  17202. +     support/general/scan.mailx: mailx scan format from Bob Simpson of
  17203. +         plus5
  17204. +     support/general/mhl.body: format from mtrenv
  17205. + 
  17206. + 
  17207. + Sun Jun  1 23:07:24 1986  /mtr <mrose@nrtc-gremlin>
  17208. + 
  17209. +     uip/trmsbr.c: add sc_hardcopy()
  17210. +     uip/mhlsbr.c: use it so we don't fork a more on hardcopy ttys
  17211. +     conf/doc/mhl.rf: document it
  17212. + 
  17213. + 
  17214. + Fri Jun  6 10:56:40 1986  /mtr <mrose@nrtc-gremlin>
  17215. + 
  17216. +     miscellany/less/screen.c: handle HP terminals better
  17217. + 
  17218. + Tue 10 Jun 86 15:34    John Romine    <jromine@nrtc-gremlin>
  17219. + 
  17220. +     h/scansbr.h: eliminate superfluous space from default format
  17221. +         string
  17222. + 
  17223. + 
  17224. + Fri 13 Jun 86 10:29    John Romine    <jromine@nrtc-gremlin>
  17225. + 
  17226. +     h/scansbr.h, support/general/scan.{timely,time,size}: add ">>" at
  17227. +         end of body in format string
  17228. + 
  17229. + 
  17230. + Fri Jun 13 15:28:10 1986  /mtr <mrose@nrtc-gremlin>
  17231. + 
  17232. +     sbr/addrsbr.c: another #ifdef BERK fix for the SUN
  17233. + 
  17234. + 
  17235. + Fri Jun 13 20:08:36 1986  /mtr <mrose@nrtc-gremlin>
  17236. + 
  17237. +     uip/aliasbr.c: not testing for relative names correctly
  17238. + 
  17239. + 
  17240. + Sun Jun 15 14:20:10 1986  /mtr <mrose@nrtc-gremlin>
  17241. + 
  17242. +     h/scansbr.h, support/general/scan.{timely,time,size}: remove JLR's
  17243. +         fix since it doesn't work right
  17244. + 
  17245. + 
  17246. + Mon Jun 16 19:56:09 1986  /mtr <mrose@nrtc-gremlin>
  17247. + 
  17248. +     sbr/{m_gmsg,pwd}.c, uip/{bbl,conflict,folder,rmf}.c: add NDIR
  17249. +         compile-time option if -lndir include file is called <ndir.h>
  17250. +         instead of <dir.h> (non BSD systems)
  17251. +     h/local.h: new file to make this easier
  17252. + 
  17253. + 
  17254. + Tue Jun 17 10:44:06 1986  /mtr <mrose@nrtc-gremlin>
  17255. + 
  17256. +     uip/trmsbr.c: no TIOCGWINSZ working on 4.2BSD ULTRIX!
  17257. + 
  17258. + 
  17259. + Tue Jun 17 14:21:08 1986  /mtr <mrose@nrtc-gremlin>
  17260. + 
  17261. +     uip/scan.c: forgot to make -header always force ATZ behavior
  17262. + 
  17263. + 
  17264. + Tue Jun 17 15:23:27 1986  /mtr <mrose@nrtc-gremlin>
  17265. + 
  17266. +     h/mh.h: add vfork for hpux
  17267. + 
  17268. + 
  17269. + Wed Jun 18 11:05:40 1986  /mtr <mrose@nrtc-gremlin>
  17270. + 
  17271. +     support/bboards/bbexp.c: create archives in BBMODE format, private
  17272. +         bboards should have archives created by the BBoards user (just
  17273. +         like the standard file)
  17274. + 
  17275. + 
  17276. + Wed Jun 18 19:57:09 1986  /mtr <mrose@nrtc-gremlin>
  17277. + 
  17278. +     uip/vmh.c: sanitize for 8-bit whacko characters
  17279. + 
  17280. + 
  17281. + Thu Jun 19 19:51:43 1986  /mtr <mrose@nrtc-gremlin>
  17282. + 
  17283. +     zotnet/tws/dtimep.lex: fix spelling for august
  17284. + 
  17285. + 
  17286. + Mon Jun 23 20:45:35 1986  /mtr <mrose@nrtc-gremlin>
  17287. + 
  17288. +     uip/vmh.c: Bob gives us another sys5 fix
  17289. + 
  17290. + 
  17291. + Sun Jun 29 21:11:30 1986  /mtr <mrose@nrtc-gremlin>
  17292. + 
  17293. +     sbr/addrsbr.c: yet another fix for the SUN (yaffts)
  17294. +     conf/mhconfig.c: if both mts/smtp and options BERK, turn off
  17295. +         SMTP
  17296. + 
  17297. + 
  17298. + Tue Jul  8 10:50:39 1986  /mtr <mrose@nrtc-gremlin>
  17299. + 
  17300. +     uip/scansbr.c: split-up a statement for the RT compiler
  17301. +     conf/mh-gen.8: add some stuff on POP
  17302. +     conf/doc/{ADMIN,popaka}.rf: ditto
  17303. + 
  17304. + 
  17305. + Fri Jul 11 10:50:31 1986  /mtr <mrose@nrtc-gremlin>
  17306. + 
  17307. +     MH 6.5 official, out of beta, released for UCI distribution
  17308. + 
  17309. + 
  17310. + Tue Jul 15 20:26:05 1986  /mtr <mrose@nrtc-gremlin>
  17311. + 
  17312. +     papers/{bboards/bboards,tutorial/tutorial}.tex: botched MTR's
  17313. +         address
  17314. + 
  17315. + 
  17316. + Sun Jul 27 11:52:37 1986  /mtr <mrose@nrtc-gremlin>
  17317. + 
  17318. +     conf/doc/show.rf: typos
  17319. + 
  17320. + 
  17321. + Fri Aug  8 12:57:35 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17322. + 
  17323. +     conf/config/config.c, h/mh.h, sbr/m_readefs.c, uip/mhlsbr.c:
  17324. +         add support for "faceproc"
  17325. + 
  17326. + 
  17327. + Mon Aug 11 10:10:33 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17328. + 
  17329. +     uip/mhlsbr.c: choose default face from from: line
  17330. + 
  17331. + 
  17332. + Tue Aug 12 10:53:47 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17333. + 
  17334. +     uip/mhlsbr.c: finally stabilize it
  17335. + 
  17336. + 
  17337. + Tue Aug 12 10:54:47 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17338. + 
  17339. +     support/pop/popser.c: small fix from Dave Cohrs
  17340. + 
  17341. + 
  17342. + Thu Aug 14 22:25:23 1986  /mtr <mrose@nrtc-gremlin>
  17343. + 
  17344. +     support/general/replcomps: add return-path to To: list
  17345. + 
  17346. + 
  17347. + Fri Aug 15 13:58:25 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17348. + 
  17349. +     uip/vmh.c: slight clean-up
  17350. + 
  17351. + 
  17352. + Fri Aug 15 23:01:06 1986  /mtr <mrose@nrtc-gremlin>
  17353. + 
  17354. +     sbr/advertise.c: slight touch-up
  17355. + 
  17356. + 
  17357. + Mon Aug 18 10:38:34 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17358. + 
  17359. +     uip/wmh.c: new program--Windowing MH for Integrated Solutions
  17360. +         Graphics Workstations; not standardly installed for now since
  17361. +         requires special load libraries
  17362. +     conf/doc/wmh.rf: man page
  17363. +     conf/makefiles/uip: support wmh
  17364. + 
  17365. + 
  17366. + Wed Aug 20 14:16:12 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17367. + 
  17368. +     conf/config/MakeBBoards: smarter rule
  17369. + 
  17370. + 
  17371. + Wed Aug 20 17:23:39 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17372. + 
  17373. +     uip/mhlsbr.c: a bit less demanding on errors when processing the
  17374. +         face
  17375. + 
  17376. + 
  17377. + Thu Aug 28 19:39:47 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17378. + 
  17379. +     uip/send.c: handle dist in a read-only folder
  17380. +     support/pop/popser.c: anonymous fix for DPOP/BPOP
  17381. + 
  17382. + 
  17383. + 
  17384. + Fri Aug 29 09:08:15 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17385. + 
  17386. +     uip/wmh.c: for pTTY() make original window the top one
  17387. + 
  17388. + 
  17389. + Tue Sep  2 15:27:34 1986  /mtr <mrose@nrtc-gremlin>
  17390. + 
  17391. +     uip/{bbc,burst,popsbr}.c: ULTRIX loses on ferror() vs. feof()
  17392. +     sbr/vfgets.c: ditto
  17393. + 
  17394. + 
  17395. + 
  17396. + Fri Sep  5 09:08:17 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17397. + 
  17398. +     mts/sendmail/smail.c: define discard() as void
  17399. + 
  17400. + 
  17401. + Fri Sep  5 09:40:35 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17402. + 
  17403. +     uip/msh.c: add hidden "advance" command
  17404. +     uip/wmh.c: use it
  17405. + 
  17406. + 
  17407. + Fri Sep  5 14:02:36 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17408. + 
  17409. +     zotnet/bboards/bboards.h: add BB_SEEN to fix list-handling bug in bbc
  17410. +     uip/bbc.c: use it
  17411. + 
  17412. + 
  17413. + Mon Sep  8 12:47:58 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17414. + 
  17415. +     conf/config/MakeBBoards: smarter
  17416. + 
  17417. + 
  17418. + Thu Oct  2 12:37:57 1986  /mtr <mrose@nrtc-gremlin>
  17419. + 
  17420. +     support/pop/popd.c: fixes for 4.3BSD set setsockopt
  17421. + 
  17422. + 
  17423. + Mon Oct  6 12:07:02 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17424. + 
  17425. +     conf/examples/encore: config file for Encore Multimax, from Mike
  17426. +         Iglesias of UCI
  17427. + 
  17428. + 
  17429. + Wed Oct  8 15:59:05 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17430. + 
  17431. +     uip/vmh.c: more SYS5 mods from Bob Desinger
  17432. + 
  17433. + 
  17434. + Thu Oct  9 12:52:41 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17435. + 
  17436. +     h/mh.h: make ruserpass nonsense based on NFS not SUN
  17437. + 
  17438. + 
  17439. + Thu Oct 30 12:57:52 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17440. + 
  17441. +     sbr/formataddr.c, uip/replsbr.c: another realloc() bug found by
  17442. +         Terry West
  17443. + 
  17444. + 
  17445. + Thu Oct 30 13:03:02 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17446. + 
  17447. +     uip/{rcvtty,ttyw}.c: if no BSD42, turn off TTYD
  17448. + 
  17449. + 
  17450. + Mon Nov  3 14:11:48 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17451. + 
  17452. +     uip/msgchk.c: another SUN fix
  17453. + 
  17454. + 
  17455. + Mon Nov  3 15:21:38 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17456. + 
  17457. +     sbr/m_sync.c: fix for sequent machines
  17458. + 
  17459. + 
  17460. + Mon Nov 10 08:12:16 1986  /mtr <mrose@nrtc-gremlin>
  17461. + 
  17462. +             -- Stuff from Jef Poskanzer --
  17463. +     uip/forw.c: add -[no]dashmunging, a hidden option
  17464. +     uip/mhlsbr.c: add -[no]dashmunging, a hidden option
  17465. +     {conf/doc/mhl.rf,uip/mhlsbr.c}: add [no]split variable
  17466. + 
  17467. + 
  17468. + Mon Nov 10 16:57:41 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17469. + 
  17470. +                 -- More stuff from Jef --
  17471. +     zotnet/tws/dtimep.lex: default timezone to localone one
  17472. + 
  17473. + 
  17474. + Fri Nov 14 17:25:23 1986  /mtr <mrose@nrtc-gremlin>
  17475. + 
  17476. +     conf/doc/mhook: typo found by Phyl
  17477. + 
  17478. + 
  17479. + Fri Nov 21 14:33:28 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17480. + 
  17481. +     sbr/smatch.c: deref null bug
  17482. + 
  17483. + 
  17484. + Sat Nov 22 20:36:31 1986  /mtr <mrose@nrtc-gremlin>
  17485. + 
  17486. +     uip/bbc.c: set up time-bomb after HUP
  17487. + 
  17488. + 
  17489. + Tue Dec  2 13:57:41 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17490. + 
  17491. +     support/bboards/bbtar.c: fix for sequent machines
  17492. + 
  17493. + 
  17494. + Wed Dec  3 22:03:58 1986  /mtr <mrose@nrtc-gremlin>
  17495. + 
  17496. +     support/pop/popd.c: minor fix
  17497. + 
  17498. + 
  17499. + Mon Dec 15 11:11:32 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17500. + 
  17501. +     uip/post.c: patch for MMDF-IIb submit
  17502. + 
  17503. + 
  17504. + Mon Dec 22 12:32:45 1986  /mtr (agent: Marshall Rose) <mother@killer-rat>
  17505. + 
  17506. +                    -- From Stanford --
  17507. +     h/dropsbr.h, uip/dropsbr.c, support/pop/popser.c: support LAST
  17508. +         command in POP service
  17509. +     uip/{inc,mshcmds}.c: ditto
  17510. + 
  17511. + 
  17512. + Fri Jan  2 18:42:55 1987  /mtr <mrose@nrtc-gremlin>
  17513. + 
  17514. +     uip/dropsbr.c: fixes
  17515. +     uip/msh.c, support/pop/popser.c: ditto
  17516. + 
  17517. + 
  17518. + Fri Jan  2 18:43:09 1987  /mtr <mrose@nrtc-gremlin>
  17519. + 
  17520. +     zotnet/tws/dtimep.lex: ctime w/o TZ hack
  17521. + 
  17522. + 
  17523. + Fri Jan  2 23:41:19 1987  /mtr <mrose@nrtc-gremlin>
  17524. + 
  17525. +     uip/rcvdist.c: touch-ups to sync with replsbr.c
  17526. +     uip/scansbr.c: trash trailing whitespace in header components for
  17527. +         formating
  17528. + 
  17529. + 
  17530. + Sat Jan  3 13:11:22 1987  /mtr <mrose@nrtc-gremlin>
  17531. + 
  17532. +     conf/config/mts.c, mts/sendmail/hosts.c: BIND fix-up
  17533. + 
  17534. + 
  17535. + Sat Jan  3 15:03:00 1987  /mtr <mrose@nrtc-gremlin>
  17536. + 
  17537. +     h/formatsbr.h: parenthesize better, use case-sensitive in
  17538. +         bucket search since hashing is case-sensitive
  17539. +     uip/{rcvdist,replsbr}.c: CT_ADDR hacks
  17540. + 
  17541. + 
  17542. + Sun Jan  4 11:16:54 1987  /mtr <mrose@nrtc-gremlin>
  17543. + 
  17544. +     uip/mhlsbr.c: "extras" hack for Elz
  17545. *** /dev/null    Tue Dec 15 08:01:10 1992
  17546. --- papers/changes/Makefile    Wed Dec  2 14:00:15 1992
  17547. ***************
  17548. *** 0 ****
  17549. --- 1,46 ----
  17550. + ##############################################################################
  17551. + # @(#)$Id: Makefile,v 1.4 1992/12/02 22:00:09 jromine Exp $
  17552. + 
  17553. + MAKE    =    make DESTDIR=$(DESTDIR) $(MFLAGS) -k
  17554. + SHELL    =    /bin/sh
  17555. + 
  17556. + 
  17557. + ##############################################################################
  17558. + #    Generation Rules
  17559. + ##############################################################################
  17560. + 
  17561. + .SUFFIXES:    .ms .cat .doc .imp
  17562. + 
  17563. + .ms.cat:;    itroff -t -ms $< > $@
  17564. + 
  17565. + .ms.doc:;    nroff -ms $< > $@
  17566. + 
  17567. + .cat.imp:;    catimp -i $@ $<
  17568. + 
  17569. + 
  17570. + ######################################################################
  17571. + #    Here it is...
  17572. + ######################################################################
  17573. + 
  17574. + TARGETS    =    mh-changes.doc
  17575. + 
  17576. + all:        mh-changes.doc
  17577. + 
  17578. + 
  17579. + doc:        mh-changes.doc
  17580. + 
  17581. + i-all:    all true
  17582. +     lpr -t -J MH-changes mh-changes.cat
  17583. + 
  17584. + true:;
  17585. + 
  17586. + ##############################################################################
  17587. + #    Miscellaneous tasks
  17588. + ##############################################################################
  17589. + 
  17590. + distribution:   clean
  17591. + 
  17592. + unconfig clean:        unclean
  17593. +         rm -f *.cat *.dvi *.imp *.doc
  17594. + 
  17595. + unclean:;    rm -f *.tmp _* :* core
  17596. *** /dev/null    Tue Dec 15 08:01:10 1992
  17597. --- papers/changes/mh-changes.ms    Mon Dec 14 16:25:37 1992
  17598. ***************
  17599. *** 0 ****
  17600. --- 1,1010 ----
  17601. + .\" @(#)$Id: mh-changes.ms,v 1.25 1992/12/15 00:25:33 jromine Exp $
  17602. + .\" Standard -ms macros
  17603. + .\" with the following changes
  17604. + .ds lq \\*Q
  17605. + .ds rq \\*U
  17606. + .\" remember to update date in text below
  17607. + .DA "December 14, 1992"
  17608. + .if n \{\
  17609. + .na
  17610. + .\}
  17611. + .nr PO 1i
  17612. + .po 1i
  17613. + .\" .EH ''Changes to MH 6.7'%'
  17614. + .\" .OH ''Changes to MH 6.7'%'
  17615. + .ds LH Changes to MH 6.8
  17616. + .ds CH
  17617. + .ds RH %
  17618. + .TL
  17619. + Changes to
  17620. + .br
  17621. + The RAND MH Message Handling System:
  17622. + .br
  17623. + UCI version MH 6.8
  17624. + .AU
  17625. + John L. Romine
  17626. + .AI
  17627. + Computing Support Group
  17628. + Department of Information and Computer Science
  17629. + University of California, Irvine
  17630. + Irvine, CA  92717\-3425
  17631. + .AB
  17632. + .PP
  17633. + This document describes the changes to the
  17634. + UCI version of the RAND MH system from MH 6.6
  17635. + to this release of MH 6.8.
  17636. + This document is meant to supplement,
  17637. + not supersede,
  17638. + the standard MH User's manual and MH Administrator's manual.
  17639. + .PP
  17640. + Comments concerning this documentation should be addressed to the
  17641. + mailbox \fBBug\-MH@ICS.UCI.EDU\fP, or \fBucbvax!ucivax!bug-mh\fP.
  17642. + .AE
  17643. + .SH
  17644. + ACKNOWLEDGEMENTS
  17645. + .LP
  17646. + The \fIMH\fP system described herein is
  17647. + based on the original RAND \fIMH\fP system.
  17648. + It has been extensively developed (perhaps too much so) by Marshall T. Rose
  17649. + and John L. Romine at the University of California, Irvine.
  17650. + Einar A. Stefferud, Jerry N. Sweet,
  17651. + and Terry P. Domae provided numerous suggestions
  17652. + to improve the UCI version of \fIMH\fP.
  17653. + .PP
  17654. + Of course,
  17655. + a large number of people have helped \fIMH\fP along.
  17656. + The list of \*(lq\fIMH\fP immortals\*(rq is too long to list here.
  17657. + For this release, numerous \fIMH\-Workers\fP sent in fixes and other
  17658. + changes.  A handful of courageous \fIMH\-Workers\fP volunteered
  17659. + to beta-test these changes; their help is particularly appreciated.
  17660. + .KS
  17661. + .SH
  17662. + DISCLAIMER
  17663. + .LP
  17664. + The Regents of the University of California wish to make it known that:
  17665. + .QP
  17666. + Although each program has been tested by its contributor,
  17667. + no warranty, express or implied,
  17668. + is made by the contributor or the University of California,
  17669. + as to the accuracy and functioning of the program
  17670. + and related program material,
  17671. + nor shall the fact of distribution constitute any such warranty,
  17672. + and no responsibility is assumed by the contributor
  17673. + or the University of California in connection herewith.
  17674. + .KE
  17675. + .KS
  17676. + .SH
  17677. + CONVENTIONS
  17678. + .LP
  17679. + In this document,
  17680. + certain formatting conventions are adhered to:
  17681. + .IP
  17682. + The names of
  17683. + \s-2UNIX\s+2
  17684. + commands, such as \fIcomp\fP
  17685. + are presented in \fIitalics\fP.
  17686. + .IP
  17687. + Arguments to programs, such as `msgs' and `\-nobell' are
  17688. + delimited by single-quotes.
  17689. + .IP
  17690. + Text that should be typed exactly as-is, such as 
  17691. + command lines (e.g., \*(lqfolder \-pack\*(rq),
  17692. + are delimited by double-quotes.
  17693. + .IP
  17694. + \s-2UNIX\s+2
  17695. + pathnames and envariables,
  17696. + such as \fB/usr/uci\fP and \fB$SIGNATURE\fP,
  17697. + are presented in \fBbold font\fP.
  17698. + .KE
  17699. + .ds LH Changes for MH 6.8
  17700. + .bp
  17701. + .SH
  17702. + CHANGES FOR MH 6.8
  17703. + .LP
  17704. + This is the current released version of \fIMH\fP
  17705. + as of December 14, 1992.  This release includes a number
  17706. + of bug fixes and internal changes to make the code more
  17707. + portable.
  17708. + Two new authentication methods are provided for the POP,
  17709. + and support for SVR4 shared libraries is complete.
  17710. + .PP
  17711. + The major user-visible change in this release is the incorporation
  17712. + of support for multi-media mail as specified by the
  17713. + Multi-purpose Internet Mail Extensions (\fBMIME\fP)
  17714. + RFC\ 1341.
  17715. + This allows you to include things like audio,
  17716. + graphics, and the like, in your mail messages.
  17717. + A new command, \fImhn\fP, 
  17718. + has been provided to support \fBMIME\fP and
  17719. + a detailed man page is provided in \fImhn\fP\|(1).
  17720. + .SH
  17721. + Documentation
  17722. + .LP
  17723. + The documentation has some general improvements, and
  17724. + the \fBREAD-ME\fP document has been re-organized
  17725. + to help \fIMH\fP administrators find the appropriate
  17726. + configuration options for their system.
  17727. + The \fBMakefile\fPs in the \fBpapers/\fP hierarchy have
  17728. + been changed to invoke \fITeX\fP as
  17729. + \*(lqtex\*(rq (instead of \*(lqtex82\*(rq).
  17730. + .LP
  17731. + The following new man pages are also available:
  17732. + .IP \fImhn\fP\|(1) \w'\fIpopauth\fP\|(8)'u+2n
  17733. + \fImhn\fP helps the user process multi-media mail.
  17734. + .IP \fImhparam\fP\|(1)
  17735. + \fImhparam\fP lets the user extract information from 
  17736. + the \fIMH\fP profile.
  17737. + .IP \fIpopauth\fP\|(8)
  17738. + the APOP database administration program (see below).
  17739. + .IP \fIpopi\fP\|(1)
  17740. + the POP initiator (see below).
  17741. + .IP \fIslocal\fP\|(1)
  17742. + fully documents \fIslocal\fP.  The \fImhook\fP(1) man page now
  17743. + documents only the \fIMH\fP receive-mail hooks.
  17744. + .SH
  17745. + Internal Changes
  17746. + .LP
  17747. + The \fIMH\fP source code is in the process of being
  17748. + cleaned up to make pedantic ANSI C compilers happy.
  17749. + Occurrences of \*(lqNULL\*(rq have been replaced by
  17750. + \*(lq0\*(rq where appropriate.
  17751. + Extra tokens after \*(lq#else\*(rq and \*(lq#endif\*(rq
  17752. + have been put inside comments (this is still in progress).
  17753. + The code should now compile cleanly on many more systems,
  17754. + specifically, more variants of SVR4.
  17755. + .PP
  17756. + The version of \fBtws/dtimep.c\fP which was included in 
  17757. + MH 6.7.2 was incompatible with the \fIlex\fP library
  17758. + on some systems, and has been removed.
  17759. + .PP
  17760. + A bug in the handling of blind lists inside alias
  17761. + files has been fixed.
  17762. + .KS
  17763. + .SH
  17764. + Post Office Protocol
  17765. + .LP
  17766. + There were three new options added to the POP.
  17767. + .IP APOP \w'APOP'u+2n
  17768. + This option indicates that the POP daemon will
  17769. + support the non-standard \fBAPOP\fP command which
  17770. + provides a challenge-based authentication system using
  17771. + the \fBMD5\fP message digest algorithm.
  17772. + .IP
  17773. + This option also causes the
  17774. + \fIpopauth\fP program to be installed, which
  17775. + allows the administrator to manipulate the \fBAPOP\fP
  17776. + authorization database.
  17777. + .KE
  17778. + .IP KPOP
  17779. + Support for KERBEROS with POP.
  17780. + This code builds
  17781. + \fIpopd\fP, \fIinc\fP and \fImsgchk\fP to support only the 
  17782. + \*(lqkpop\*(rq protocol.
  17783. + This code is still expiremental, but is available for 
  17784. + those sites wishing to test it.
  17785. + .IP MPOP
  17786. + This option indicates that the POP daemon will
  17787. + support the non-standard
  17788. + \fBXTND SCAN\fP command which provides performance
  17789. + enhancements when using the POP over low-speed connections.
  17790. + .IP
  17791. + This option also causes an interactive POP
  17792. + client program, \fIpopi\fP, to be compiled and installed.
  17793. + A man page for the \fIpopi\fP program is also provided.
  17794. + This option requires the configuration to
  17795. + have \*(lqbboards: pop\*(rq.
  17796. + .LP
  17797. + The APOP and MPOP non-standard POP
  17798. + facilities are documented in
  17799. + \fIThe Internet Message\fR (ISBN 0\-13\-092941\-7),
  17800. + a book by Marshall T. Rose.
  17801. + For more details, see \fBsupport/pop/pop-more.txt\fR
  17802. + and the \fIAdministrator's Guide\fP.
  17803. + The APOP option peacefully co-exists with the standard POP,
  17804. + KPOP completely replaces the standard POP, and
  17805. + MPOP requires \*(lqbboards: pop\*(rq.
  17806. + .SH
  17807. + File Locking
  17808. + .LP
  17809. + The file locking code has been cleaned up to support
  17810. + three kinds of kernel-level file locking.  As appropriate
  17811. + for your system, include the
  17812. + LOCKF, FCNTL or FLOCK option.  For more
  17813. + details, see \fImh-tailor\fP\|(5).
  17814. + .SH
  17815. + .KS
  17816. + Configuration Directives
  17817. + .LP
  17818. + A number of new configuration directives have been added
  17819. + or changed.  The full details are given in the \fBREAD-ME\fP.
  17820. + .IP cp: \w'MAILGROUP'u+2n
  17821. + The command used to install new files if not \*(lqcp\*(rq.
  17822. + .IP ln:
  17823. + The command used to link files together in the source tree
  17824. + if not \*(lqln\*(rq.
  17825. + .IP mts:
  17826. + Full support for ZMAILER has been added.
  17827. + .IP popdir:
  17828. + The directory where \fIpopd\fP will be installed if not \fB/usr/etc\fP.
  17829. + .IP regtest:
  17830. + Set to \*(lqon\*(rq to prevent the hostname and compile
  17831. + date from being included in \fIMH\fP binaries.
  17832. + .IP sharedlib:
  17833. + You may now specify \*(lqsun4\*(rq or \*(lqsys5\*(rq 
  17834. + (for SVR4) shared libraries.
  17835. + .IP signal:
  17836. + Specifies the base type of the function returned by \fIsignal\fP\|().
  17837. + This was previously defined with \*(lqoptions TYPESIG\*(rq.
  17838. + .KE
  17839. + .LP
  17840. + Several `-D' options to \fIcc\fP have been added or changed:
  17841. + .IP APOP \w'MAILGROUP'u+2n
  17842. + Authenticated POP (see above).
  17843. + .IP AUX 
  17844. + Support for A/UX systems.
  17845. + .IP DBMPWD
  17846. + The DBM option has been renamed DBMPWD.
  17847. + .IP HESIOD
  17848. + Support for the HESIOD name server.
  17849. + .IP KPOP
  17850. + KERBEROS POP (see above).
  17851. + .IP LOCALE
  17852. + Support for local characters sets; uses the \fIsetlocal\fP\|() function.
  17853. + .IP MAILGROUP
  17854. + Makes \fIinc\fP set-group-id.
  17855. + You may need this option if your \fB/usr/spool/mail\fP
  17856. + is not world-writeable.
  17857. + .IP MIME
  17858. + Multi-media mail.
  17859. + .IP MPOP
  17860. + Mobile POP (see above).
  17861. + .IP MSGID
  17862. + Enables \fIslocal\fP to detect and surpress duplicate messages.
  17863. + .IP OSF1
  17864. + Support for DEC OSF1 systems.  May be incomplete.
  17865. + .IP RENAME
  17866. + Include this option if your system has a \fIrename\fP\|()
  17867. + system call.
  17868. + .IP SVR4
  17869. + Support for System 5 Release 4 or newer systems.
  17870. + .IP TYPESIG
  17871. + This option has been dropped.  See `signal' above.
  17872. + .IP UNISTD
  17873. + Include this option if your system has the include
  17874. + file \fB<unistd.h>\fP.
  17875. + .IP VSPRINTF
  17876. + Include this option if your system has the \fIvsprintf\fP\|()
  17877. + library routine; otherwise, \fI\(rudoprnt\fP\|() will be used.
  17878. + .IP YEARMOD
  17879. + Forces the \fImh-format\fP `year' function to
  17880. + return 2-digit values.
  17881. + Use this option during a brief transition period if 
  17882. + you have local \fImh-format\fP files which need to
  17883. + be converted to support 4-digit years.
  17884. + .SH 
  17885. + FUNCTIONAL CHANGES
  17886. + .LP
  17887. + In addition to the configuration changes mentioned above,
  17888. + a number of functional changes have been made to the system.
  17889. + Many programs have new features added and a few new 
  17890. + programs have are provided.  
  17891. + Each command's manual page gives
  17892. + complete information about the its operation.
  17893. + Here is a short summary of the changes.
  17894. + .SH
  17895. + MH Sequences
  17896. + .LP
  17897. + A larger number of user-defined sequences are available.
  17898. + Previously, this number had been 10.
  17899. + On 32-bit systems, 26 user-defined sequences are available.
  17900. + .SH
  17901. + Profile Components
  17902. + .LP
  17903. + \fIMH\fP programs will now complain if the 
  17904. + \fB\&.mh\(ruprofile\fR does not end in a newline.
  17905. + Also, one enhancement and one new profile component are provided:
  17906. + .IP Aliasfile: \w'AliasfileX'u+2n
  17907. + Multiple filenames may now be given.
  17908. + .IP Inbox:
  17909. + New; the default folder (for \fIinc\fP, etc.) if not \*(lqinbox\*(rq.
  17910. + .KS
  17911. + .SH
  17912. + Format Strings
  17913. + .LP
  17914. + A few minor bugs were fixed in format string handling,
  17915. + and a few new features were added.  See \fImh-format\fP\|(5)
  17916. + for complete details.
  17917. + .IP Addresses \w'Xxyearxdatexx'u+2n
  17918. + An attempt is made to decipher X\&.400 RFC\ 987-style addresses.
  17919. + .IP Comments
  17920. + Comments may be added to \fImh-format\fP files; a comment
  17921. + begins with the 2-character sequence \*(lq%;\*(rq,
  17922. + and ends with an un-escaped newline.
  17923. + .IP "%(modulo n)"
  17924. + The `modulo' function escape has been added.
  17925. + .IP %(year{date})
  17926. + The date parser has been enhanced to understand more
  17927. + illegal date formats; `year' now returns a 4-digit number.
  17928. + .KE
  17929. + .SH
  17930. + User Interface Programs
  17931. + .LP
  17932. + A number of \fIMH\fP commands have minor changes:
  17933. + .IP ali \w'packmbox'u+2n
  17934. + The output with `\-user\0\-list' was
  17935. + changed to match the output with `\-nouser\0\-list'.
  17936. + .IP burst
  17937. + Will no longer drop the last message of a digest.
  17938. + .IP inc
  17939. + Accepts the `\-apop' switch for authenticated POP (see above);
  17940. + will attempt to detect write
  17941. + errors (e.g., no space left on device) when incorporating mail;
  17942. + no longer replaces newline characters with NULLs.
  17943. + .IP folder
  17944. + The `\-noprint' option was broken and has been dropped.
  17945. + .IP forw
  17946. + Supports `\-mime' to use MIME-style multi-part messages.
  17947. + .IP mhl
  17948. + Will no longer put an extra space at the end of the
  17949. + `%{text}' in a formatfield.
  17950. + .IP mhn
  17951. + New; manipulates multi-media (MIME) messages; a detailed
  17952. + man page is provided.
  17953. + .IP mhparam
  17954. + New; reads the \fIMH\fP profile (and context) 
  17955. + and writes the values of the specified components on the
  17956. + standard output; useful in programmatic constructs.
  17957. + .IP msgchk
  17958. + Supports `\-apop' (see above).
  17959. + .IP packmbox
  17960. + New; packs an \fIMH\fP folder into a UUCP-style mailbox.
  17961. + .IP popi
  17962. + New; a client-side POP initiator; available only if you
  17963. + built \fIMH\fP with the MPOP option (see above).
  17964. + .IP refile
  17965. + A bug where the `rmmproc' did not remove all specified
  17966. + message files has been fixed.
  17967. + .IP scan
  17968. + The `\-file' option is fully supported and will no longer
  17969. + complain about empty folders.
  17970. + .IP send
  17971. + Supports `\-mime' and `\-split' to split large messages
  17972. + into multiple partial messages using MIME.
  17973. + .SH
  17974. + Support Programs
  17975. + .IP fmtdump \w'packmbox'u+2n
  17976. + Can now read a format file, or a format string given
  17977. + on the command line.
  17978. + .IP popauth
  17979. + New; manages the APOP authorization database (see above).
  17980. + .IP sendmail
  17981. + The \fIsendmail\fP replacement will be installed
  17982. + only if your `mts' setting uses the `/smtp' option.
  17983. + .IP slocal
  17984. + A new man page for \fIslocal\fP is available;
  17985. + the new `mbox' action is available to write a file
  17986. + in \fIpackf\fP format;
  17987. + a bug where extra `>' characters were written to MMDF-style
  17988. + maildrops has been fixed; 
  17989. + if compiled with the MSGID option, can detect and suppress
  17990. + reception of duplicate messages.
  17991. + .IP viamail
  17992. + New; bundles a directory (like \fIshar\fP\|) and
  17993. + sends it through multi-media mail.
  17994. + 
  17995. + .ds LH Changes for MH 6.7.2
  17996. + .bp
  17997. + .ds CF Feb 1, 1992
  17998. + .SH
  17999. + CHANGES FOR MH 6.7.2
  18000. + .LP
  18001. + The MH.6.7.2 patch release is a maintenance
  18002. + release.
  18003. + This is the
  18004. + current released version of \fIMH\fP as of February 1, 1992.
  18005. + .PP
  18006. + This release now supports the NCR Tower running SYS5R4.
  18007. + The WP changes installed in MH.6.7.0 have been removed.
  18008. + .SH 
  18009. + Shared Libraries
  18010. + .LP
  18011. + Support for SYS 5 shared libraries is in progress.
  18012. + .PP
  18013. + Support for Sun OS 4.0 shared libraries had been improved.
  18014. + The \fIMH\fP library has been modified to move initialized
  18015. + data into a data definition file.  The shared library will
  18016. + now consist of a \fBlibmh.so\fP and \fBlibmh.sa\fP file.
  18017. + The shared library version number will no longer track the
  18018. + \fIMH\fP patch release number, and its numbering begins with
  18019. + version `1.1' with this release.
  18020. + .SH
  18021. + Replacement SendMail
  18022. + .LP
  18023. + Since many standard system programs expect to post mail by 
  18024. + invoking \fB/usr/lib/sendmail\fP,
  18025. + a minimal replacement \fISendMail\fP is provided in 
  18026. + this release.  This replacement is meant to be installed
  18027. + on (e.g., diskless) client workstations which post mail
  18028. + using SMTP, and do not run a message transport system.
  18029. + It will call \fIpost\fP to post mail; be sure you have
  18030. + configured \fIMH\fP with the `/smtp' mts option.
  18031. + This sendmail replacement is installed in your 
  18032. + \fIMH\fP etc directory, and you should link 
  18033. + \fB/usr/lib/sendmail\fP
  18034. + to it.
  18035. + .KS
  18036. + .SH
  18037. + Format Strings
  18038. + .LP
  18039. + A manual page for the \fIfmtdump\fP format string disassembler
  18040. + is supplied, and some new format functions were added:
  18041. + .IP folder \w'%getenv'u+2n
  18042. + In \fIscan\fP, this component escape
  18043. + contains the name of the current folder.
  18044. + It is not defined for other \fIMH\fP commands.
  18045. + .IP getenv
  18046. + This function escape returns the value of an environment variable.
  18047. + .KE
  18048. + .PP
  18049. + There will be some additional changes in these routines in the
  18050. + next patch release.
  18051. + .KS
  18052. + .SH
  18053. + Other Bug Fixes and Enhancements
  18054. + .LP
  18055. + In addition to some other minor enhancements,
  18056. + some bugs were fixed which in general were not user\-visible:
  18057. + .IP "Blind lists" \w'datexparsing'u+2n
  18058. + Users may now specify RFC822 address groups in their
  18059. + alias files.  These groups are implemented by \fIMH\fP 
  18060. + as blind lists.
  18061. + .IP "date parsing"
  18062. + A number of sites have brain-damaged versions of \fBlex\fP.
  18063. + \fIMH\fP will now come with the date parser already run
  18064. + through lex.
  18065. + .IP mark
  18066. + A bug dealing with \fImark\fP and the sequence named `cur'
  18067. + is fixed.  This was previously a problem for mh-e users.
  18068. + .IP MH.doc
  18069. + The \fIMH\fP nroff version of the manual no longer contains
  18070. + teletype escape sequences.
  18071. + .IP scan
  18072. + Can now handle headers as long as 512 bytes.
  18073. + .IP Signals
  18074. + \fIMH\fP programs will no longer catch the \fBHUP\fP
  18075. + and \fBTERM\fP signals while waiting for a sub-process.
  18076. + This was causing hung processes when your terminal line was
  18077. + was dropped unexpectedly.
  18078. + .IP Signature
  18079. + If your signature is not defined, \fIMH\fP will 
  18080. + use the value of the gecos field of your \fB/etc/passwd\fP
  18081. + entry as your signature.
  18082. + .IP "version.sh"
  18083. + A bug in the \fBawk\fP script in \fBconfig/version.sh\fP 
  18084. + was fixed.
  18085. + .KE
  18086. + .ds LH Changes for MH 6.7.1a
  18087. + .bp
  18088. + .ds CF January 25, 1991
  18089. + .SH 
  18090. + CHANGES FOR MH 6.7.1a
  18091. + .LP
  18092. + The MH.6.7.1a patch was made available 
  18093. + on January 25, 1991 for limited distribution only.
  18094. + (This release had some known bugs, and so was
  18095. + not widely distributed.)
  18096. + This release incorporates several new features
  18097. + of particular note to users of sequences and format strings,
  18098. + as well as some general documentation improvements.
  18099. + There are a few minor enhancements and internal bug fixes also.
  18100. + Complete documentation of these changes is given in
  18101. + the individual manual pages, and the \fBREAD-ME\fP file.
  18102. + .SH
  18103. + Message Sequences
  18104. + .LP
  18105. + A new manual page, \fImh\-sequence\0\fP(5), has been added.
  18106. + This manual page attempts to completely document the
  18107. + syntax and semantics of \fIMH\fP message sequence specifications.
  18108. + .PP
  18109. + A powerful new feature is the ability to specify message
  18110. + ranges with user-defined sequences.  The  specification
  18111. + \*(lqname:n\*(rq may be used, and it designates up to the
  18112. + first `n' messages (or  last  `n' messages  for  `-n')
  18113. + which  are  elements  of the user-defined sequence `name'.
  18114. + .PP
  18115. + The message
  18116. + specifications \*(lqname:next\*(rq and \*(lqname:prev\*(rq
  18117. + may also be used, and they
  18118. + designate the
  18119. + next or previous message (relative to the current message)
  18120. + which is an element of the user-defined sequence `name'.
  18121. + The specifications
  18122. + \*(lqname:first\*(rq and \*(lqname:last\*(rq are equivalent
  18123. + to \*(lqname:1\*(rq and \*(lqname:\-1\*(rq, respectively.
  18124. + The specification \*(lqname:cur\*(rq is not allowed
  18125. + (use just \*(lqcur\*(rq instead).
  18126. + .PP
  18127. + These specifications allow the user to step through
  18128. + a sequence with a command like \*(lqshow name:next\*(rq.
  18129. + .SH
  18130. + Format Strings
  18131. + .LP
  18132. + \fIMH\fP format strings now support an if-then-elseif-else
  18133. + clause (the `elseif' is new).  This will make
  18134. + format strings with multi-case conditions somewhat less complex.
  18135. + .PP
  18136. + A new format function `addr' had been added.  This function
  18137. + takes an address header name as its argument, and returns
  18138. + a rendering of the address contained in that header
  18139. + as \*(lquser@host\*(rq or \*(lqhost!user\*(rq.
  18140. + .PP
  18141. + Format widths now may be specified as a negative number.
  18142. + This causes the output to be right-justified
  18143. + within the format width.
  18144. + .KS
  18145. + .SH
  18146. + Other Changes
  18147. + .LP
  18148. + Along with a few minor enhancements,
  18149. + some bugs were fixed which in general were not user-visible:
  18150. + .IP "fmtdump" \w'whatnow'u+2n
  18151. + This new program 
  18152. + produces an pseudo-language
  18153. + representation of an \fIMH\fP format file, vaguely
  18154. + reminiscent of assembly language.  While this output format
  18155. + is not explicitly documented,
  18156. + it can still be useful when debugging \fIMH\fP format files.
  18157. + .IP "refile"
  18158. + Now takes a `\-\[no\]rmmproc' switch.  This makes it
  18159. + easier to avoid loops when your \*(lqrmmproc\*(rq calls \fIrefile\fP.
  18160. + .IP "slocal"
  18161. + A problem with the UUCP-style mailboxes,
  18162. + the `RPATHS' configuration option,
  18163. + and the \*(lqReturn-Path:\*(rq header was fixed.
  18164. + .IP "sortm"
  18165. + Will ensure that no messages are lost if it is interrupted.
  18166. + .IP "whatnow"
  18167. + Will now tell you where it is leaving the draft, when
  18168. + interrupted in the initial edit.  Previously the draft 
  18169. + was simply unlinked.
  18170. + .KE
  18171. + .KS
  18172. + .SH
  18173. + Compilation Options
  18174. + .IP "LOCKF" \w'whatnow'u+2n
  18175. + This option causes \fIMH\fP to use the \fBlockf()\fP
  18176. + system call for locking (if available),
  18177. + instead of \fBflock()\fP.
  18178. + .KE
  18179. + .ds LH Changes for MH 6.7.1
  18180. + .bp
  18181. + .ds CF December 14, 1990
  18182. + .SH 
  18183. + CHANGES FOR MH 6.7.1
  18184. + .LP
  18185. + The MH.6.7.1 patch release is a maintenance
  18186. + release, and as such, provides few changes from 
  18187. + the previous release.  This is the
  18188. + current released version of \fIMH\fP as of December 14, 1990.
  18189. + .SH
  18190. + User-Visible Changes
  18191. + .LP
  18192. + The major change in this release is to the
  18193. + POP daemon (popd).  In \fIMH\fP 6.7,
  18194. + it was changed to be able to read both UUCP and
  18195. + MMDF-style mailboxes.  This did not work as reported.  The
  18196. + code has now been changed to parse MMDF-style mailboxes if
  18197. + you are configuring MH to run with MMDF as your message
  18198. + transport system.  Otherwise, UUCP-style mailboxes are
  18199. + expected.
  18200. + .PP
  18201. + Since there are number of client programs available for
  18202. + only the POP2 protocol instead of POP3, popd has been
  18203. + updated to support both protocols.  This is a major
  18204. + win.  If you are compiling
  18205. + with POP turned on, add the `POP2' option to
  18206. + your \fIMH\fP config file, and the POP daemon
  18207. + will respond to POP2 or POP3 commands.  If you're using
  18208. + POP, there's no reason not to include this option; it does
  18209. + not affect the existing support for POP3.
  18210. + .KS
  18211. + .SH
  18212. + Internal Changes
  18213. + .LP
  18214. + Some bugs were fixed which in general were not user-visible:
  18215. + .IP "context" \w'replnnetcn'u+2n
  18216. + Errors when writing out sequences are detected correctly.
  18217. + .IP "inc"
  18218. + No longer inserts extra blank lines into messages.
  18219. + .IP "mh-format"
  18220. + A nil pointer bug in the address parser was fixed.
  18221. + .IP "repl, etc."
  18222. + The malloc/free problem has been fixed.
  18223. + .IP "rmf"
  18224. + A spelling error in the `\-nointeractive' switch has been corrected.
  18225. + .IP "rcvtty"
  18226. + Will not print the message size if not available (i.e., zero).
  18227. + .IP "send/post"
  18228. + Illegal signatures (those containing unquoted "."s) will be quoted.
  18229. + .KE
  18230. + .ds LH Changes for MH 6.7.0
  18231. + .bp
  18232. + .ds CF April 12, 1990
  18233. + .SH
  18234. + GENERAL CHANGES FOR MH 6.7.0
  18235. + .LP
  18236. + The author is pleased to announce that there are very few
  18237. + user\-visible
  18238. + changes to \fIMH\fP 6.7 from the previous \fIMH\fP 6.6 distribution.
  18239. + The majority of development was in the form of bug fixes and
  18240. + slight enhancements.
  18241. + In addition, this release is slightly faster than the
  18242. + previous release.
  18243. + With a few minor exceptions,
  18244. + it is backward\-compatible with the previous release.
  18245. + \fIMH\fP 6.7.0 is the current released version of \fIMH\fP
  18246. + as of April 12, 1990.
  18247. + .PP
  18248. + The changes were made mainly to generalize the source code to
  18249. + be compatible with a larger range of systems and compilers.
  18250. + There were many small changes to add declarations for ANSI C compliance.
  18251. + The System 5 support has been brought up to SYS5 R3, and there is
  18252. + support for Sun OS 4.0.
  18253. + .SH
  18254. + User\-Visible Changes
  18255. + .LP
  18256. + Here a quick summary of the
  18257. + changes that were made which are not backward\-compatible with the
  18258. + previous release of \fIMH\fP:
  18259. + .IP repl \w'sortm'u+2n
  18260. + The `\-format' and `\-noformat' switches
  18261. + have not been functional since \fIMH\fP 5, and have been removed.
  18262. + Any users who have these switches in their \fB\&.mh\(ruprofile\fP,
  18263. + will have to remove them.
  18264. + .IP sortm
  18265. + Previously, in most cases \fIsortm\fP would fill\-in any
  18266. + gaps in the numbering of a folder, 
  18267. + by renumbering the messages starting with `1'.
  18268. + This will no longer occur; for this behavior,
  18269. + use \*(lqfolder \-pack\*(rq.
  18270. + .PP
  18271. + .SH
  18272. + Using Aliases
  18273. + .LP
  18274. + A new profile entry `Aliasfile:' has been added.  The
  18275. + \fIali\fP\^, \fIsend\fP\^, and \fIwhom\fP programs will look for
  18276. + this profile entry and treat it as they would an argument to
  18277. + `\-alias'.
  18278. + This should make it easier for novice \fIMH\fP users to begin
  18279. + using aliases.
  18280. + .PP
  18281. + .SH
  18282. + Reading Network News & BBoards
  18283. + .LP
  18284. + The UCI BBoards facility can read local BBoards, and if compiled
  18285. + with the `bboards: pop' and `pop: on' options, can also read remote
  18286. + BBoards using the Post Office Protocol (POP ver. 3).
  18287. + With this release,
  18288. + \fIMH\fP can instead be compiled to read the Network News
  18289. + (i.e., USENET) using the Network News Transfer Protocol (NNTP).
  18290. + .PP
  18291. + This capability is enabled by compiling \fIMH\fP with
  18292. + the `bboards: nntp' and `pop: on' options.
  18293. + Unfortunately, reading remote BBoards via the POP and reading the Network
  18294. + News via the NNTP are mutually exclusive options.
  18295. + .PP
  18296. + To support the NNTP,
  18297. + a new module, \fBuip/pshsbr.c\fP, is compiled and loaded into
  18298. + \fIbbc\fP and \fImsh\fP instead of \fBuip/popsbr.c\fP.
  18299. + The default BBoard is changed from \*(lqsystem\*(rq to \*(lqgeneral\*(rq
  18300. + for the NNTP.
  18301. + .PP
  18302. + When reading BBoards,
  18303. + \fIbbc\fP will first look for local BBoards, and then contact the
  18304. + NNTP server to read the Network News.  The location of the
  18305. + NNTP server should be specified with the `nntphost:'
  18306. + entry in the \fBmtstailor\fP file
  18307. + (see the \fIMH\fP Administrator's Guide for details),
  18308. + or may be specified on
  18309. + the command line with the `\-host' switch.
  18310. + .PP
  18311. + .SH
  18312. + Format Strings
  18313. + .LP
  18314. + The manual page \fImh\-format\fP\0(5) has
  18315. + been rewritten to give a better explanation of how to write format strings,
  18316. + and how they are interpreted by \fIMH\fP.
  18317. + A line\-by\-line
  18318. + description of the 
  18319. + default \fIrepl\fP form file (\fBreplcomps\fP)
  18320. + is now included in that manual page.
  18321. + .PP
  18322. + .KS
  18323. + Some new format functions were added, and others were augmented:
  18324. + .IP trim \w'date2local'u+2n
  18325. + Strips any leading and trailing white\-space from the current string value.
  18326. + .IP date2local
  18327. + Will coerce the date to the local timezone.
  18328. + .IP date2gmt
  18329. + Will coerce the date to GMT.
  18330. + .IP divide
  18331. + Divides the current numeric value by its argument.
  18332. + This could be useful for
  18333. + building \fIscan\fP format strings which print large
  18334. + message sizes in \*(lqKb\*(rq or \*(lqMb\*(rq.
  18335. + .IP friendly
  18336. + If the address field cannot be parsed,
  18337. + this function will return the text of the address header,
  18338. + instead of a null string.
  18339. + .IP szone
  18340. + A flag indicating whether the timezone was explicit
  18341. + in the date string.
  18342. + .KE
  18343. + .SH
  18344. + PROGRAM CHANGES
  18345. + .LP
  18346. + In addition to the general changes mentioned above,
  18347. + many programs have specific new features added,
  18348. + either by new switches or by expanded functionality.
  18349. + Each command's manual page gives complete information about
  18350. + its new options.  Here is a short summary.
  18351. + .SH
  18352. + User Interface Programs
  18353. + .IP anno \w'prompter'u+2n
  18354. + Accepts a `\-nodate' switch which inhibits the date annotation,
  18355. + leaving only the body annotation.
  18356. + .IP folder
  18357. + When invoked with the `\-pack' switch
  18358. + and the new `\-verbose' switch, \fIfolder\fP will
  18359. + give information about the actions taken to renumber the folder.
  18360. + .IP
  18361. + On most systems, \fIfolder\fP can now create any non\-existing
  18362. + parent folders of a new sub\-folder.
  18363. + .IP forw
  18364. + When making digests, \fIforw\fP\^
  18365. + will put the issue and volume numbers
  18366. + in addition to the digest list name, in the digest trailer.
  18367. + .IP inc
  18368. + Detects NFS write failures, and will
  18369. + not zero your maildrop in that event.
  18370. + .IP msh
  18371. + Supports a variant of the new \fIsortm\fP\^.
  18372. + .IP prompter
  18373. + Considers a period on a line by itself to signify end\-of\-file
  18374. + when the `\-doteof' switch is specified.
  18375. + .IP repl
  18376. + The `\-[no]format' switches
  18377. + have not been used since \fIMH\fP 5 and have been deleted. \fIrepl\fP
  18378. + will now find filter files in the \fIMH\fP library area.
  18379. + .IP scan
  18380. + With the `\-file msgbox' switch, \fIscan\fP\^
  18381. + can list a \fIpackf\fP\|'d\-format file directly
  18382. + (without using \fImsh\fP\^).
  18383. + .IP
  18384. + Lists messages in reverse order with the `\-reverse' switch.
  18385. + This should be considered a bug.
  18386. + .IP sortm
  18387. + Now has the options:
  18388. + `\-textfield field', `\-notextfield',
  18389. + `\-limit days', and `\-nolimit'.
  18390. + .IP
  18391. + With these options, \fIsortm\fP can be instructed to sort a
  18392. + folder based on the contents of an arbitrary header such
  18393. + as \*(lqsubject\*(rq.
  18394. + .IP
  18395. + \fIsortm\fP minimizes renaming messages, and
  18396. + will no longer arbitrarily pack folders; for this behavior,
  18397. + use \*(lqfolder \-pack\*(rq.
  18398. + .IP whatnow
  18399. + Deletes the draft by renaming it with leading comma, instead
  18400. + of unlinking it.
  18401. + .SH
  18402. + \fIMH\fP Support Programs
  18403. + .LP
  18404. + .KS
  18405. + The following support programs also have changes or enhancements:
  18406. + .IP mhl \w'rcvtty'u+2n
  18407. + Will now accept a format string on any component, not just on
  18408. + addresses and dates.
  18409. + .KE
  18410. + .IP popd
  18411. + Will use \fIshadow\fP passwords if compiled with the
  18412. + \fBSHADOW\fP option.  It can now also
  18413. + read UUCP\-style maildrops directly.
  18414. + .IP rcvtty
  18415. + If given no arguments, \fIrcvtty\fP will produce a \fBscan\fP
  18416. + listing as specified by a format string or file; a default
  18417. + format string is used if one is not specified.
  18418. + .IP
  18419. + Before the listing is written to the users terminal, the
  18420. + terminal's bell is rung and a newline is output.
  18421. + The `\-nobell' and the `\-nonewline' options
  18422. + inhibit these functions.
  18423. + .IP
  18424. + \fIrcvtty\fP will obey terminal write
  18425. + notification set by \fImesg\fP.
  18426. + With the `\-biff' switch, \fIrcvtty\fP will
  18427. + also obey the mail notification status set by
  18428. + \fIbiff\fP.  
  18429. + .IP
  18430. + On \fBBSD43\fP systems, as with \fIwrite\fP,
  18431. + \fIrcvtty\fP will be installed set\-group\-id to the group \*(lqtty\*(rq.
  18432. + .IP slocal
  18433. + Understands UUCP\-style \*(lqFrom \*(rq lines and will write
  18434. + output files using this format if appropriate.
  18435. + Before invoking a delivery program, \fIslocal\fP will strip
  18436. + such lines unless compiled with the \fBRPATHS\fP option,
  18437. + in which case it will will convert such lines into
  18438. + \*(lqReturn\-Path:\*(rq headers.
  18439. + .IP
  18440. + \fIslocal\fP has a new result code \*(lqN\*(rq,
  18441. + for use in \fB.maildelivery\fP files.
  18442. + With this result code,
  18443. + \fIslocal\fP will
  18444. + perform the action only if the message has not been delivered
  18445. + and the previous action succeeded.  This allows for performing
  18446. + an action only if multiple conditions are true.
  18447. + .SH
  18448. + DOCUMENTATION
  18449. + .LP
  18450. + Several of the older \fIMH\fP papers have been difficult to format
  18451. + because they depended on an older version of
  18452. + PhDTeX which was
  18453. + not supplied.  These papers have been updated, and some TeX
  18454. + library files are supplied in \fBpapers/doclib/\fP, so that
  18455. + these papers may be generated on any system with TeX.
  18456. + .PP
  18457. + Many of the manual pages have been revised to include documentation
  18458. + of new command options, and some have been expanded to give more detail.
  18459. + All are now slightly reformatted at installation time
  18460. + to make them more compatible with programs like \fImakewhatis\fP\^.
  18461. + .PP
  18462. + .SH
  18463. + \fIMH\fP ADMINISTRATION
  18464. + .LP
  18465. + This section describes changes in configuring, compiling and
  18466. + installing \fIMH\fP 6.7 and should not
  18467. + be of interest to casual \fIMH\fP users.
  18468. + The \fBREAD\-ME\fP file has been 
  18469. + considerably revised and expanded to give more detail 
  18470. + about the configuration and compilation options which
  18471. + have been included in this release.  Some compilation options
  18472. + have been removed, and many new options have been added.
  18473. + .PP
  18474. + All \fIMH\fP \fBMakefile\fPs have been updated to work around some
  18475. + incompatibilities introduced in newer versions of \fImake\fP\^.
  18476. + \fIMH\fP programs will no longer be installed with the sticky\-bit
  18477. + turned on.
  18478. + .PP
  18479. + Reading this section not a substitute for carefully
  18480. + reading the \fBREAD\-ME\fP file before attempting to compile \fIMH\fP
  18481. + .PP
  18482. + .KS
  18483. + .SH
  18484. + Bug Fixes
  18485. + .LP
  18486. + Some bugs were fixed which in general were not user\-visible:
  18487. + .IP "address parser" \w'dynamicnmemory'u+2n
  18488. + Fixed to allow use of the \*(lqAT\*(rq domain, and some
  18489. + minor bugs were fixed pertaining to address groups.
  18490. + .IP "date parser"
  18491. + Improved to accept more forms of illegal dates.  Military
  18492. + timezones were removed.
  18493. + .IP "dynamic memory"
  18494. + Many problems with corruption of the dynamic memory pool
  18495. + have been fixed.
  18496. + .IP locking
  18497. + Will open files for write, if necessary to enable locking.
  18498. + .IP "nil pointers"
  18499. + All reported nil pointer problems have been fixed.
  18500. + .IP replcomps
  18501. + The \*(lqIn\-Reply\-To:\*(rq header had quotes added
  18502. + around the date field to comply with RFC822.
  18503. + .KE
  18504. + .SH
  18505. + White Pages
  18506. + .LP
  18507. + If \fIMH\fP is compiled with the \fBWP\fP option,
  18508. + \fIsend\fP recognizes an address between \*(lq<<\*(rq and \*(lq>>\*(rq characters
  18509. + such as:
  18510. + .DS
  18511. + To: << rose \-org psi >>
  18512. + .DE
  18513. + to be a name meaningful to a whitepages service.  In order to expand the
  18514. + name, \fIsend\fP must be invoked interactively
  18515. + (i.e., not from \fIpush\fP\^).  For each
  18516. + name, \fIsend\fP will invoke a command called \fIfred\fP\^
  18517. + in a special mode asking to expand the name.
  18518. + .PP
  18519. + To get a copy of the white pages service, contact wpp\-manager@psi.com.
  18520. + .SH
  18521. + Configuration Options
  18522. + .LP
  18523. + Some configuration options have been added or changed:
  18524. + .IP cc \w'bbdelivery'u+2n
  18525. + To specify an alternate C compiler.
  18526. + .IP ccoptions
  18527. + Defaults to `\-O'.
  18528. + .IP bboards
  18529. + May now be defined as \*(lqon\*(rq,
  18530. + \*(lqoff\*(rq, \*(lqpop\*(rq, or \*(lqnntp\*(rq.
  18531. + .IP bbdelivery
  18532. + Determines whether the bboard delivery agent
  18533. + and library files should be installed.
  18534. + .IP lex
  18535. + To specify an alternate version of \fIlex\fP\^.
  18536. + .IP mailgroup
  18537. + If defined, \fIinc\fP will be made set\-group\-id to this group.
  18538. + .IP sharedlib
  18539. + For \fBSUN40\fP systems; if \*(lqon\*(rq, makes \fBlibmh.a\fP
  18540. + into a shared library.
  18541. + .IP slibdir
  18542. + The directory where the above shared library should be installed.
  18543. + .IP sprintf
  18544. + Set this to \*(lqint\*(rq if that's what your \fIsprintf\fP\0(3) library
  18545. + routine returns.
  18546. + .SH
  18547. + Compilation Options
  18548. + .LP
  18549. + For different configurations,
  18550. + several `\-D' options to \fIcc\fP have been added or changed:
  18551. + .IP BERK \w'SENDMAILBUG'u+1n
  18552. + This disables the address and date parsing routines.  If you
  18553. + want to do much with \fImh\-format\fP\0(5), don't enable this.
  18554. + .IP BSD43
  18555. + Will make \fIrcvtty\fP set\-group\-id to the group \*(lqtty\*(rq.
  18556. + .IP DBM
  18557. + For sites with a dbm\-style password file (such as with Yellow
  18558. + Pages), \fIMH\fP will not read the entire passwd file into a cache.
  18559. + At one site that runs YP on a large passwd file, using this
  18560. + showed a 6:1 performance improvement.
  18561. + .IP NETWORK
  18562. + This option has been deleted.  See \fBSOCKETS\fP.
  18563. + .IP NOIOCTLH
  18564. + Tells \fIMH\fP not to include the file \fBsys/ioctl.h\fP.  Use this
  18565. + if this file is not present on your system.
  18566. + .IP NTOHLSWAP
  18567. + On systems with TCP/IP networking,
  18568. + \fImsh\fP will try to use the \fBntohl()\fP macro from the
  18569. + file \fBnetinet/in.h\fP to byte\-swap the binary map files
  18570. + it writes.
  18571. + .IP SENDMAILBUG
  18572. + Some versions of \fIsendmail\fP return a \fB451\fP (failure) reply code
  18573. + when they don't mean to indicate failure.  This option considers
  18574. + that code to be equivalent to \fB250\fP (OK).
  18575. + .IP SHADOW
  18576. + Causes \fIpopd\fP to read the file \fB/etc/shadow\fP for
  18577. + encrypted passwords instead of \fB/etc/passwd\fP.  Use this if you
  18578. + have a shadow password file (such as on newer versions of SYSTEM 5).
  18579. + .IP SOCKETS
  18580. + Enable this if you are on a non\-BSD system with a
  18581. + socket interface for TCP/IP networking compatible with 4.2BSD
  18582. + .SM
  18583. + UNIX.
  18584. + .NL
  18585. + .IP SUN40
  18586. + Use on Suns running Sun OS 4.0 and later.
  18587. + .IP SYS5
  18588. + This option has been updated to refer to SYS5 R3 and later systems.
  18589. + .IP SYS5DIR
  18590. + Use this if your system uses \*(lqstruct dirent\*(rq instead of
  18591. + \*(lqstruct direct\*(rq.  This should be true for systems based
  18592. + on SYS5 R3 and later.
  18593. + .IP TYPESIG
  18594. + Defines the base type for the \fIsignal\fP system call.  This
  18595. + defaults to \*(lqint\*(rq, but should be defined as \*(lqvoid\*(rq
  18596. + if appropriate for your system.
  18597. + .IP WP
  18598. + Enables support for the White Pages service.
  18599. + .SH
  18600. + Installation
  18601. + .LP
  18602. + \fIMH\fP will now
  18603. + explicitly set the protection mode on every file it installs.
  18604. + .PP
  18605. + Previously any existing file installed by \fIMH\fP
  18606. + would be backed up into
  18607. + the source tree, and then overwritten.
  18608. + Now, a few system\-dependent files will not be overwritten, and your
  18609. + changes will have to be merged in by hand.
  18610. + See the \fBREAD\-ME\fP file for more details.
  18611. *** ../mh-6.7.2/papers/doclib/READ-ME    Tue Mar  6 14:50:39 1990
  18612. --- papers/doclib/READ-ME    Thu Feb 13 10:26:09 1992
  18613. ***************
  18614. *** 1,2 ****
  18615. ! [ doclib/READ-ME - 31Jan90/JLR ]
  18616.   
  18617. --- 1,2 ----
  18618. ! @(#)$Id: READ-ME,v 1.2 1992/02/13 18:26:08 jromine Exp $
  18619.   
  18620. ***************
  18621. *** 22,25 ****
  18622.   For this reason, this directory contains all files necessary to typeset
  18623. ! these documents using plain TeX (as of Version 2.991).  The Makefiles
  18624. ! call TeX as "tex82".
  18625.   
  18626. --- 22,24 ----
  18627.   For this reason, this directory contains all files necessary to typeset
  18628. ! these documents using plain TeX (as of Version 2.991).
  18629.   
  18630. *** ../mh-6.7.2/papers/doclib/diss.sty    Thu Apr  5 16:05:45 1990
  18631. --- papers/doclib/diss.sty    Thu Feb 13 10:27:38 1992
  18632. ***************
  18633. *** 1,3 ****
  18634.   % UCI Dissertation Style for AmSTeX.
  18635. ! % @(#)$Id: diss.sty,v 1.3 90/04/05 15:20:23 sources Exp $
  18636.   
  18637. --- 1,3 ----
  18638.   % UCI Dissertation Style for AmSTeX.
  18639. ! % @(#)$Id: diss.sty,v 1.3 1990/04/05 15:20:23 sources Exp $
  18640.   
  18641. *** ../mh-6.7.2/papers/mh4/Makefile    Tue Mar  6 14:49:44 1990
  18642. --- papers/mh4/Makefile    Thu Feb 13 10:23:51 1992
  18643. ***************
  18644. *** 10,12 ****
  18645.   
  18646. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18647.               \\nonstopmode\\input $<\\bye; \
  18648. --- 10,12 ----
  18649.   
  18650. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18651.               \\nonstopmode\\input $<\\bye; \
  18652. *** ../mh-6.7.2/papers/mh5/Makefile    Tue Mar  6 14:49:45 1990
  18653. --- papers/mh5/Makefile    Thu Feb 13 10:23:54 1992
  18654. ***************
  18655. *** 10,12 ****
  18656.   
  18657. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18658.               \\nonstopmode\\input $<\\bye; \
  18659. --- 10,12 ----
  18660.   
  18661. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18662.               \\nonstopmode\\input $<\\bye; \
  18663. *** ../mh-6.7.2/papers/multifarious/Makefile    Tue Mar  6 14:49:46 1990
  18664. --- papers/multifarious/Makefile    Thu Feb 13 10:23:57 1992
  18665. ***************
  18666. *** 10,12 ****
  18667.   
  18668. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18669.               \\nonstopmode\\input $<\\bye; \
  18670. --- 10,12 ----
  18671.   
  18672. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18673.               \\nonstopmode\\input $<\\bye; \
  18674. *** ../mh-6.7.2/papers/realwork/Makefile    Tue Mar  6 14:49:46 1990
  18675. --- papers/realwork/Makefile    Thu Feb 13 10:24:01 1992
  18676. ***************
  18677. *** 10,12 ****
  18678.   
  18679. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18680.               \\nonstopmode\\input $<\\bye; \
  18681. --- 10,12 ----
  18682.   
  18683. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18684.               \\nonstopmode\\input $<\\bye; \
  18685. *** ../mh-6.7.2/papers/trusted/Makefile    Tue Mar  6 14:49:47 1990
  18686. --- papers/trusted/Makefile    Thu Feb 13 10:24:03 1992
  18687. ***************
  18688. *** 10,12 ****
  18689.   
  18690. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18691.               \\nonstopmode\\input $<\\bye; \
  18692. --- 10,12 ----
  18693.   
  18694. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18695.               \\nonstopmode\\input $<\\bye; \
  18696. *** ../mh-6.7.2/papers/tutorial/Makefile    Tue Mar  6 14:49:47 1990
  18697. --- papers/tutorial/Makefile    Thu Feb 13 10:24:06 1992
  18698. ***************
  18699. *** 10,12 ****
  18700.   
  18701. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex82 \
  18702.               \\nonstopmode\\input $<\\bye; \
  18703. --- 10,12 ----
  18704.   
  18705. ! .tex.dvi:;    sh -c 'if TEXINPUTS=../doclib:.:${TEXINPUTS} tex \
  18706.               \\nonstopmode\\input $<\\bye; \
  18707. *** ../mh-6.7.2/sbr/addrsbr.c    Thu Jan 30 14:39:50 1992
  18708. --- sbr/addrsbr.c    Mon Oct 26 14:44:34 1992
  18709. ***************
  18710. *** 1,7 ****
  18711.   /* addrsbr.c - parse addresses 822-style */
  18712.   #ifndef    lint
  18713. ! static char ident[] = "@(#)$Id: addrsbr.c,v 1.10 1992/01/30 22:39:48 jromine Exp $";
  18714. ! #endif    lint
  18715.   
  18716.   #include "../h/mh.h"
  18717.   #include "../h/addrsbr.h"
  18718. --- 1,7 ----
  18719.   /* addrsbr.c - parse addresses 822-style */
  18720.   #ifndef    lint
  18721. ! static char ident[] = "@(#)$Id: addrsbr.c,v 1.13 1992/10/26 22:44:26 jromine Exp $";
  18722. ! #endif /* lint */
  18723.   
  18724.   #include "../h/mh.h"
  18725.   #include "../h/addrsbr.h"
  18726. ***************
  18727. *** 9,15 ****
  18728.   #include <stdio.h>
  18729.   #ifdef    BERK
  18730.   #include <ctype.h>
  18731. ! #endif    BERK
  18732.   
  18733.   /* High level parsing of addresses:
  18734.   
  18735. --- 9,15 ----
  18736.   #include <stdio.h>
  18737.   #ifdef    BERK
  18738.   #include <ctype.h>
  18739. ! #endif /* BERK */
  18740.   
  18741.   /* High level parsing of addresses:
  18742.   
  18743. ***************
  18744. *** 84,95 ****
  18745.   #if    !defined(DUMB) && defined(SENDMTS) && !defined(BANG)
  18746.   #define    MF
  18747.   #define    UucpChan()    "UUCP"
  18748. ! #endif    MF
  18749.   
  18750.   #ifdef    BERK
  18751.   static char *err = NULL;
  18752.   static char adrtext[BUFSIZ];
  18753. ! #else    not BERK
  18754.   static int  ingrp = 0;
  18755.   
  18756.   static char *pers = NULL;
  18757. --- 84,95 ----
  18758.   #if    !defined(DUMB) && defined(SENDMTS) && !defined(BANG)
  18759.   #define    MF
  18760.   #define    UucpChan()    "UUCP"
  18761. ! #endif /* MF */
  18762.   
  18763.   #ifdef    BERK
  18764.   static char *err = NULL;
  18765.   static char adrtext[BUFSIZ];
  18766. ! #else /* not BERK */
  18767.   static int  ingrp = 0;
  18768.   
  18769.   static char *pers = NULL;
  18770. ***************
  18771. *** 100,106 ****
  18772.   static char *note = NULL;
  18773.   
  18774.   static char err[BUFSIZ];
  18775. ! #endif    not BERK
  18776.   static char adr[BUFSIZ];
  18777.   
  18778.   
  18779. --- 100,106 ----
  18780.   static char *note = NULL;
  18781.   
  18782.   static char err[BUFSIZ];
  18783. ! #endif /* not BERK */
  18784.   static char adr[BUFSIZ];
  18785.   
  18786.   
  18787. ***************
  18788. *** 182,188 ****
  18789.       while (state != EOA) {
  18790.       *adrcopy++ = c;
  18791.       if (state != COM)
  18792. !         *nxtout++ = isupper (c) ? tolower (c) : c;
  18793.       switch (state+c) {
  18794.   
  18795.       case NORMAL+'\n':    /* discard newlines */
  18796. --- 182,188 ----
  18797.       while (state != EOA) {
  18798.       *adrcopy++ = c;
  18799.       if (state != COM)
  18800. !         *nxtout++ = (isalpha(c) && isupper (c)) ? tolower (c) : c;
  18801.       switch (state+c) {
  18802.   
  18803.       case NORMAL+'\n':    /* discard newlines */
  18804. ***************
  18805. *** 244,250 ****
  18806.           err = "illegal \\";
  18807.           }
  18808.           *adrcopy++ = c;
  18809. !         *nxtout++ = isupper (c) ? tolower (c) : c;
  18810.           break;
  18811.   
  18812.       case NORMAL+',':
  18813. --- 244,250 ----
  18814.           err = "illegal \\";
  18815.           }
  18816.           *adrcopy++ = c;
  18817. !         *nxtout++ = (isalpha(c) && isupper (c)) ? tolower (c) : c;
  18818.           break;
  18819.   
  18820.       case NORMAL+',':
  18821. ***************
  18822. *** 286,296 ****
  18823.       adr_ptr = NULL;
  18824.       return NULL;
  18825.       }
  18826. ! #else    not BERK
  18827.       register struct adrx *ap;
  18828.   
  18829.       pers = mbox = host = route = grp = note = NULL;
  18830. !     err[0] = NULL;
  18831.   
  18832.       if ((ap = getadrx (addrs ? addrs : "")) == NULL)
  18833.       return NULL;
  18834. --- 286,296 ----
  18835.       adr_ptr = NULL;
  18836.       return NULL;
  18837.       }
  18838. ! #else /* not BERK */
  18839.       register struct adrx *ap;
  18840.   
  18841.       pers = mbox = host = route = grp = note = NULL;
  18842. !     err[0] = '\0';
  18843.   
  18844.       if ((ap = getadrx (addrs ? addrs : "")) == NULL)
  18845.       return NULL;
  18846. ***************
  18847. *** 307,313 ****
  18848.       (void) strcpy (err, ap -> err);
  18849.   
  18850.       return adr;
  18851. ! #endif    not BERK
  18852.   }
  18853.   
  18854.   /*   */
  18855. --- 307,313 ----
  18856.       (void) strcpy (err, ap -> err);
  18857.   
  18858.       return adr;
  18859. ! #endif /* not BERK */
  18860.   }
  18861.   
  18862.   /*   */
  18863. ***************
  18864. *** 314,320 ****
  18865.   
  18866.   #ifdef    BERK
  18867.   /* ARGSUSED */
  18868. ! #endif    BERK
  18869.   
  18870.   struct mailname *getm (str, dfhost, dftype, wanthost, eresult)
  18871.   register char   *str,
  18872. --- 314,320 ----
  18873.   
  18874.   #ifdef    BERK
  18875.   /* ARGSUSED */
  18876. ! #endif /* BERK */
  18877.   
  18878.   struct mailname *getm (str, dfhost, dftype, wanthost, eresult)
  18879.   register char   *str,
  18880. ***************
  18881. *** 327,337 ****
  18882.       register char   *pp;
  18883.   #ifndef    DUMB
  18884.       register char   *dp;
  18885. ! #endif    not DUMB
  18886.   #ifdef    MF
  18887.       char   *up = UucpChan ();
  18888. ! #endif    MF
  18889. ! #endif    not BERK
  18890.       register struct mailname *mp;
  18891.   
  18892.       if (err && err[0]) {
  18893. --- 327,337 ----
  18894.       register char   *pp;
  18895.   #ifndef    DUMB
  18896.       register char   *dp;
  18897. ! #endif /* not DUMB */
  18898.   #ifdef    MF
  18899.       char   *up = UucpChan ();
  18900. ! #endif /* MF */
  18901. ! #endif /* not BERK */
  18902.       register struct mailname *mp;
  18903.   
  18904.       if (err && err[0]) {
  18905. ***************
  18906. *** 344,354 ****
  18907.       }
  18908.   #ifdef    BERK
  18909.       if (str == NULL || *str == '\0') {
  18910. ! #else     not BERK
  18911.       if (pers == NULL
  18912.           && mbox == NULL && host == NULL && route == NULL
  18913.           && grp == NULL) {
  18914. ! #endif    not BERK
  18915.       if (eresult)
  18916.           (void) strcpy (eresult, "null address");
  18917.       else
  18918. --- 344,354 ----
  18919.       }
  18920.   #ifdef    BERK
  18921.       if (str == NULL || *str == '\0') {
  18922. ! #else /* not BERK */
  18923.       if (pers == NULL
  18924.           && mbox == NULL && host == NULL && route == NULL
  18925.           && grp == NULL) {
  18926. ! #endif /* not BERK */
  18927.       if (eresult)
  18928.           (void) strcpy (eresult, "null address");
  18929.       else
  18930. ***************
  18931. *** 370,376 ****
  18932.       dfhost = LocalName ();
  18933.       dftype = LOCALHOST;
  18934.       }
  18935. ! #endif    not BERK
  18936.   
  18937.       mp = (struct mailname  *) calloc ((unsigned) 1, sizeof *mp);
  18938.       if (mp == NULL) {
  18939. --- 370,376 ----
  18940.       dfhost = LocalName ();
  18941.       dftype = LOCALHOST;
  18942.       }
  18943. ! #endif /* not BERK */
  18944.   
  18945.       mp = (struct mailname  *) calloc ((unsigned) 1, sizeof *mp);
  18946.       if (mp == NULL) {
  18947. ***************
  18948. *** 389,395 ****
  18949.       mp -> m_mbox = getcpy (adr);
  18950.       if (!index (adr, '@') && !index (adr, '!'))
  18951.       mp -> m_nohost = 1;
  18952. ! #else    not BERK
  18953.       if (pers)
  18954.       mp -> m_pers = getcpy (pers);
  18955.   
  18956. --- 389,395 ----
  18957.       mp -> m_mbox = getcpy (adr);
  18958.       if (!index (adr, '@') && !index (adr, '!'))
  18959.       mp -> m_nohost = 1;
  18960. ! #else /* not BERK */
  18961.       if (pers)
  18962.       mp -> m_pers = getcpy (pers);
  18963.   
  18964. ***************
  18965. *** 414,420 ****
  18966.           *pp = NULL;
  18967.           goto get_uucp;
  18968.       }
  18969. ! #else    not MMDFMTS
  18970.       if (up && (pp = index (host, '.')) 
  18971.           && uleq (up, pp + 1)) {/* uucpaddr@host.<uucp> */
  18972.           *pp = NULL;
  18973. --- 414,420 ----
  18974.           *pp = NULL;
  18975.           goto get_uucp;
  18976.       }
  18977. ! #else /* not MMDFMTS */
  18978.       if (up && (pp = index (host, '.')) 
  18979.           && uleq (up, pp + 1)) {/* uucpaddr@host.<uucp> */
  18980.           *pp = NULL;
  18981. ***************
  18982. *** 423,429 ****
  18983.           mp -> m_type = UUCPHOST;
  18984.           goto got_host;
  18985.       }
  18986. ! #endif    not MMDFMTS
  18987.       if (up && uleq (dfhost, LocalName ())
  18988.           && uleq (up, host)) {/* uucpaddr@<uucp> [local] */
  18989.           if (pp = index (mbox, '!')) {
  18990. --- 423,429 ----
  18991.           mp -> m_type = UUCPHOST;
  18992.           goto got_host;
  18993.       }
  18994. ! #endif /* not MMDFMTS */
  18995.       if (up && uleq (dfhost, LocalName ())
  18996.           && uleq (up, host)) {/* uucpaddr@<uucp> [local] */
  18997.           if (pp = index (mbox, '!')) {
  18998. ***************
  18999. *** 438,450 ****
  19000.           mp -> m_type = UUCPHOST;
  19001.           goto got_host;
  19002.       }
  19003. ! #endif    MF
  19004.       mp -> m_mbox = getcpy (mbox);
  19005.       mp -> m_host = getcpy (host);
  19006.       }
  19007.       else {
  19008.       if (pp = index (mbox, '!')) {
  19009. !         *pp++ = NULL;
  19010.           mp -> m_mbox = getcpy (pp);
  19011.           mp -> m_host = getcpy (mbox);
  19012.           mp -> m_type = UUCPHOST;
  19013. --- 438,450 ----
  19014.           mp -> m_type = UUCPHOST;
  19015.           goto got_host;
  19016.       }
  19017. ! #endif /* MF */
  19018.       mp -> m_mbox = getcpy (mbox);
  19019.       mp -> m_host = getcpy (host);
  19020.       }
  19021.       else {
  19022.       if (pp = index (mbox, '!')) {
  19023. !         *pp++ = '\0';
  19024.           mp -> m_mbox = getcpy (pp);
  19025.           mp -> m_host = getcpy (mbox);
  19026.           mp -> m_type = UUCPHOST;
  19027. ***************
  19028. *** 458,464 ****
  19029.           mp -> m_type = dftype;
  19030.           }
  19031.           else
  19032. ! #endif    DUMB
  19033.           {
  19034.           mp -> m_host = route ? NULLCP : getcpy (dfhost);
  19035.           mp -> m_type = route ? NETHOST : dftype;
  19036. --- 458,464 ----
  19037.           mp -> m_type = dftype;
  19038.           }
  19039.           else
  19040. ! #endif /* DUMB */
  19041.           {
  19042.           mp -> m_host = route ? NULLCP : getcpy (dfhost);
  19043.           mp -> m_type = route ? NETHOST : dftype;
  19044. ***************
  19045. *** 476,482 ****
  19046.       else
  19047.       mp -> m_type = uleq (LocalName (), mp -> m_host) ? LOCALHOST
  19048.           : NETHOST;
  19049. ! #else    not DUMB
  19050.       else
  19051.       if (pp = OfficialName (mp -> m_host)) {
  19052.       got_real_host: ;
  19053. --- 476,482 ----
  19054.       else
  19055.       mp -> m_type = uleq (LocalName (), mp -> m_host) ? LOCALHOST
  19056.           : NETHOST;
  19057. ! #else /* not DUMB */
  19058.       else
  19059.       if (pp = OfficialName (mp -> m_host)) {
  19060.       got_real_host: ;
  19061. ***************
  19062. *** 494,500 ****
  19063.           }
  19064.           mp -> m_type = BADHOST;
  19065.       }
  19066. ! #endif    not DUMB
  19067.   
  19068.   got_host: ;
  19069.       if (route)
  19070. --- 494,500 ----
  19071.           }
  19072.           mp -> m_type = BADHOST;
  19073.       }
  19074. ! #endif /* not DUMB */
  19075.   
  19076.   got_host: ;
  19077.       if (route)
  19078. ***************
  19079. *** 504,510 ****
  19080.       mp -> m_gname = getcpy (grp);
  19081.       if (note)
  19082.       mp -> m_note = getcpy (note);
  19083. ! #endif    not BERK
  19084.   
  19085.       return mp;
  19086.   }
  19087. --- 504,510 ----
  19088.       mp -> m_gname = getcpy (grp);
  19089.       if (note)
  19090.       mp -> m_note = getcpy (note);
  19091. ! #endif /* not BERK */
  19092.   
  19093.       return mp;
  19094.   }
  19095. ***************
  19096. *** 534,540 ****
  19097.   #ifdef    MHMTS
  19098.       if (mp -> m_aka)
  19099.       free (mp -> m_aka);
  19100. ! #endif    MHMTS
  19101.   
  19102.       free ((char *) mp);
  19103.   }
  19104. --- 534,540 ----
  19105.   #ifdef    MHMTS
  19106.       if (mp -> m_aka)
  19107.       free (mp -> m_aka);
  19108. ! #endif /* MHMTS */
  19109.   
  19110.       free ((char *) mp);
  19111.   }
  19112. ***************
  19113. *** 548,556 ****
  19114.   #ifndef    BERK
  19115.   #ifdef    MF
  19116.       char   *up = UucpChan ();
  19117. ! #endif    MF
  19118.       static char addr[BUFSIZ];
  19119. ! #endif    not BERK
  19120.       static char buffer[BUFSIZ];
  19121.   
  19122.   #ifdef    BERK
  19123. --- 548,556 ----
  19124.   #ifndef    BERK
  19125.   #ifdef    MF
  19126.       char   *up = UucpChan ();
  19127. ! #endif /* MF */
  19128.       static char addr[BUFSIZ];
  19129. ! #endif /* not BERK */
  19130.       static char buffer[BUFSIZ];
  19131.   
  19132.   #ifdef    BERK
  19133. ***************
  19134. *** 559,565 ****
  19135.       (void) sprintf (buffer, "%s <%s>", mp->m_pers, mp->m_mbox);
  19136.       else
  19137.       (void) strcpy (buffer, mp -> m_text);
  19138. ! #else    not BERK
  19139.   
  19140.   #ifdef    MF
  19141.       if (up && mp -> m_type == UUCPHOST)
  19142. --- 559,565 ----
  19143.       (void) sprintf (buffer, "%s <%s>", mp->m_pers, mp->m_mbox);
  19144.       else
  19145.       (void) strcpy (buffer, mp -> m_text);
  19146. ! #else /* not BERK */
  19147.   
  19148.   #ifdef    MF
  19149.       if (up && mp -> m_type == UUCPHOST)
  19150. ***************
  19151. *** 566,582 ****
  19152.   #ifdef    MMDFMTS
  19153.       (void) sprintf (addr, "%s!%s%%%s@%s", mp -> m_host, mp -> m_mbox,
  19154.           up, LocalName ());
  19155. ! #else    not MMDFMTS
  19156.       (void) sprintf (addr, "%s@%s.%s", mp -> m_mbox, mp -> m_host, up);
  19157. ! #endif    not MMDFMTS
  19158.       else 
  19159. ! #endif    MF
  19160.   
  19161.   #ifdef    DUMB
  19162.       if (mp -> m_nohost)
  19163.           (void) strcpy (addr, mp -> m_mbox ? mp -> m_mbox : "");
  19164.       else
  19165. ! #endif    DUMB
  19166.   
  19167.   #ifndef    BANG
  19168.       if (mp -> m_type != UUCPHOST)
  19169. --- 566,582 ----
  19170.   #ifdef    MMDFMTS
  19171.       (void) sprintf (addr, "%s!%s%%%s@%s", mp -> m_host, mp -> m_mbox,
  19172.           up, LocalName ());
  19173. ! #else /* not MMDFMTS */
  19174.       (void) sprintf (addr, "%s@%s.%s", mp -> m_mbox, mp -> m_host, up);
  19175. ! #endif /* not MMDFMTS */
  19176.       else 
  19177. ! #endif /* MF */
  19178.   
  19179.   #ifdef    DUMB
  19180.       if (mp -> m_nohost)
  19181.           (void) strcpy (addr, mp -> m_mbox ? mp -> m_mbox : "");
  19182.       else
  19183. ! #endif /* DUMB */
  19184.   
  19185.   #ifndef    BANG
  19186.       if (mp -> m_type != UUCPHOST)
  19187. ***************
  19188. *** 583,589 ****
  19189.           (void) sprintf (addr, mp -> m_host ? "%s%s@%s" : "%s%s",
  19190.           mp -> m_path ? mp -> m_path : "", mp -> m_mbox, mp -> m_host);
  19191.       else
  19192. ! #endif    not BANG
  19193.           (void) sprintf (addr, "%s!%s", mp -> m_host, mp -> m_mbox);
  19194.   
  19195.       if (!extras)
  19196. --- 583,589 ----
  19197.           (void) sprintf (addr, mp -> m_host ? "%s%s@%s" : "%s%s",
  19198.           mp -> m_path ? mp -> m_path : "", mp -> m_mbox, mp -> m_host);
  19199.       else
  19200. ! #endif /* not BANG */
  19201.           (void) sprintf (addr, "%s!%s", mp -> m_host, mp -> m_mbox);
  19202.   
  19203.       if (!extras)
  19204. ***************
  19205. *** 603,609 ****
  19206.           (void) sprintf (buffer, "%s %s", addr, mp -> m_note);
  19207.       else
  19208.           (void) strcpy (buffer, addr);
  19209. ! #endif    not BERK
  19210.   
  19211.       return buffer;
  19212.   }
  19213. --- 603,609 ----
  19214.           (void) sprintf (buffer, "%s %s", addr, mp -> m_note);
  19215.       else
  19216.           (void) strcpy (buffer, addr);
  19217. ! #endif /* not BERK */
  19218.   
  19219.       return buffer;
  19220.   }
  19221. ***************
  19222. *** 626,632 ****
  19223.   #ifdef    REALLYDUMB
  19224.       return getusr ();
  19225.       else
  19226. ! #endif    REALLYDUMB
  19227.       local = getusr ();
  19228.   
  19229.       if (domain == NULL)
  19230. --- 626,632 ----
  19231.   #ifdef    REALLYDUMB
  19232.       return getusr ();
  19233.       else
  19234. ! #endif /* REALLYDUMB */
  19235.       local = getusr ();
  19236.   
  19237.       if (domain == NULL)
  19238. ***************
  19239. *** 633,646 ****
  19240.   #ifdef    REALLYDUMB
  19241.       return local;
  19242.       else
  19243. ! #endif    REALLYDUMB
  19244.       domain = LocalName ();
  19245.   
  19246.   #ifndef    BANG
  19247.       (void) sprintf (addr, "%s@%s", local, domain);
  19248. ! #else    BANG
  19249.       (void) sprintf (addr, "%s!%s", domain, local);
  19250. ! #endif    BANG
  19251.   
  19252.       return addr;
  19253.   }
  19254. --- 633,646 ----
  19255.   #ifdef    REALLYDUMB
  19256.       return local;
  19257.       else
  19258. ! #endif /* REALLYDUMB */
  19259.       domain = LocalName ();
  19260.   
  19261.   #ifndef    BANG
  19262.       (void) sprintf (addr, "%s@%s", local, domain);
  19263. ! #else /* BANG */
  19264.       (void) sprintf (addr, "%s!%s", domain, local);
  19265. ! #endif /* BANG */
  19266.   
  19267.       return addr;
  19268.   }
  19269. ***************
  19270. *** 667,673 ****
  19271.   #ifndef    BERK
  19272.       register char  *pp;
  19273.       char    buffer[BUFSIZ];
  19274. ! #endif    not BERK
  19275.       register struct mailname   *mp;
  19276.       static char *am = NULL;
  19277.       static struct mailname  mq={NULL};
  19278. --- 667,673 ----
  19279.   #ifndef    BERK
  19280.       register char  *pp;
  19281.       char    buffer[BUFSIZ];
  19282. ! #endif /* not BERK */
  19283.       register struct mailname   *mp;
  19284.       static char *am = NULL;
  19285.       static struct mailname  mq={NULL};
  19286. ***************
  19287. *** 700,708 ****
  19288.               if (mp -> m_mbox[mp -> m_ingrp - 1] == '*') {
  19289.               mp -> m_type |= W_MEND;
  19290.               mp -> m_ingrp--;
  19291. !             mp -> m_mbox[mp -> m_ingrp] = NULL;
  19292.               }
  19293. ! #else    not BERK
  19294.               /* owing to screwy munging, wildcarding is a great idea
  19295.                  even under #ifndef BERK, so... */
  19296.               mp -> m_type = W_NIL;
  19297. --- 700,708 ----
  19298.               if (mp -> m_mbox[mp -> m_ingrp - 1] == '*') {
  19299.               mp -> m_type |= W_MEND;
  19300.               mp -> m_ingrp--;
  19301. !             mp -> m_mbox[mp -> m_ingrp] = 0;
  19302.               }
  19303. ! #else /* not BERK */
  19304.               /* owing to screwy munging, wildcarding is a great idea
  19305.                  even under #ifndef BERK, so... */
  19306.               mp -> m_type = W_NIL;
  19307. ***************
  19308. *** 710,728 ****
  19309.               mp -> m_type |= W_MBEG, mp -> m_mbox++;
  19310.               if (*(cp = mp -> m_mbox + strlen (mp -> m_mbox) - 1)
  19311.                   == '*')
  19312. !             mp -> m_type |= W_MEND, *cp = NULL;
  19313.               if (mp -> m_host) {
  19314.               if (*mp -> m_host == '*')
  19315.                   mp -> m_type |= W_HBEG, mp -> m_host++;
  19316.               if (*(cp = mp -> m_host + strlen (mp -> m_host) - 1)
  19317.                   == '*')
  19318. !                 mp -> m_type |= W_HEND, *cp = NULL;
  19319.               }
  19320.               if ((cp = getenv ("MHWDEBUG")) && *cp)
  19321.               fprintf (stderr, "mbox=\"%s\" host=\"%s\" %s\n",
  19322.                   mp -> m_mbox, mp -> m_host,
  19323.                   sprintb (buffer, (unsigned) mp -> m_type, WBITS));
  19324. ! #endif    not BERK
  19325.           }
  19326.           if (oops)
  19327.           advise (NULLCP, "please fix the %s: entry in your %s file",
  19328. --- 710,728 ----
  19329.               mp -> m_type |= W_MBEG, mp -> m_mbox++;
  19330.               if (*(cp = mp -> m_mbox + strlen (mp -> m_mbox) - 1)
  19331.                   == '*')
  19332. !             mp -> m_type |= W_MEND, *cp = '\0';
  19333.               if (mp -> m_host) {
  19334.               if (*mp -> m_host == '*')
  19335.                   mp -> m_type |= W_HBEG, mp -> m_host++;
  19336.               if (*(cp = mp -> m_host + strlen (mp -> m_host) - 1)
  19337.                   == '*')
  19338. !                 mp -> m_type |= W_HEND, *cp = '\0';
  19339.               }
  19340.               if ((cp = getenv ("MHWDEBUG")) && *cp)
  19341.               fprintf (stderr, "mbox=\"%s\" host=\"%s\" %s\n",
  19342.                   mp -> m_mbox, mp -> m_host,
  19343.                   sprintb (buffer, (unsigned) mp -> m_type, WBITS));
  19344. ! #endif /* not BERK */
  19345.           }
  19346.           if (oops)
  19347.           advise (NULLCP, "please fix the %s: entry in your %s file",
  19348. ***************
  19349. *** 736,742 ****
  19350.       cp = np -> m_mbox;
  19351.       if (strcmp (cp, mq.m_mbox) == 0)
  19352.       return 1;
  19353. ! #else    not BERK
  19354.       switch (np -> m_type) {
  19355.       case NETHOST:
  19356.           len = strlen (cp = LocalName ());
  19357. --- 736,742 ----
  19358.       cp = np -> m_mbox;
  19359.       if (strcmp (cp, mq.m_mbox) == 0)
  19360.       return 1;
  19361. ! #else /* not BERK */
  19362.       switch (np -> m_type) {
  19363.       case NETHOST:
  19364.           len = strlen (cp = LocalName ());
  19365. ***************
  19366. *** 756,762 ****
  19367.       default:
  19368.           break;
  19369.       }
  19370. ! #endif    not BERK
  19371.   
  19372.   #ifdef    BERK
  19373.       len = strlen (cp);
  19374. --- 756,762 ----
  19375.       default:
  19376.           break;
  19377.       }
  19378. ! #endif /* not BERK */
  19379.   
  19380.   #ifdef    BERK
  19381.       len = strlen (cp);
  19382. ***************
  19383. *** 783,789 ****
  19384.               if (strncmp (&cp[i], mp -> m_mbox, mp -> m_ingrp) == 0)
  19385.                   return 1;
  19386.           }
  19387. ! #else    not BERK
  19388.       for (mp = &mq; mp = mp -> m_next;) {
  19389.       if (np -> m_mbox == NULL)
  19390.           continue;
  19391. --- 783,789 ----
  19392.               if (strncmp (&cp[i], mp -> m_mbox, mp -> m_ingrp) == 0)
  19393.                   return 1;
  19394.           }
  19395. ! #else /* not BERK */
  19396.       for (mp = &mq; mp = mp -> m_next;) {
  19397.       if (np -> m_mbox == NULL)
  19398.           continue;
  19399. ***************
  19400. *** 836,842 ****
  19401.       }
  19402.       return 1;
  19403.       }
  19404. ! #endif    not BERK
  19405.   
  19406.       return 0;
  19407.   }
  19408. --- 836,842 ----
  19409.       }
  19410.       return 1;
  19411.       }
  19412. ! #endif /* not BERK */
  19413.   
  19414.       return 0;
  19415.   }
  19416. *** ../mh-6.7.2/sbr/advertise.c    Thu Oct 29 15:00:23 1987
  19417. --- sbr/advertise.c    Mon Dec 14 16:20:26 1992
  19418. ***************
  19419. *** 1,4 ****
  19420. --- 1,7 ----
  19421.   /* advertise.c - the heart of adios */
  19422. + #ifndef    lint
  19423. + static char ident[] = "@(#)$Id: advertise.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  19424. + #endif    /* lint */
  19425.   
  19426.   #include "../h/mh.h"
  19427.   #include <stdio.h>
  19428. ***************
  19429. *** 5,11 ****
  19430.   #ifdef    BSD42
  19431.   #include <sys/types.h>
  19432.   #include <sys/uio.h>
  19433. ! #endif    BSD42
  19434.   
  19435.   /* For 4.2BSD systems, use writev() for slightly better performance.  Why?
  19436.      Well, there are a couple of reasons.  Primarily, it gives a smoother
  19437. --- 8,14 ----
  19438.   #ifdef    BSD42
  19439.   #include <sys/types.h>
  19440.   #include <sys/uio.h>
  19441. ! #endif    /* BSD42 */
  19442.   
  19443.   /* For 4.2BSD systems, use writev() for slightly better performance.  Why?
  19444.      Well, there are a couple of reasons.  Primarily, it gives a smoother
  19445. ***************
  19446. *** 37,43 ****
  19447.               err[BUFSIZ];
  19448.       struct iovec    iob[20];
  19449.       register struct iovec  *iov = iob;
  19450. ! #endif    BSD42
  19451.   
  19452.       (void) fflush (stdout);
  19453.   
  19454. --- 40,46 ----
  19455.               err[BUFSIZ];
  19456.       struct iovec    iob[20];
  19457.       register struct iovec  *iov = iob;
  19458. ! #endif    /* BSD42 */
  19459.   
  19460.       (void) fflush (stdout);
  19461.   
  19462. ***************
  19463. *** 56,62 ****
  19464.       if (tail)
  19465.       fprintf (stderr, ", %s", tail);
  19466.       (void) fputc ('\n', stderr);
  19467. ! #else    BSD42
  19468.       (void) fflush (stderr);
  19469.   
  19470.       if (invo_name && *invo_name) {
  19471. --- 59,65 ----
  19472.       if (tail)
  19473.       fprintf (stderr, ", %s", tail);
  19474.       (void) fputc ('\n', stderr);
  19475. ! #else    /* BSD42 */
  19476.       (void) fflush (stderr);
  19477.   
  19478.       if (invo_name && *invo_name) {
  19479. ***************
  19480. *** 95,99 ****
  19481.       iov -> iov_len = strlen (iov -> iov_base = "\n");
  19482.       iov++;
  19483.       (void) writev (fileno (stderr), iob, iov - iob);
  19484. ! #endif    BSD42
  19485.   }
  19486. --- 98,102 ----
  19487.       iov -> iov_len = strlen (iov -> iov_base = "\n");
  19488.       iov++;
  19489.       (void) writev (fileno (stderr), iob, iov - iob);
  19490. ! #endif    /* BSD42 */
  19491.   }
  19492. *** ../mh-6.7.2/sbr/closefds.c    Thu Oct 29 15:00:26 1987
  19493. --- sbr/closefds.c    Mon Dec 14 16:20:27 1992
  19494. ***************
  19495. *** 1,9 ****
  19496.   /* closefds.c - close-up fd:s */
  19497.   
  19498.   #include "../h/mh.h"
  19499.   #ifndef    BSD42
  19500.   #include <stdio.h>
  19501. ! #endif    not BSD42
  19502.   
  19503.   
  19504.   void    closefds (i)
  19505. --- 1,12 ----
  19506.   /* closefds.c - close-up fd:s */
  19507. + #ifndef    lint
  19508. + static char ident[] = "@(#)$Id: closefds.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  19509. + #endif    /* lint */
  19510.   
  19511.   #include "../h/mh.h"
  19512.   #ifndef    BSD42
  19513.   #include <stdio.h>
  19514. ! #endif    /* not BSD42 */
  19515.   
  19516.   
  19517.   void    closefds (i)
  19518. ***************
  19519. *** 11,23 ****
  19520.   {
  19521.   #ifndef    BSD42
  19522.       int     nbits = _NFILE;
  19523. ! #else    BSD42
  19524.       int     nbits = getdtablesize ();
  19525. ! #endif    BSD42
  19526.   
  19527.       for (; i < nbits; i++)
  19528.   #ifdef    OVERHEAD
  19529.       if (i != fd_def && i != fd_ctx)
  19530. ! #endif    OVERHEAD
  19531.           (void) close (i);
  19532.   }
  19533. --- 14,26 ----
  19534.   {
  19535.   #ifndef    BSD42
  19536.       int     nbits = _NFILE;
  19537. ! #else    /* BSD42 */
  19538.       int     nbits = getdtablesize ();
  19539. ! #endif    /* BSD42 */
  19540.   
  19541.       for (; i < nbits; i++)
  19542.   #ifdef    OVERHEAD
  19543.       if (i != fd_def && i != fd_ctx)
  19544. ! #endif    /* OVERHEAD */
  19545.           (void) close (i);
  19546.   }
  19547. *** ../mh-6.7.2/sbr/cpydgst.c    Thu Oct 29 15:00:27 1987
  19548. --- sbr/cpydgst.c    Mon Dec 14 16:20:27 1992
  19549. ***************
  19550. *** 1,4 ****
  19551. --- 1,7 ----
  19552.   /* cpydgst.c - copy from one fd to another in encapsulating mode */
  19553. + #ifndef    lint
  19554. + static char ident[] = "@(#)$Id: cpydgst.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  19555. + #endif    /* lint */
  19556.   
  19557.   #include "../h/mh.h"
  19558.   #include <stdio.h>
  19559. ***************
  19560. *** 46,52 ****
  19561.       dp = (bp = outbuf) + sizeof outbuf;
  19562.       for (state = S1; (i = read (in, buffer, sizeof buffer)) > 0;)
  19563.       for (ep = (cp = buffer) + i; cp < ep; cp++) {
  19564. !         if (*cp == NULL)
  19565.           continue;
  19566.           switch (state) {
  19567.           case S1: 
  19568. --- 49,55 ----
  19569.       dp = (bp = outbuf) + sizeof outbuf;
  19570.       for (state = S1; (i = read (in, buffer, sizeof buffer)) > 0;)
  19571.       for (ep = (cp = buffer) + i; cp < ep; cp++) {
  19572. !         if (*cp == '\0')
  19573.           continue;
  19574.           switch (state) {
  19575.           case S1: 
  19576. *** ../mh-6.7.2/sbr/discard.c    Thu Feb 14 14:49:10 1991
  19577. --- sbr/discard.c    Mon Dec 14 16:20:28 1992
  19578. ***************
  19579. *** 1,19 ****
  19580.   /* discard.c - discard output on a file pointer */
  19581.   #ifndef    lint
  19582. ! static char ident[] = "@(#)$Id: discard.c,v 1.4 90/04/05 15:31:32 sources Exp $";
  19583. ! #endif    lint
  19584.   
  19585.   #include "../h/mh.h"
  19586.   #include <stdio.h>
  19587.   #ifndef    SYS5
  19588.   #include <sgtty.h>
  19589. ! #else    SYS5
  19590.   #include <sys/types.h>
  19591.   #include <termio.h>
  19592.   #ifndef    NOIOCTLH
  19593.   #include <sys/ioctl.h>
  19594. ! #endif    NOIOCTLH
  19595. ! #endif    SYS5
  19596.   
  19597.   
  19598.   void    discard (io)
  19599. --- 1,19 ----
  19600.   /* discard.c - discard output on a file pointer */
  19601.   #ifndef    lint
  19602. ! static char ident[] = "@(#)$Id: discard.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  19603. ! #endif    /* lint */
  19604.   
  19605.   #include "../h/mh.h"
  19606.   #include <stdio.h>
  19607.   #ifndef    SYS5
  19608.   #include <sgtty.h>
  19609. ! #else    /* SYS5 */
  19610.   #include <sys/types.h>
  19611.   #include <termio.h>
  19612.   #ifndef    NOIOCTLH
  19613.   #include <sys/ioctl.h>
  19614. ! #endif    /* NOIOCTLH */
  19615. ! #endif    /* SYS5 */
  19616.   
  19617.   
  19618.   void    discard (io)
  19619. ***************
  19620. *** 21,29 ****
  19621.   {
  19622.   #ifndef    SYS5
  19623.       struct sgttyb   sg;
  19624. ! #else    SYS5
  19625.       struct termio   sg;
  19626. ! #endif    SYS5
  19627.   
  19628.       if (io == NULL)
  19629.       return;
  19630. --- 21,29 ----
  19631.   {
  19632.   #ifndef    SYS5
  19633.       struct sgttyb   sg;
  19634. ! #else    /* SYS5 */
  19635.       struct termio   sg;
  19636. ! #endif    /* SYS5 */
  19637.   
  19638.       if (io == NULL)
  19639.       return;
  19640. ***************
  19641. *** 31,40 ****
  19642.   #ifndef    SYS5
  19643.       if (ioctl (fileno (io), TIOCGETP, (char *) &sg) != NOTOK)
  19644.       (void) ioctl (fileno (io), TIOCSETP, (char *) &sg);
  19645. ! #else    SYS5
  19646.       if (ioctl (fileno (io), TCGETA, &sg) != NOTOK)
  19647.       (void) ioctl (fileno (io), TCSETA, &sg);
  19648. ! #endif    SYS5
  19649.   
  19650.       if (io -> _ptr = io -> _base)
  19651.       io -> _cnt = 0;
  19652. --- 31,40 ----
  19653.   #ifndef    SYS5
  19654.       if (ioctl (fileno (io), TIOCGETP, (char *) &sg) != NOTOK)
  19655.       (void) ioctl (fileno (io), TIOCSETP, (char *) &sg);
  19656. ! #else    /* SYS5 */
  19657.       if (ioctl (fileno (io), TCGETA, &sg) != NOTOK)
  19658.       (void) ioctl (fileno (io), TCSETA, &sg);
  19659. ! #endif    /* SYS5 */
  19660.   
  19661.       if (io -> _ptr = io -> _base)
  19662.       io -> _cnt = 0;
  19663. *** ../mh-6.7.2/sbr/fmtcompile.c    Thu Jan 23 15:11:10 1992
  19664. --- sbr/fmtcompile.c    Mon Dec 14 16:20:29 1992
  19665. ***************
  19666. *** 1,7 ****
  19667.   /* fmtcompile.c - "compile" format strings for fmtscan */
  19668.   #ifndef    lint
  19669. ! static char ident[] = "@(#)$Id: fmtcompile.c,v 1.10 1992/01/23 23:10:58 jromine Exp $";
  19670. ! #endif    lint
  19671.   
  19672.   #include "../h/mh.h"
  19673.   #include "../h/addrsbr.h"
  19674. --- 1,7 ----
  19675.   /* fmtcompile.c - "compile" format strings for fmtscan */
  19676.   #ifndef    lint
  19677. ! static char ident[] = "@(#)$Id: fmtcompile.c,v 1.15 1992/12/15 00:20:22 jromine Exp $";
  19678. ! #endif    /* lint */
  19679.   
  19680.   #include "../h/mh.h"
  19681.   #include "../h/addrsbr.h"
  19682. ***************
  19683. *** 72,77 ****
  19684. --- 72,78 ----
  19685.       "cur",    TF_NONE,    FT_LV_DAT,    1,        TFL_PUTN,
  19686.       "size",    TF_NONE,    FT_LV_DAT,    2,        TFL_PUTN,
  19687.       "width",    TF_NONE,    FT_LV_DAT,    3,        TFL_PUTN,
  19688. +     "unseen",   TF_NONE,    FT_LV_DAT,    4,        TFL_PUTN,
  19689.       "dat",    TF_NUM,        FT_LV_DAT,    0,        TFL_PUTN,
  19690.       "strlen",    TF_NONE,    FT_LV_STRLEN,    0,        TFL_PUTN,
  19691.       "me",    TF_MYBOX,    FT_LS_LIT,    0,        TFL_PUTS,
  19692. ***************
  19693. *** 78,83 ****
  19694. --- 79,85 ----
  19695.       "plus",    TF_NUM,        FT_LV_PLUS_L,    0,        TFL_PUTN,
  19696.       "minus",    TF_NUM,        FT_LV_MINUS_L,    0,        TFL_PUTN,
  19697.       "divide",    TF_NUM,        FT_LV_DIVIDE_L,    0,        TFL_PUTN,
  19698. +     "modulo",    TF_NUM,        FT_LV_MODULO_L,    0,        TFL_PUTN,
  19699.       "charleft",    TF_NONE,    FT_LV_CHAR_LEFT, 0,        TFL_PUTN,
  19700.       "timenow",    TF_NOW,        FT_LV_LIT,    0,        TFL_PUTN,
  19701.   
  19702. ***************
  19703. *** 121,129 ****
  19704.       "friendly",    TF_COMP,    FT_LS_FRIENDLY,    FT_PARSEADDR,    TFL_PUTS,
  19705.   
  19706.       "mymbox",    TF_COMP,    FT_LV_COMPFLAG,    FT_MYMBOX,    TFL_PUTN,
  19707. - #ifdef    VAN
  19708.       "addtoseq", TF_STR,        FT_ADDTOSEQ,    0,        0,
  19709. - #endif
  19710.   
  19711.       (char *)0,    0,        0,        0,        0    
  19712.   };
  19713. --- 123,129 ----
  19714. ***************
  19715. *** 194,200 ****
  19716. --- 194,204 ----
  19717.   
  19718.       usr_fstring[errpos] = '\0';
  19719.       for (i = errpos-errctx; i < errpos; i++)
  19720. + #ifdef LOCALE
  19721. +     if (iscntrl(usr_fstring[i]))
  19722. + #else
  19723.       if (usr_fstring[i] < 32)
  19724. + #endif
  19725.           usr_fstring[i] = '_';
  19726.       advise(NULLCP, "\"%s\": format compile error - %s",
  19727.          &usr_fstring[errpos-errctx], str);
  19728. ***************
  19729. *** 293,298 ****
  19730. --- 297,308 ----
  19731.           cp = do_loop(++cp);
  19732.           break;
  19733.   
  19734. +     case ';':    /* comment line */
  19735. +         cp++;
  19736. +         while ((c = *cp++) && c != '\n')
  19737. +         continue;
  19738. +         break;
  19739. + 
  19740.       default:
  19741.           cp = do_spec(cp);
  19742.           break;
  19743. ***************
  19744. *** 308,314 ****
  19745.       register int c;
  19746.   #ifndef    lint
  19747.       register int ljust = 0;
  19748. ! #endif    not lint
  19749.       register int wid = 0;
  19750.       register char fill = ' ';
  19751.   
  19752. --- 318,324 ----
  19753.       register int c;
  19754.   #ifndef    lint
  19755.       register int ljust = 0;
  19756. ! #endif    /* not lint */
  19757.       register int wid = 0;
  19758.       register char fill = ' ';
  19759.   
  19760. ***************
  19761. *** 419,424 ****
  19762. --- 429,435 ----
  19763.       register int c;
  19764.       register struct ftable *t;
  19765.       register int n;
  19766. +     int mflag;        /* minus sign in NUM */
  19767.   
  19768.       infunction++;
  19769.   
  19770. ***************
  19771. *** 446,456 ****
  19772. --- 457,471 ----
  19773.       break;
  19774.   
  19775.       case TF_NUM:
  19776. +     if (mflag = (c == '-'))
  19777. +         c = *cp++;
  19778.       n = 0;
  19779.       while (isdigit(c)) {
  19780.           n = n*10 + (c - '0');
  19781.           c = *cp++;
  19782.       }
  19783. +     if (mflag)
  19784. +         n = (-n);
  19785.       LV(t->f_type,n);
  19786.       break;
  19787.   
  19788. ***************
  19789. *** 480,486 ****
  19790.       case TF_EXPR:
  19791.       *--cp = c;
  19792.       cp = do_expr(cp, t->extra);
  19793. !     LV(t->f_type, t->extra);
  19794.       c = *cp++;
  19795.       ftbl = t;
  19796.       break;
  19797. --- 495,501 ----
  19798.       case TF_EXPR:
  19799.       *--cp = c;
  19800.       cp = do_expr(cp, t->extra);
  19801. !     LV(t->f_type, 0);
  19802.       c = *cp++;
  19803.       ftbl = t;
  19804.       break;
  19805. *** ../mh-6.7.2/sbr/formatdef.c    Fri Jan 24 10:22:19 1992
  19806. --- sbr/formatdef.c    Mon Dec 14 16:20:29 1992
  19807. ***************
  19808. *** 1,7 ****
  19809.   /* formatdef.c - some defines for sbr/formatsbr.c */
  19810.   #ifndef    lint
  19811. ! static char ident[] = "@(#)$Id: formatdef.c,v 1.2 1992/01/24 18:22:15 jromine Exp $";
  19812. ! #endif    lint
  19813.   #include "../h/addrsbr.h"
  19814.   
  19815.   int    fmt_norm = AD_NAME;
  19816. --- 1,7 ----
  19817.   /* formatdef.c - some defines for sbr/formatsbr.c */
  19818.   #ifndef    lint
  19819. ! static char ident[] = "@(#)$Id: formatdef.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  19820. ! #endif    /* lint */
  19821.   #include "../h/addrsbr.h"
  19822.   
  19823.   int    fmt_norm = AD_NAME;
  19824. *** ../mh-6.7.2/sbr/formatsbr.c    Fri Jan 24 10:09:34 1992
  19825. --- sbr/formatsbr.c    Mon Dec 14 16:20:31 1992
  19826. ***************
  19827. *** 1,7 ****
  19828.   /* formatsbr.c - format string interpretation */
  19829.   #ifndef    lint
  19830. ! static char ident[] = "@(#)$Id: formatsbr.c,v 1.14 1992/01/24 18:09:25 jromine Exp $";
  19831. ! #endif    lint
  19832.   
  19833.   #include "../h/mh.h"
  19834.   #include "../h/addrsbr.h"
  19835. --- 1,7 ----
  19836.   /* formatsbr.c - format string interpretation */
  19837.   #ifndef    lint
  19838. ! static char ident[] = "@(#)$Id: formatsbr.c,v 1.21 1992/12/15 00:20:22 jromine Exp $";
  19839. ! #endif    /* lint */
  19840.   
  19841.   #include "../h/mh.h"
  19842.   #include "../h/addrsbr.h"
  19843. ***************
  19844. *** 21,31 ****
  19845.   
  19846.   static char  *formats = 0;
  19847.   extern char *formataddr ();    /* hook for custom address formatting */
  19848. ! #ifdef    VAN
  19849.   struct msgs *fmt_current_folder; /* current folder (set by main program) */
  19850.   #endif
  19851.   
  19852.   static normalize();
  19853.   
  19854.   extern int fmt_norm;        /* defined in sbr/formatdef.c = AD_NAME */
  19855.   struct mailname fmt_mnull;
  19856. --- 21,32 ----
  19857.   
  19858.   static char  *formats = 0;
  19859.   extern char *formataddr ();    /* hook for custom address formatting */
  19860. ! #ifdef    LBL
  19861.   struct msgs *fmt_current_folder; /* current folder (set by main program) */
  19862.   #endif
  19863.   
  19864.   static normalize();
  19865. + static int   get_x400_comp();
  19866.   
  19867.   extern int fmt_norm;        /* defined in sbr/formatdef.c = AD_NAME */
  19868.   struct mailname fmt_mnull;
  19869. ***************
  19870. *** 96,102 ****
  19871.           case '\n':
  19872.               break;
  19873.   
  19874. !         case NULL: 
  19875.               cp--;    /* fall */
  19876.           default: 
  19877.               *dp++ = *cp;
  19878. --- 97,103 ----
  19879.           case '\n':
  19880.               break;
  19881.   
  19882. !         case 0: 
  19883.               cp--;    /* fall */
  19884.           default: 
  19885.               *dp++ = *cp;
  19886. ***************
  19887. *** 103,109 ****
  19888.               break;
  19889.           }
  19890.   
  19891. !     *dp = NULL;
  19892.   }
  19893.   
  19894.   /*   */
  19895. --- 104,110 ----
  19896.               break;
  19897.           }
  19898.   
  19899. !     *dp = 0;
  19900.   }
  19901.   
  19902.   /*   */
  19903. ***************
  19904. *** 121,127 ****
  19905. --- 122,142 ----
  19906.       register char   *s1;
  19907.       register char   *s2;
  19908.   
  19909. + #ifdef LOCALE
  19910.       while (c1 = *sub) {
  19911. +     c1 = (isalpha(c1) && isupper(c1)) ? tolower(c1) : c1;
  19912. +     while ((c2 = *str++) && c1 != ((isalpha(c2) && isupper(c2)) ? tolower(c2) : c2))
  19913. +         ;
  19914. +     if (! c2)
  19915. +         return 0;
  19916. +     s1 = sub + 1; s2 = str;
  19917. +     while ((c1 = *s1++) && ((isalpha(c1) && isupper(c1)) ? tolower(c1) : c1) == ((isalpha(c2 =*s2++) && isupper(c2)) ? tolower(c2) : c2))
  19918. +         ;
  19919. +     if (! c1)
  19920. +         return 1;
  19921. +     }
  19922. + #else
  19923. +     while (c1 = *sub) {
  19924.       while ((c2 = *str++) && (c1 | 040) != (c2 | 040))
  19925.           ;
  19926.       if (! c2)
  19927. ***************
  19928. *** 132,137 ****
  19929. --- 147,153 ----
  19930.       if (! c1)
  19931.           return 1;
  19932.       }
  19933. + #endif
  19934.       return 1;
  19935.   }
  19936.   /*   */
  19937. ***************
  19938. *** 169,174 ****
  19939. --- 185,191 ----
  19940.               }\
  19941.               }\
  19942.           }
  19943. + #ifdef LOCALE
  19944.   #define PUTSF(cp, str, wid, fill) {\
  19945.           ljust = 0;\
  19946.           if ((i = (wid)) < 0) {\
  19947. ***************
  19948. *** 186,191 ****
  19949. --- 203,256 ----
  19950.                       i++;\
  19951.                   }\
  19952.               } else {\
  19953. +                 while ((c = *sp) && (iscntrl(c) || isspace(c)))\
  19954. +                 sp++;\
  19955. +             }\
  19956. +             while ((c = *sp++) && --i >= 0 && cp < ep)\
  19957. +                 if (isgraph(c)) \
  19958. +                     *cp++ = c;\
  19959. +                 else {\
  19960. +                     while ((c = *sp) && (iscntrl(c) || isspace(c)))\
  19961. +                         sp++;\
  19962. +                         *cp++ = ' ';\
  19963. +                 }\
  19964. +         }\
  19965. +         if (!ljust)\
  19966. +         while( --i >= 0 && cp < ep)\
  19967. +             *cp++ = fill;\
  19968. +     }
  19969. + #define PUTS(cp, str) {\
  19970. +         if (sp = (str)) {\
  19971. +             while ((c = *sp) && (iscntrl(c) || isspace(c)))\
  19972. +             sp++;\
  19973. +             while((c = *sp++) && cp < ep)\
  19974. +             if (isgraph(c)) \
  19975. +                 *cp++ = c;\
  19976. +             else {\
  19977. +                 while ((c = *sp) && (iscntrl(c) || isspace(c)))\
  19978. +                 sp++;\
  19979. +                 *cp++ = ' ';\
  19980. +             }\
  19981. +         }\
  19982. +     }
  19983. + #else /* LOCALE */
  19984. + #define PUTSF(cp, str, wid, fill) {\
  19985. +         ljust = 0;\
  19986. +         if ((i = (wid)) < 0) {\
  19987. +             i = -i;\
  19988. +             ljust++;\
  19989. +         }\
  19990. +         if (sp = (str)) {\
  19991. +             if (ljust) {\
  19992. +                 c = strlen(sp);\
  19993. +                 if (c > i)\
  19994. +                     sp += c - i;\
  19995. +                 else {\
  19996. +                     while( --i >= c && cp < ep)\
  19997. +                         *cp++ = fill;\
  19998. +                     i++;\
  19999. +                 }\
  20000. +             } else {\
  20001.               while ((c = *sp) && c <= 32)\
  20002.               sp++;\
  20003.               }\
  20004. ***************
  20005. *** 216,221 ****
  20006. --- 281,287 ----
  20007.               }\
  20008.           }\
  20009.           }
  20010. + #endif
  20011.   
  20012.   
  20013.   static char *lmonth[] = { "January",  "February","March",   "April",
  20014. ***************
  20015. *** 222,228 ****
  20016. --- 288,341 ----
  20017.                 "May",      "June",    "July",    "August",
  20018.                 "September","October", "November","December" };
  20019.   
  20020. + static char *get_x400_friendly (mbox, buffer)
  20021. + char   *mbox,
  20022. +        *buffer;
  20023. + {
  20024. +     char    given[BUFSIZ],
  20025. +         surname[BUFSIZ];
  20026.   
  20027. +     if (mbox == NULLCP)
  20028. +     return NULLCP;
  20029. +     if (*mbox == '"')
  20030. +     mbox++;
  20031. +     if (*mbox != '/')
  20032. +     return NULLCP;
  20033. + 
  20034. +     if (get_x400_comp (mbox, "/PN=", buffer)) {
  20035. +     for (mbox = buffer; mbox = index (mbox, '.'); )
  20036. +         *mbox++ = 0;
  20037. + 
  20038. +     return buffer;
  20039. +     }
  20040. + 
  20041. +     if (!get_x400_comp (mbox, "/S=", surname))
  20042. +     return NULLCP;
  20043. + 
  20044. +     if (get_x400_comp (mbox, "/G=", given))
  20045. +     (void) sprintf (buffer, "%s %s", given, surname);
  20046. +     else
  20047. +     (void) strcpy (buffer, surname);
  20048. + 
  20049. +     return buffer;
  20050. + }
  20051. + 
  20052. + static int get_x400_comp (mbox, key, buffer)
  20053. + char   *mbox,
  20054. +        *key,
  20055. +        *buffer;
  20056. + {
  20057. +     int        idx;
  20058. +     char   *cp;
  20059. + 
  20060. +     if ((idx = stringdex (key, mbox)) < 0
  20061. +         || !(cp = index (mbox += idx + strlen (key), '/')))
  20062. +     return 0;
  20063. + 
  20064. +     (void) sprintf (buffer, "%*.*s", cp - mbox, cp - mbox, mbox);
  20065. +     return 1;
  20066. + }
  20067. + 
  20068.   struct format *
  20069.   fmtscan (format, scanl, width, dat)
  20070.       struct format *format;
  20071. ***************
  20072. *** 299,305 ****
  20073.           goto finished;
  20074.   
  20075.       case FT_IF_S:
  20076. !         if (str == NULLCP || *str == NULL) {
  20077.           fmt += fmt->f_skip;
  20078.           continue;
  20079.           }
  20080. --- 412,418 ----
  20081.           goto finished;
  20082.   
  20083.       case FT_IF_S:
  20084. !         if (!(value = (str && *str))) {
  20085.           fmt += fmt->f_skip;
  20086.           continue;
  20087.           }
  20088. ***************
  20089. *** 306,312 ****
  20090.           break;
  20091.   
  20092.       case FT_IF_S_NULL:
  20093. !         if (str != NULLCP && *str != NULL) {
  20094.           fmt += fmt->f_skip;
  20095.           continue;
  20096.           }
  20097. --- 419,425 ----
  20098.           break;
  20099.   
  20100.       case FT_IF_S_NULL:
  20101. !         if (!(value = (str == NULLCP || *str == 0))) {
  20102.           fmt += fmt->f_skip;
  20103.           continue;
  20104.           }
  20105. ***************
  20106. *** 334,340 ****
  20107.           break;
  20108.   
  20109.       case FT_IF_MATCH:
  20110. !         if (!str || !match (str, fmt->f_text)) {
  20111.           fmt += fmt->f_skip;
  20112.           continue;
  20113.           }
  20114. --- 447,453 ----
  20115.           break;
  20116.   
  20117.       case FT_IF_MATCH:
  20118. !         if (!(value = (str && match (str, fmt->f_text)))) {
  20119.           fmt += fmt->f_skip;
  20120.           continue;
  20121.           }
  20122. ***************
  20123. *** 342,354 ****
  20124.   
  20125.       case FT_V_MATCH:
  20126.           if (str)
  20127. !         value = match (str, fmt->f_text);
  20128.           else
  20129.           value = 0;
  20130.           break;
  20131.   
  20132.       case FT_IF_AMATCH:
  20133. !         if (!str || !uprf (str, fmt->f_text)) {
  20134.           fmt += fmt->f_skip;
  20135.           continue;
  20136.           }
  20137. --- 455,467 ----
  20138.   
  20139.       case FT_V_MATCH:
  20140.           if (str)
  20141. !         value = match (str, fmt->f_text);
  20142.           else
  20143.           value = 0;
  20144.           break;
  20145.   
  20146.       case FT_IF_AMATCH:
  20147. !         if (!(value = (str && uprf (str, fmt->f_text)))) {
  20148.           fmt += fmt->f_skip;
  20149.           continue;
  20150.           }
  20151. ***************
  20152. *** 359,369 ****
  20153.           break;
  20154.   
  20155.       case FT_S_NONNULL:
  20156. !         value = (str != NULLCP && *str != NULL);
  20157.           break;
  20158.   
  20159.       case FT_S_NULL:
  20160. !         value = (str == NULLCP || *str == NULL);
  20161.           break;
  20162.   
  20163.       case FT_V_EQ:
  20164. --- 472,482 ----
  20165.           break;
  20166.   
  20167.       case FT_S_NONNULL:
  20168. !         value = (str != NULLCP && *str != 0);
  20169.           break;
  20170.   
  20171.       case FT_S_NULL:
  20172. !         value = (str == NULLCP || *str == 0);
  20173.           break;
  20174.   
  20175.       case FT_V_EQ:
  20176. ***************
  20177. *** 450,455 ****
  20178. --- 563,574 ----
  20179.           else
  20180.           value = 0;
  20181.           break;
  20182. +     case FT_LV_MODULO_L:
  20183. +         if (fmt->f_value)
  20184. +         value = value % fmt->f_value;
  20185. +         else
  20186. +         value = 0;
  20187. +         break;
  20188.       case FT_SAVESTR:
  20189.           savestr = str;
  20190.           break;
  20191. ***************
  20192. *** 479,485 ****
  20193. --- 598,608 ----
  20194.           str = dtwszone (fmt->f_comp->c_tws);
  20195.           break;
  20196.       case FT_LV_YEAR:
  20197. + #ifndef    YEARMOD
  20198.           value = fmt->f_comp->c_tws->tw_year;
  20199. + #else    /* YEARMOD */
  20200. +         value = (fmt->f_comp->c_tws->tw_year) % 100;
  20201. + #endif    /* YEARMOD */
  20202.           break;
  20203.       case FT_LV_WDAY:
  20204.           if (!(((tws = fmt->f_comp->c_tws)->tw_flags) & (TW_SEXP|TW_SIMP)))
  20205. ***************
  20206. *** 572,578 ****
  20207.       case FT_LS_FRIENDLY:
  20208.   #ifdef BERK
  20209.           str = fmt->f_comp->c_mn->m_mbox;
  20210. ! #else not BERK
  20211.           if ((mn = fmt -> f_comp -> c_mn) == &fmt_mnull) {
  20212.           str = fmt -> f_comp -> c_text;
  20213.           break;
  20214. --- 695,701 ----
  20215.       case FT_LS_FRIENDLY:
  20216.   #ifdef BERK
  20217.           str = fmt->f_comp->c_mn->m_mbox;
  20218. ! #else    /* not BERK */
  20219.           if ((mn = fmt -> f_comp -> c_mn) == &fmt_mnull) {
  20220.           str = fmt -> f_comp -> c_text;
  20221.           break;
  20222. ***************
  20223. *** 594,600 ****
  20224.                           else
  20225.                           break;
  20226.                   }
  20227. !             } else {
  20228.       unfriendly: ;
  20229.             switch (mn -> m_type) {
  20230.               case LOCALHOST:
  20231. --- 717,723 ----
  20232.                           else
  20233.                           break;
  20234.                   }
  20235. !             } else if (!(str = get_x400_friendly (mn -> m_mbox, buffer))) {
  20236.       unfriendly: ;
  20237.             switch (mn -> m_type) {
  20238.               case LOCALHOST:
  20239. ***************
  20240. *** 616,622 ****
  20241.               break;
  20242.             }
  20243.           }
  20244. ! #endif BERK
  20245.           break;
  20246.   
  20247.       case FT_LOCALDATE:
  20248. --- 739,745 ----
  20249.               break;
  20250.             }
  20251.           }
  20252. ! #endif    /* BERK */
  20253.           break;
  20254.   
  20255.       case FT_LOCALDATE:
  20256. ***************
  20257. *** 736,743 ****
  20258.           }
  20259.           break;
  20260.   
  20261. - #ifdef    VAN
  20262.       case FT_ADDTOSEQ:
  20263.           /* If we're working on a folder (as opposed to a file), add the
  20264.            * current msg to sequence given in literal field.  Don't
  20265.            * disturb string or value registers.
  20266. --- 859,866 ----
  20267.           }
  20268.           break;
  20269.   
  20270.       case FT_ADDTOSEQ:
  20271. + #ifdef    LBL
  20272.           /* If we're working on a folder (as opposed to a file), add the
  20273.            * current msg to sequence given in literal field.  Don't
  20274.            * disturb string or value registers.
  20275. ***************
  20276. *** 744,751 ****
  20277.            */
  20278.           if (fmt_current_folder)
  20279.               (void)m_seqadd(fmt_current_folder, fmt->f_text, dat[0], -1);
  20280. -         break;
  20281.   #endif
  20282.       }
  20283.       fmt++;
  20284.       }
  20285. --- 867,874 ----
  20286.            */
  20287.           if (fmt_current_folder)
  20288.               (void)m_seqadd(fmt_current_folder, fmt->f_text, dat[0], -1);
  20289.   #endif
  20290. +         break;
  20291.       }
  20292.       fmt++;
  20293.       }
  20294. ***************
  20295. *** 753,759 ****
  20296.       finished:;
  20297.       if (cp[-1] != '\n')
  20298.       *cp++ = '\n';
  20299. !     *cp   = NULL;
  20300.       return ((struct format *)0);
  20301.   #else    /* JLR */
  20302.       if (cp[-1] != '\n')
  20303. --- 876,882 ----
  20304.       finished:;
  20305.       if (cp[-1] != '\n')
  20306.       *cp++ = '\n';
  20307. !     *cp   = 0;
  20308.       return ((struct format *)0);
  20309.   #else    /* JLR */
  20310.       if (cp[-1] != '\n')
  20311. *** ../mh-6.7.2/sbr/gans.c    Thu Oct 29 15:00:30 1987
  20312. --- sbr/gans.c    Mon Oct 26 14:50:54 1992
  20313. ***************
  20314. *** 1,4 ****
  20315. --- 1,7 ----
  20316.   /* gans.c - get an answer from the user */
  20317. + #ifndef    lint
  20318. + static char ident[] = "@(#)$Id: gans.c,v 1.2 1992/10/26 22:50:52 jromine Exp $";
  20319. + #endif /* lint */
  20320.   
  20321.   #include "../h/mh.h"
  20322.   #include <stdio.h>
  20323. ***************
  20324. *** 21,28 ****
  20325. --- 24,35 ----
  20326.           if (i == EOF)
  20327.           return 0;
  20328.           if (cp < &ansbuf[sizeof ansbuf - 1]) {
  20329. + #ifdef LOCALE
  20330. +         i = (isalpha(i) && isupper(i)) ? tolower(i) : i;
  20331. + #else
  20332.           if (i >= 'A' && i <= 'Z')
  20333.               i += 'a' - 'A';
  20334. + #endif
  20335.           *cp++ = i;
  20336.           }
  20337.       }
  20338. *** ../mh-6.7.2/sbr/getans.c    Tue Feb  6 13:03:44 1990
  20339. --- sbr/getans.c    Mon Dec 14 16:20:32 1992
  20340. ***************
  20341. *** 1,9 ****
  20342.   /* getans.c - get an answer from the user and return a string array */
  20343.   
  20344.   #include "../h/mh.h"
  20345.   #ifdef    BSD42
  20346.   #include <setjmp.h>
  20347. ! #endif    BSD42
  20348.   #include <signal.h>
  20349.   #include <stdio.h>
  20350.   
  20351. --- 1,12 ----
  20352.   /* getans.c - get an answer from the user and return a string array */
  20353. + #ifndef    lint
  20354. + static char ident[] = "@(#)$Id: getans.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  20355. + #endif    /* lint */
  20356.   
  20357.   #include "../h/mh.h"
  20358.   #ifdef    BSD42
  20359.   #include <setjmp.h>
  20360. ! #endif    /* BSD42 */
  20361.   #include <signal.h>
  20362.   #include <stdio.h>
  20363.   
  20364. ***************
  20365. *** 11,20 ****
  20366.   static    char ansbuf[BUFSIZ];
  20367.   #ifndef    BSD42
  20368.   static    int interrupted;
  20369. ! #else    BSD42
  20370.   static    jmp_buf sigenv;
  20371. ! #endif    BSD42
  20372. ! static int    intrser ();
  20373.   
  20374.   char  **getans (prompt, ansp)
  20375.   char   *prompt;
  20376. --- 14,23 ----
  20377.   static    char ansbuf[BUFSIZ];
  20378.   #ifndef    BSD42
  20379.   static    int interrupted;
  20380. ! #else    /* BSD42 */
  20381.   static    jmp_buf sigenv;
  20382. ! #endif    /* BSD42 */
  20383. ! static TYPESIG    intrser ();
  20384.   
  20385.   char  **getans (prompt, ansp)
  20386.   char   *prompt;
  20387. ***************
  20388. *** 28,34 ****
  20389.   #ifndef    BSD42
  20390.       interrupted = 0;
  20391.       istat = signal (SIGINT, intrser);
  20392. ! #else    BSD42
  20393.       switch (setjmp (sigenv)) {
  20394.       case OK: 
  20395.           istat = signal (SIGINT, intrser);
  20396. --- 31,37 ----
  20397.   #ifndef    BSD42
  20398.       interrupted = 0;
  20399.       istat = signal (SIGINT, intrser);
  20400. ! #else    /* BSD42 */
  20401.       switch (setjmp (sigenv)) {
  20402.       case OK: 
  20403.           istat = signal (SIGINT, intrser);
  20404. ***************
  20405. *** 38,44 ****
  20406.           (void) signal (SIGINT, istat);
  20407.           return NULL;
  20408.       }
  20409. ! #endif    BSD42
  20410.       for (;;) {
  20411.       printf ("%s", prompt);
  20412.       (void) fflush (stdout);
  20413. --- 41,47 ----
  20414.           (void) signal (SIGINT, istat);
  20415.           return NULL;
  20416.       }
  20417. ! #endif    /* BSD42 */
  20418.       for (;;) {
  20419.       printf ("%s", prompt);
  20420.       (void) fflush (stdout);
  20421. ***************
  20422. *** 50,59 ****
  20423.           (void) signal (SIGINT, istat);
  20424.           return NULL;
  20425.           }
  20426. ! #else    BSD42
  20427.           if (i == EOF)
  20428.           longjmp (sigenv, DONE);
  20429. ! #endif    BSD42
  20430.           if (cp < &ansbuf[sizeof ansbuf - 1])
  20431.           *cp++ = i;
  20432.       }
  20433. --- 53,62 ----
  20434.           (void) signal (SIGINT, istat);
  20435.           return NULL;
  20436.           }
  20437. ! #else    /* BSD42 */
  20438.           if (i == EOF)
  20439.           longjmp (sigenv, DONE);
  20440. ! #endif    /* BSD42 */
  20441.           if (cp < &ansbuf[sizeof ansbuf - 1])
  20442.           *cp++ = i;
  20443.       }
  20444. ***************
  20445. *** 79,89 ****
  20446.   }
  20447.   
  20448.   
  20449. ! static    int intrser () {
  20450.   #ifndef    BSD42
  20451.       (void) signal(SIGINT, intrser);
  20452.       interrupted = 1;
  20453. ! #else    BSD42
  20454.       longjmp (sigenv, NOTOK);
  20455. ! #endif    BSD42
  20456.   }
  20457. --- 82,94 ----
  20458.   }
  20459.   
  20460.   
  20461. ! static    TYPESIG intrser (i)
  20462. ! int    i;
  20463. ! {
  20464.   #ifndef    BSD42
  20465.       (void) signal(SIGINT, intrser);
  20466.       interrupted = 1;
  20467. ! #else    /* BSD42 */
  20468.       longjmp (sigenv, NOTOK);
  20469. ! #endif    /* BSD42 */
  20470.   }
  20471. *** ../mh-6.7.2/sbr/help.c    Fri Jan 24 17:19:15 1992
  20472. --- sbr/help.c    Mon Dec 14 16:20:33 1992
  20473. ***************
  20474. *** 1,7 ****
  20475.   /* help.c - print the usage line */
  20476.   #ifndef lint
  20477. ! static char ident[] = "@(#)$Id: help.c,v 1.2 1992/01/25 01:19:05 jromine Exp $";
  20478. ! #endif  lint
  20479.   
  20480.   #include "../h/mh.h"
  20481.   #include <stdio.h>
  20482. --- 1,7 ----
  20483.   /* help.c - print the usage line */
  20484.   #ifndef lint
  20485. ! static char ident[] = "@(#)$Id: help.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  20486. ! #endif    /*  lint */
  20487.   
  20488.   #include "../h/mh.h"
  20489.   #include <stdio.h>
  20490. *** ../mh-6.7.2/sbr/m_atoi.c    Thu Oct 29 15:00:32 1987
  20491. --- sbr/m_atoi.c    Mon Oct 26 14:52:09 1992
  20492. ***************
  20493. *** 1,4 ****
  20494. --- 1,7 ----
  20495.   /* m_atoi.c - parse a string representation of a message number */
  20496. + #ifndef    lint
  20497. + static char ident[] = "@(#)$Id: m_atoi.c,v 1.2 1992/10/26 22:52:05 jromine Exp $";
  20498. + #endif /* lint */
  20499.   
  20500.   #include "../h/mh.h"
  20501.   
  20502. ***************
  20503. *** 11,16 ****
  20504. --- 14,25 ----
  20505.   
  20506.       i = 0;
  20507.       cp = str;
  20508. + #ifdef LOCALE
  20509. +     while (isdigit(*cp)) {
  20510. +     i *= 10;
  20511. +     i += *cp++ - '0';
  20512. +     }
  20513. + #else
  20514.       while (*cp) {
  20515.       if (*cp < '0' || *cp > '9')
  20516.           return 0;
  20517. ***************
  20518. *** 17,22 ****
  20519. --- 26,32 ----
  20520.       i *= 10;
  20521.       i += *cp++ - '0';
  20522.       }
  20523. + #endif
  20524.   
  20525.       return i;
  20526.   }
  20527. *** ../mh-6.7.2/sbr/m_convert.c    Tue Feb 12 16:51:12 1991
  20528. --- sbr/m_convert.c    Mon Dec 14 16:20:34 1992
  20529. ***************
  20530. *** 1,7 ****
  20531.   /* m_convert.c - parse a message sequence and set SELECTED */
  20532.   #ifndef    lint
  20533. ! static char ident[] = "@(#)$Id: m_convert.c,v 1.7 91/02/12 16:51:00 mh Exp $";
  20534. ! #endif    lint
  20535.   
  20536.   #include "../h/mh.h"
  20537.   #include <stdio.h>
  20538. --- 1,7 ----
  20539.   /* m_convert.c - parse a message sequence and set SELECTED */
  20540.   #ifndef    lint
  20541. ! static char ident[] = "@(#)$Id: m_convert.c,v 1.10 1992/12/15 00:20:22 jromine Exp $";
  20542. ! #endif    /* lint */
  20543.   
  20544.   #include "../h/mh.h"
  20545.   #include <stdio.h>
  20546. ***************
  20547. *** 213,221 ****
  20548.       }
  20549.   
  20550.       bp = buf;
  20551.       while ((*cp >= 'a' && *cp <= 'z') || *cp == '.')
  20552.       *bp++ = *cp++;
  20553. !     *bp++ = NULL;
  20554.       delimp = cp;
  20555.   
  20556.       if (strcmp (buf, "first") == 0)
  20557. --- 213,225 ----
  20558.       }
  20559.   
  20560.       bp = buf;
  20561. + #ifndef LOCALE
  20562.       while ((*cp >= 'a' && *cp <= 'z') || *cp == '.')
  20563. + #else
  20564. +     while (isalpha(*cp) || *cp == '.')    /* doesn't enforce lower case */
  20565. + #endif /* LOCALE */
  20566.       *bp++ = *cp++;
  20567. !     *bp++ = 0;
  20568.       delimp = cp;
  20569.   
  20570.       if (strcmp (buf, "first") == 0)
  20571. *** ../mh-6.7.2/sbr/m_draft.c    Thu Oct 29 15:00:34 1987
  20572. --- sbr/m_draft.c    Mon Dec 14 16:20:34 1992
  20573. ***************
  20574. *** 1,4 ****
  20575. --- 1,7 ----
  20576.   /* m_draft.c - construct the draft name */
  20577. + #ifndef    lint
  20578. + static char ident[] = "@(#)$Id: m_draft.c,v 1.2 1992/12/15 00:20:22 jromine Exp $";
  20579. + #endif    /* lint */
  20580.   
  20581.   #include "../h/mh.h"
  20582.   #include <errno.h>
  20583. ***************
  20584. *** 21,27 ****
  20585.       struct stat st;
  20586.       static char buffer[BUFSIZ];
  20587.   
  20588. !     if (*isdf == NOTOK || folder == NULL || *folder == NULL) {
  20589.       if (*isdf == NOTOK || (cp = m_find ("Draft-Folder")) == NULL) {
  20590.           *isdf = 0;
  20591.           return m_maildir (msg && *msg ? msg : draft);
  20592. --- 24,30 ----
  20593.       struct stat st;
  20594.       static char buffer[BUFSIZ];
  20595.   
  20596. !     if (*isdf == NOTOK || folder == NULL || *folder == 0) {
  20597.       if (*isdf == NOTOK || (cp = m_find ("Draft-Folder")) == NULL) {
  20598.           *isdf = 0;
  20599.           return m_maildir (msg && *msg ? msg : draft);
  20600. *** ../mh-6.7.2/sbr/m_fmsg.c    Thu Oct 29 15:00:35 1987
  20601. --- sbr/m_fmsg.c    Mon Dec 14 16:20:35 1992
  20602. ***************
  20603. *** 1,4 ****
  20604. --- 1,7 ----
  20605.   /* m_fmsg.c - free a folder */
  20606. + #ifndef    lint
  20607. + static char ident[] = "@(#)$Id: m_fmsg.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  20608. + #endif    /* lint */
  20609.   
  20610.   #include "../h/mh.h"
  20611.   #include <stdio.h>
  20612. ***************
  20613. *** 16,22 ****
  20614.       free (mp -> foldpath);
  20615.   #ifdef    MTR
  20616.       free ((char *) mp -> msgbase);
  20617. ! #endif    MTR
  20618.       for (i = 0; mp -> msgattrs[i]; i++)
  20619.       free (mp -> msgattrs[i]);
  20620.       free ((char *) mp);
  20621. --- 19,25 ----
  20622.       free (mp -> foldpath);
  20623.   #ifdef    MTR
  20624.       free ((char *) mp -> msgbase);
  20625. ! #endif    /* MTR */
  20626.       for (i = 0; mp -> msgattrs[i]; i++)
  20627.       free (mp -> msgattrs[i]);
  20628.       free ((char *) mp);
  20629. *** ../mh-6.7.2/sbr/m_getdefs.c    Thu Oct 29 15:00:37 1987
  20630. --- sbr/m_getdefs.c    Mon Dec 14 16:20:36 1992
  20631. ***************
  20632. *** 1,4 ****
  20633. --- 1,7 ----
  20634.   /* m_getdefs.c - read the user's MH environment */
  20635. + #ifndef    lint
  20636. + static char ident[] = "@(#)$Id: m_getdefs.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  20637. + #endif    /* lint */
  20638.   
  20639.   #include "../h/mh.h"
  20640.   #include <stdio.h>
  20641. ***************
  20642. *** 10,27 ****
  20643.   
  20644.   extern int errno;
  20645.   
  20646.   struct    passwd    *getpwuid ();
  20647.   
  20648.   
  20649.   #ifndef    OVERHEAD
  20650.   #define    FOpen(f,m,e,c)    fopen (f, m)
  20651.   #define    FClose(f)    fclose (f)
  20652. ! #else    OVERHEAD
  20653.   FILE   *FOpen ();
  20654.   int    FClose ();
  20655.   
  20656.   long    lseek ();
  20657. ! #endif    OVERHEAD
  20658.   
  20659.   
  20660.   void m_getdefs() {
  20661. --- 13,34 ----
  20662.   
  20663.   extern int errno;
  20664.   
  20665. + #ifndef __STDC__
  20666. + #ifdef    SYS5
  20667.   struct    passwd    *getpwuid ();
  20668. + #endif
  20669. + #endif /* !__STDC__ */
  20670.   
  20671.   
  20672.   #ifndef    OVERHEAD
  20673.   #define    FOpen(f,m,e,c)    fopen (f, m)
  20674.   #define    FClose(f)    fclose (f)
  20675. ! #else    /* OVERHEAD */
  20676.   FILE   *FOpen ();
  20677.   int    FClose ();
  20678.   
  20679.   long    lseek ();
  20680. ! #endif    /* OVERHEAD */
  20681.   
  20682.   
  20683.   void m_getdefs() {
  20684. ***************
  20685. *** 30,36 ****
  20686.                      *pp;
  20687.   #if    defined (notdef) || defined (COMPAT)
  20688.       register char  *ctx;
  20689. ! #endif    notdef or COMPAT
  20690.       char    buf[BUFSIZ];
  20691.       struct stat st;
  20692.       register struct passwd *pw;
  20693. --- 37,43 ----
  20694.                      *pp;
  20695.   #if    defined (notdef) || defined (COMPAT)
  20696.       register char  *ctx;
  20697. ! #endif    /* notdef or COMPAT */
  20698.       char    buf[BUFSIZ];
  20699.       struct stat st;
  20700.       register struct passwd *pw;
  20701. ***************
  20702. *** 44,55 ****
  20703.       else
  20704.           if ((pw = getpwuid (getuid ())) == NULL
  20705.               || pw -> pw_dir == NULL
  20706. !             || *pw -> pw_dir == NULL)
  20707.           adios (NULLCP, "no HOME envariable");
  20708.           else
  20709.           mypath = getcpy (pw -> pw_dir);
  20710.       if ((cp = mypath + strlen (mypath) - 1) > mypath && *cp == '/')
  20711. !         *cp = NULL;
  20712.       }
  20713.   
  20714.       if ((cp = getenv ("MH")) && *cp) {
  20715. --- 51,62 ----
  20716.       else
  20717.           if ((pw = getpwuid (getuid ())) == NULL
  20718.               || pw -> pw_dir == NULL
  20719. !             || *pw -> pw_dir == 0)
  20720.           adios (NULLCP, "no HOME envariable");
  20721.           else
  20722.           mypath = getcpy (pw -> pw_dir);
  20723.       if ((cp = mypath + strlen (mypath) - 1) > mypath && *cp == '/')
  20724. !         *cp = 0;
  20725.       }
  20726.   
  20727.       if ((cp = getenv ("MH")) && *cp) {
  20728. ***************
  20729. *** 57,63 ****
  20730.       if ((ib = FOpen (defpath, "r", "MHFD", 0)) == NULL)
  20731.           adios (defpath, "unable to read");
  20732.       if (*cp != '/')
  20733. !         (void) putenv ("MH", defpath);
  20734.       }
  20735.       else {
  20736.       defpath = concat (mypath, "/", mh_profile, NULLCP);
  20737. --- 64,70 ----
  20738.       if ((ib = FOpen (defpath, "r", "MHFD", 0)) == NULL)
  20739.           adios (defpath, "unable to read");
  20740.       if (*cp != '/')
  20741. !         (void) m_putenv ("MH", defpath);
  20742.       }
  20743.       else {
  20744.       defpath = concat (mypath, "/", mh_profile, NULLCP);
  20745. ***************
  20746. *** 85,91 ****
  20747.   
  20748.   #if    defined (notdef) || defined (COMPAT)
  20749.       ctx = context;
  20750. ! #endif    notdef or COMPAT
  20751.       m_readefs (&m_defs, ib, mh_profile, 0);
  20752.       (void) FClose (ib);
  20753.   
  20754. --- 92,98 ----
  20755.   
  20756.   #if    defined (notdef) || defined (COMPAT)
  20757.       ctx = context;
  20758. ! #endif    /* notdef or COMPAT */
  20759.       m_readefs (&m_defs, ib, mh_profile, 0);
  20760.       (void) FClose (ib);
  20761.   
  20762. ***************
  20763. *** 136,144 ****
  20764.           (void) FClose (ib);
  20765.       }
  20766.       free (ctxpath);
  20767. ! #endif    COMPAT
  20768.   
  20769. !     if ((cp = getenv ("MHCONTEXT")) == NULL || *cp == NULL)
  20770.       cp = context;
  20771.       if ((ib = FOpen (ctxpath = getcpy (m_maildir (cp)), "r", "MHCONTEXTFD", 1))
  20772.           == NULL) {
  20773. --- 143,151 ----
  20774.           (void) FClose (ib);
  20775.       }
  20776.       free (ctxpath);
  20777. ! #endif    /* COMPAT */
  20778.   
  20779. !     if ((cp = getenv ("MHCONTEXT")) == NULL || *cp == 0)
  20780.       cp = context;
  20781.       if ((ib = FOpen (ctxpath = getcpy (m_maildir (cp)), "r", "MHCONTEXTFD", 1))
  20782.           == NULL) {
  20783. ***************
  20784. *** 145,151 ****
  20785.   #ifdef    notdef            /* XXX */
  20786.       if (cp != ctx)
  20787.           adios (ctxpath, "unable to read");
  20788. ! #endif    notdef
  20789.       }
  20790.       else {
  20791.       m_readefs ((struct node **) 0, ib, cp, 1);
  20792. --- 152,158 ----
  20793.   #ifdef    notdef            /* XXX */
  20794.       if (cp != ctx)
  20795.           adios (ctxpath, "unable to read");
  20796. ! #endif    /* notdef */
  20797.       }
  20798.       else {
  20799.       m_readefs ((struct node **) 0, ib, cp, 1);
  20800. ***************
  20801. *** 172,178 ****
  20802.       struct stat st1;
  20803.       register    FILE * fp;
  20804.   
  20805. !     if ((cp = getenv (envariable)) == NULL || *cp == NULL)
  20806.       goto not_open;
  20807.   
  20808.       if ((fd = atoi (cp)) <= fileno (stderr)) {
  20809. --- 179,185 ----
  20810.       struct stat st1;
  20811.       register    FILE * fp;
  20812.   
  20813. !     if ((cp = getenv (envariable)) == NULL || *cp == 0)
  20814.       goto not_open;
  20815.   
  20816.       if ((fd = atoi (cp)) <= fileno (stderr)) {
  20817. ***************
  20818. *** 191,197 ****
  20819.           && !strcmp (mode, "r")
  20820.           && fileno (fp) > fileno (stderr)) {
  20821.           (void) sprintf (buffer, "%d", fileno (fp));
  20822. !         if (!putenv (envariable, buffer))
  20823.           if (ctx)
  20824.               fd_ctx = fileno (fp);
  20825.           else
  20826. --- 198,204 ----
  20827.           && !strcmp (mode, "r")
  20828.           && fileno (fp) > fileno (stderr)) {
  20829.           (void) sprintf (buffer, "%d", fileno (fp));
  20830. !         if (!m_putenv (envariable, buffer))
  20831.           if (ctx)
  20832.               fd_ctx = fileno (fp);
  20833.           else
  20834. ***************
  20835. *** 239,242 ****
  20836.       fprintf (stderr, "FClose emulating close of %d (%d)\n", d1, d2);
  20837.       return i;
  20838.   }
  20839. ! #endif    OVERHEAD
  20840. --- 246,249 ----
  20841.       fprintf (stderr, "FClose emulating close of %d (%d)\n", d1, d2);
  20842.       return i;
  20843.   }
  20844. ! #endif    /* OVERHEAD */
  20845. *** ../mh-6.7.2/sbr/m_getfld.c    Mon Jan 27 10:00:52 1992
  20846. --- sbr/m_getfld.c    Wed Nov 11 16:50:06 1992
  20847. ***************
  20848. *** 1,7 ****
  20849.   /* m_getfld.c - read/parse a message */
  20850.   #ifndef    lint
  20851. ! static char ident[] = "@(#)$Id: m_getfld.c,v 1.9 1992/01/24 18:03:41 jromine Exp $";
  20852. ! #endif    lint
  20853.   
  20854.   #include "../h/mh.h"
  20855.   #include <stdio.h>
  20856. --- 1,7 ----
  20857.   /* m_getfld.c - read/parse a message */
  20858.   #ifndef    lint
  20859. ! static char ident[] = "@(#)$Id: m_getfld.c,v 1.14 1992/10/31 07:44:56 jromine Exp $";
  20860. ! #endif /* lint */
  20861.   
  20862.   #include "../h/mh.h"
  20863.   #include <stdio.h>
  20864. ***************
  20865. *** 246,252 ****
  20866.           j = bp - sp;
  20867.           if ((cnt -= j) <= 0) {
  20868.               if (_filbuf(iob) == EOF) {
  20869. !             *cp = *buf = NULL;
  20870.               advise (NULLCP, "eof encountered in field \"%s\"",
  20871.                   name);
  20872.               return FMTERR;
  20873. --- 246,252 ----
  20874.           j = bp - sp;
  20875.           if ((cnt -= j) <= 0) {
  20876.               if (_filbuf(iob) == EOF) {
  20877. !             *cp = *buf = 0;
  20878.               advise (NULLCP, "eof encountered in field \"%s\"",
  20879.                   name);
  20880.               return FMTERR;
  20881. ***************
  20882. *** 265,277 ****
  20883.            *  . hit the end of the buffer. (loop)
  20884.            */
  20885.           if (c == '\n') {
  20886. !             *cp = *buf = NULL;
  20887.               advise (NULLCP, "eol encountered in field \"%s\"", name);
  20888.               state = FMTERR;
  20889.               goto finish;
  20890.           }
  20891.           if ((i -= j) <= 0) {
  20892. !             *cp = *buf = NULL;
  20893.               advise (NULLCP, "field name \"%s\" exceeds %d bytes",
  20894.                   name, NAMESZ - 1);
  20895.               state = LENERR;
  20896. --- 265,277 ----
  20897.            *  . hit the end of the buffer. (loop)
  20898.            */
  20899.           if (c == '\n') {
  20900. !             *cp = *buf = 0;
  20901.               advise (NULLCP, "eol encountered in field \"%s\"", name);
  20902.               state = FMTERR;
  20903.               goto finish;
  20904.           }
  20905.           if ((i -= j) <= 0) {
  20906. !             *cp = *buf = 0;
  20907.               advise (NULLCP, "field name \"%s\" exceeds %d bytes",
  20908.                   name, NAMESZ - 1);
  20909.               state = LENERR;
  20910. ***************
  20911. *** 281,287 ****
  20912.   
  20913.           while (isspace (*--cp) && cp >= name)
  20914.           ;
  20915. !         *++cp = NULL;
  20916.           /* fall through */
  20917.   
  20918.       case FLDPLUS: 
  20919. --- 281,287 ----
  20920.   
  20921.           while (isspace (*--cp) && cp >= name)
  20922.           ;
  20923. !         *++cp = 0;
  20924.           /* fall through */
  20925.   
  20926.       case FLDPLUS: 
  20927. ***************
  20928. *** 329,335 ****
  20929.           --i;
  20930.           *cp++ = j = *(iob->_ptr + c);
  20931.           c = _filbuf(iob);
  20932. !         if (j == '\n' && c != ' ' && c != '\t') {
  20933.               if (c != EOF)
  20934.               --iob->_ptr, ++iob->_cnt;
  20935.               state = FLD;
  20936. --- 329,335 ----
  20937.           --i;
  20938.           *cp++ = j = *(iob->_ptr + c);
  20939.           c = _filbuf(iob);
  20940. !         if ((j == '\0' || j == '\n') && c != ' ' && c != '\t') {
  20941.               if (c != EOF)
  20942.               --iob->_ptr, ++iob->_cnt;
  20943.               state = FLD;
  20944. ***************
  20945. *** 417,423 ****
  20946.           adios (NULLCP, "m_getfld() called with bogus state of %d", state);
  20947.       }
  20948.   finish:;
  20949. !     *cp = NULL;
  20950.       msg_count = cp - buf;
  20951.       return (state);
  20952.   }
  20953. --- 417,423 ----
  20954.           adios (NULLCP, "m_getfld() called with bogus state of %d", state);
  20955.       }
  20956.   finish:;
  20957. !     *cp = 0;
  20958.       msg_count = cp - buf;
  20959.       return (state);
  20960.   }
  20961. ***************
  20962. *** 426,432 ****
  20963.   
  20964.   #ifdef    RPATHS
  20965.   static char  unixbuf[BUFSIZ] = "";
  20966. ! #endif    RPATHS
  20967.   
  20968.   void
  20969.   m_unknown(iob)
  20970. --- 426,432 ----
  20971.   
  20972.   #ifdef    RPATHS
  20973.   static char  unixbuf[BUFSIZ] = "";
  20974. ! #endif /* RPATHS */
  20975.   
  20976.   void
  20977.   m_unknown(iob)
  20978. ***************
  20979. *** 459,474 ****
  20980.   #ifndef    RPATHS
  20981.       while ((c = getc (iob)) != '\n' && c >= 0)
  20982.           ;
  20983. ! #else    RPATHS
  20984.       cp = unixbuf;
  20985.       while ((c = getc (iob)) != '\n')
  20986.           *cp++ = c;
  20987. !     *cp = NULL;
  20988. ! #endif    RPATHS
  20989.       } else {
  20990.       /* not a Unix style maildrop */
  20991.       (void) fseek (iob, pos, 0);
  20992. !     if (mmdlm2 == NULLCP || *mmdlm2 == NULL)
  20993.           mmdlm2 = "\001\001\001\001\n";
  20994.       delimstr = mmdlm2;
  20995.       msg_style = MS_MMDF;
  20996. --- 459,474 ----
  20997.   #ifndef    RPATHS
  20998.       while ((c = getc (iob)) != '\n' && c >= 0)
  20999.           ;
  21000. ! #else /* RPATHS */
  21001.       cp = unixbuf;
  21002.       while ((c = getc (iob)) != '\n')
  21003.           *cp++ = c;
  21004. !     *cp = 0;
  21005. ! #endif /* RPATHS */
  21006.       } else {
  21007.       /* not a Unix style maildrop */
  21008.       (void) fseek (iob, pos, 0);
  21009. !     if (mmdlm2 == NULLCP || *mmdlm2 == 0)
  21010.           mmdlm2 = "\001\001\001\001\n";
  21011.       delimstr = mmdlm2;
  21012.       msg_style = MS_MMDF;
  21013. ***************
  21014. *** 517,523 ****
  21015.       } else {
  21016.       msg_style = MS_MMDF;
  21017.       msg_delim = (char *)fdelim + 1;
  21018. !     fdelimlen = strlen(fdelim);
  21019.       delimend = (unsigned char *)(msg_delim + edelimlen);
  21020.       }
  21021.   }
  21022. --- 517,523 ----
  21023.       } else {
  21024.       msg_style = MS_MMDF;
  21025.       msg_delim = (char *)fdelim + 1;
  21026. !     fdelimlen = strlen((char *)fdelim);
  21027.       delimend = (unsigned char *)(msg_delim + edelimlen);
  21028.       }
  21029.   }
  21030. ***************
  21031. *** 535,545 ****
  21032.       char    text[10];
  21033.   #ifdef    RPATHS
  21034.       register    char *cp;
  21035. ! #endif    RPATHS
  21036.   
  21037.       pos = ftell (iob);
  21038.       if ((i = fread (text, sizeof *text, edelimlen, iob)) != edelimlen
  21039. !         || strncmp (text, edelim, edelimlen)) {
  21040.       if (i == 0 && msg_style == MS_UUCP)
  21041.           /* the final newline in the (brain damaged) unix-format
  21042.            * maildrop is part of the delimitter - delete it.
  21043. --- 535,545 ----
  21044.       char    text[10];
  21045.   #ifdef    RPATHS
  21046.       register    char *cp;
  21047. ! #endif /* RPATHS */
  21048.   
  21049.       pos = ftell (iob);
  21050.       if ((i = fread (text, sizeof *text, edelimlen, iob)) != edelimlen
  21051. !         || strncmp (text, (char *)edelim, edelimlen)) {
  21052.       if (i == 0 && msg_style == MS_UUCP)
  21053.           /* the final newline in the (brain damaged) unix-format
  21054.            * maildrop is part of the delimitter - delete it.
  21055. ***************
  21056. *** 546,557 ****
  21057.            */
  21058.           return 1;
  21059.   
  21060. ! #ifdef notdef
  21061. !     (void) fseek (iob, (long)(pos-1), 0);
  21062. !     if (iob->_cnt <= 0)
  21063. !         _filbuf(iob);
  21064. ! #else
  21065.       (void) fseek (iob, pos, 0);
  21066.   #endif /* !notdef */
  21067.       return 0;
  21068.       }
  21069. --- 546,556 ----
  21070.            */
  21071.           return 1;
  21072.   
  21073. ! #ifdef    notdef
  21074.       (void) fseek (iob, pos, 0);
  21075. + #else
  21076. +     (void) fseek (iob, (long)(pos-1), 0);
  21077. +     (void) getc (iob);        /* should be OK */
  21078.   #endif /* !notdef */
  21079.       return 0;
  21080.       }
  21081. ***************
  21082. *** 561,572 ****
  21083.       while ((c = getc (iob)) != '\n')
  21084.           if (c < 0)
  21085.           break;
  21086. ! #else    RPATHS
  21087.       cp = unixbuf;
  21088.       while ((c = getc (iob)) != '\n' && c >= 0)
  21089.           *cp++ = c;
  21090. !     *cp = NULL;
  21091. ! #endif    RPATHS
  21092.       }
  21093.   
  21094.       return 1;
  21095. --- 560,571 ----
  21096.       while ((c = getc (iob)) != '\n')
  21097.           if (c < 0)
  21098.           break;
  21099. ! #else /* RPATHS */
  21100.       cp = unixbuf;
  21101.       while ((c = getc (iob)) != '\n' && c >= 0)
  21102.           *cp++ = c;
  21103. !     *cp = 0;
  21104. ! #endif /* RPATHS */
  21105.       }
  21106.   
  21107.       return 1;
  21108. ***************
  21109. *** 585,591 ****
  21110.       if (cp = dp = index (unixbuf, ' ')) {
  21111.       while (cp = index (cp + 1, 'r'))
  21112.           if (strncmp (cp, "remote from ", 12) == 0) {
  21113. !         *cp = NULL;
  21114.           (void) sprintf (pp, "%s!", cp + 12);
  21115.           pp += strlen (pp);
  21116.           break;
  21117. --- 584,590 ----
  21118.       if (cp = dp = index (unixbuf, ' ')) {
  21119.       while (cp = index (cp + 1, 'r'))
  21120.           if (strncmp (cp, "remote from ", 12) == 0) {
  21121. !         *cp = 0;
  21122.           (void) sprintf (pp, "%s!", cp + 12);
  21123.           pp += strlen (pp);
  21124.           break;
  21125. ***************
  21126. *** 593,606 ****
  21127.       if (cp == NULL)
  21128.           cp = unixbuf + strlen (unixbuf);
  21129.       if ((cp -= 25) >= dp)
  21130. !         *cp = NULL;
  21131.       }
  21132.   
  21133.       (void) sprintf (pp, "%s\n", unixbuf);
  21134. !     unixbuf[0] = NULL;
  21135.       return unixfrom;
  21136.   }
  21137. ! #endif    RPATHS
  21138.   
  21139.   /*   */
  21140.   
  21141. --- 592,605 ----
  21142.       if (cp == NULL)
  21143.           cp = unixbuf + strlen (unixbuf);
  21144.       if ((cp -= 25) >= dp)
  21145. !         *cp = 0;
  21146.       }
  21147.   
  21148.       (void) sprintf (pp, "%s\n", unixbuf);
  21149. !     unixbuf[0] = 0;
  21150.       return unixfrom;
  21151.   }
  21152. ! #endif /* RPATHS */
  21153.   
  21154.   /*   */
  21155.   
  21156. ***************
  21157. *** 700,705 ****
  21158.   register int   length;
  21159.   {
  21160.       while (length-- > 0)
  21161. !     *b++ = NULL;
  21162.   }
  21163. ! #endif    not BSD42
  21164. --- 699,704 ----
  21165.   register int   length;
  21166.   {
  21167.       while (length-- > 0)
  21168. !     *b++ = 0;
  21169.   }
  21170. ! #endif /* not BSD42 */
  21171. *** ../mh-6.7.2/sbr/m_gmsg.c    Tue Mar 20 15:57:39 1990
  21172. --- sbr/m_gmsg.c    Tue Oct 20 15:46:31 1992
  21173. ***************
  21174. *** 1,4 ****
  21175. --- 1,7 ----
  21176.   /* m_gmsg.c - read a folder */
  21177. + #ifndef    lint
  21178. + static char ident[] = "@(#)$Id: m_gmsg.c,v 2.10 1992/10/20 22:46:29 jromine Exp $";
  21179. + #endif /* lint */
  21180.   
  21181.   #include "../h/mh.h"
  21182.   #include "../h/local.h"
  21183. ***************
  21184. *** 8,15 ****
  21185.   #define    NINFO    (MAXFOLDER / 5)    /* PLEASE be non-trivial... */
  21186.   struct info {
  21187.       int     msgno;
  21188. !     short   stats;
  21189. !     char    pad[sizeof (int) - sizeof (short)];
  21190.   };
  21191.   
  21192.   static int  len=0;
  21193. --- 11,17 ----
  21194.   #define    NINFO    (MAXFOLDER / 5)    /* PLEASE be non-trivial... */
  21195.   struct info {
  21196.       int     msgno;
  21197. !     int     stats;
  21198.   };
  21199.   
  21200.   static int  len=0;
  21201. ***************
  21202. *** 25,31 ****
  21203.   #ifdef    COMPAT
  21204.       register int    cur,
  21205.               fd;
  21206. ! #endif    COMPAT
  21207.       register int    i,
  21208.               j;
  21209.       register struct info *rover,
  21210. --- 27,33 ----
  21211.   #ifdef    COMPAT
  21212.       register int    cur,
  21213.               fd;
  21214. ! #endif /* COMPAT */
  21215.       register int    i,
  21216.               j;
  21217.       register struct info *rover,
  21218. ***************
  21219. *** 33,47 ****
  21220.   #ifdef    COMPAT
  21221.       register char  *cp;
  21222.       char    buffer[BUFSIZ];
  21223. ! #endif    COMPAT
  21224.       register struct msgs   *mp;
  21225.   #ifdef SYS5DIR
  21226.       register struct dirent *dp;
  21227.           DIR * dd;
  21228. ! #else  SYS5DIR
  21229.       register struct direct *dp;
  21230.       register    DIR * dd;
  21231. ! #endif SYS5DIR
  21232.       struct stat st;
  21233.   
  21234.       if ((dd = opendir (name = m_mailpath (name))) == NULL) {
  21235. --- 35,49 ----
  21236.   #ifdef    COMPAT
  21237.       register char  *cp;
  21238.       char    buffer[BUFSIZ];
  21239. ! #endif /* COMPAT */
  21240.       register struct msgs   *mp;
  21241.   #ifdef SYS5DIR
  21242.       register struct dirent *dp;
  21243.           DIR * dd;
  21244. ! #else /* SYS5DIR */
  21245.       register struct direct *dp;
  21246.       register    DIR * dd;
  21247. ! #endif /* SYS5DIR */
  21248.       struct stat st;
  21249.   
  21250.       if ((dd = opendir (name = m_mailpath (name))) == NULL) {
  21251. ***************
  21252. *** 50,56 ****
  21253.       }
  21254.       (void) fstat (dd -> dd_fd, &st);
  21255.   
  21256. !     mp = (struct msgs  *) malloc (MSIZE (mp, 0, 0));
  21257.       if (mp == NULL)
  21258.       adios (NULLCP, "unable to allocate folder storage");
  21259.       mp -> lowmsg = mp -> hghmsg = mp -> nummsg = 0;
  21260. --- 52,58 ----
  21261.       }
  21262.       (void) fstat (dd -> dd_fd, &st);
  21263.   
  21264. !     mp = (struct msgs  *) malloc (MHSIZE (mp, 0, 0));
  21265.       if (mp == NULL)
  21266.       adios (NULLCP, "unable to allocate folder storage");
  21267.       mp -> lowmsg = mp -> hghmsg = mp -> nummsg = 0;
  21268. ***************
  21269. *** 57,68 ****
  21270.       mp -> curmsg = 0;
  21271.       mp -> lowsel = mp -> hghsel = mp -> numsel = 0;
  21272.       mp -> foldpath = name;
  21273. !     mp -> msgflags = NULL;
  21274.       if (st.st_uid != getuid () || access (name, 02) == NOTOK)
  21275.       mp -> msgflags |= READONLY;
  21276.   #ifdef    COMPAT
  21277.       cur = 0;
  21278. ! #endif    COMPAT
  21279.       j = strlen (SBACKUP);
  21280.       if (head == NULL)
  21281.       if ((head = (struct info *)
  21282. --- 59,70 ----
  21283.       mp -> curmsg = 0;
  21284.       mp -> lowsel = mp -> hghsel = mp -> numsel = 0;
  21285.       mp -> foldpath = name;
  21286. !     mp -> msgflags = 0;
  21287.       if (st.st_uid != getuid () || access (name, 02) == NOTOK)
  21288.       mp -> msgflags |= READONLY;
  21289.   #ifdef    COMPAT
  21290.       cur = 0;
  21291. ! #endif /* COMPAT */
  21292.       j = strlen (SBACKUP);
  21293.       if (head == NULL)
  21294.       if ((head = (struct info *)
  21295. ***************
  21296. *** 91,97 ****
  21297.           rover -> stats = EXISTS;
  21298.   #ifdef    notdef
  21299.           rover -> stats &= ~DELETED;
  21300. ! #endif    notdef
  21301.           rover++;
  21302.       }
  21303.       else
  21304. --- 93,99 ----
  21305.           rover -> stats = EXISTS;
  21306.   #ifdef    notdef
  21307.           rover -> stats &= ~DELETED;
  21308. ! #endif /* notdef */
  21309.           rover++;
  21310.       }
  21311.       else
  21312. ***************
  21313. *** 111,129 ****
  21314.                   break;
  21315.                   }
  21316.               }
  21317. ! #endif    notdef
  21318.               continue;
  21319.   
  21320.   #ifdef    MHE
  21321.           case '+': 
  21322.               continue;
  21323. ! #endif    MHE
  21324.   
  21325.   #ifdef    UCI
  21326.           case '_': 
  21327.           case '#': 
  21328.               continue;
  21329. ! #endif    UCI
  21330.   
  21331.           default: 
  21332.   #ifdef    COMPAT
  21333. --- 113,131 ----
  21334.                   break;
  21335.                   }
  21336.               }
  21337. ! #endif /* notdef */
  21338.               continue;
  21339.   
  21340.   #ifdef    MHE
  21341.           case '+': 
  21342.               continue;
  21343. ! #endif /* MHE */
  21344.   
  21345.   #ifdef    UCI
  21346.           case '_': 
  21347.           case '#': 
  21348.               continue;
  21349. ! #endif /* UCI */
  21350.   
  21351.           default: 
  21352.   #ifdef    COMPAT
  21353. ***************
  21354. *** 131,137 ****
  21355.               cur++;
  21356.               continue;
  21357.               }
  21358. ! #endif    COMPAT
  21359.               if (strcmp (dp -> d_name, LINK) == 0
  21360.                   || strncmp (dp -> d_name, SBACKUP, j) == 0)
  21361.               continue;
  21362. --- 133,139 ----
  21363.               cur++;
  21364.               continue;
  21365.               }
  21366. ! #endif /* COMPAT */
  21367.               if (strcmp (dp -> d_name, LINK) == 0
  21368.                   || strncmp (dp -> d_name, SBACKUP, j) == 0)
  21369.               continue;
  21370. ***************
  21371. *** 154,160 ****
  21372.       if (mp -> curmsg == 0 && cur && (fd = open (current, 0)) != NOTOK) {
  21373.           if ((i = read (fd, buffer, sizeof buffer)) > 0) {
  21374.           if (cp = index (buffer, '\n'))
  21375. !             *cp = NULL;
  21376.           if ((i = m_atoi (buffer)) > 0)
  21377.               mp -> curmsg = i;
  21378.           }
  21379. --- 156,162 ----
  21380.       if (mp -> curmsg == 0 && cur && (fd = open (current, 0)) != NOTOK) {
  21381.           if ((i = read (fd, buffer, sizeof buffer)) > 0) {
  21382.           if (cp = index (buffer, '\n'))
  21383. !             *cp = 0;
  21384.           if ((i = m_atoi (buffer)) > 0)
  21385.               mp -> curmsg = i;
  21386.           }
  21387. ***************
  21388. *** 164,194 ****
  21389.       (void) sprintf (buffer, "%s/%s", name, current);
  21390.       (void) unlink (buffer);
  21391.       }
  21392. ! #endif    COMPAT
  21393.   
  21394.   #ifndef    MTR
  21395.       mp -> lowoff = 1;
  21396. ! #else    MTR
  21397.       mp -> lowoff = mp -> lowmsg;
  21398. ! #endif    MTR
  21399.       mp -> hghoff = mp -> hghmsg + 1;/* for "new" in m_convert */
  21400.   
  21401.       mp = (struct msgs  *)
  21402. !         realloc ((char *) mp, MSIZE (mp, mp -> lowoff, mp -> hghoff));
  21403.       if (mp == NULL)
  21404.       adios (NULLCP, "unable to allocate folder storage");
  21405.   #ifndef    MTR
  21406.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++)
  21407.       mp -> msgstats[i] = 0;
  21408. ! #else    MTR
  21409. !     mp -> msgstats = (short *)
  21410. !         calloc ((unsigned) 1, MSIZEX (mp, mp -> lowmsg, mp -> hghmsg));
  21411.       if (mp -> msgstats == NULL)
  21412.       adios (NULLCP, "unable to allocate messages storage");
  21413.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  21414. !     if (mp -> msgstats < (short *)0)    /* non portable */
  21415.       adios (NULLCP, "m_gmsg() botch -- you lose big");
  21416. ! #endif    MTR
  21417.       for (tail = head; tail < rover; tail++)
  21418.       mp -> msgstats[tail -> msgno] = tail -> stats;
  21419.       m_getatr (mp);
  21420. --- 166,196 ----
  21421.       (void) sprintf (buffer, "%s/%s", name, current);
  21422.       (void) unlink (buffer);
  21423.       }
  21424. ! #endif /* COMPAT */
  21425.   
  21426.   #ifndef    MTR
  21427.       mp -> lowoff = 1;
  21428. ! #else /* MTR */
  21429.       mp -> lowoff = mp -> lowmsg;
  21430. ! #endif /* MTR */
  21431.       mp -> hghoff = mp -> hghmsg + 1;/* for "new" in m_convert */
  21432.   
  21433.       mp = (struct msgs  *)
  21434. !         realloc ((char *) mp, MHSIZE (mp, mp -> lowoff, mp -> hghoff));
  21435.       if (mp == NULL)
  21436.       adios (NULLCP, "unable to allocate folder storage");
  21437.   #ifndef    MTR
  21438.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++)
  21439.       mp -> msgstats[i] = 0;
  21440. ! #else /* MTR */
  21441. !     mp -> msgstats = (int *)
  21442. !         calloc ((unsigned) 1, MHSIZEX (mp, mp -> lowmsg, mp -> hghmsg));
  21443.       if (mp -> msgstats == NULL)
  21444.       adios (NULLCP, "unable to allocate messages storage");
  21445.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  21446. !     if (mp -> msgstats < (int *)0)    /* non portable */
  21447.       adios (NULLCP, "m_gmsg() botch -- you lose big");
  21448. ! #endif /* MTR */
  21449.       for (tail = head; tail < rover; tail++)
  21450.       mp -> msgstats[tail -> msgno] = tail -> stats;
  21451.       m_getatr (mp);
  21452. ***************
  21453. *** 216,226 ****
  21454.       bits = FFATTRSLOT;
  21455.   
  21456.       mp -> msgattrs[i = 0] = getcpy (current);
  21457. !     mp -> msgattrs[++i] = NULL;
  21458.       mp -> attrstats = 0;    /* initially, all public */
  21459.   
  21460.       m_getdefs ();
  21461. !     if (mh_seq == NULL || *mh_seq == NULL)
  21462.       goto private_only;
  21463.   
  21464.       (void) sprintf (field, "%s/%s", mp -> foldpath, mh_seq);
  21465. --- 218,228 ----
  21466.       bits = FFATTRSLOT;
  21467.   
  21468.       mp -> msgattrs[i = 0] = getcpy (current);
  21469. !     mp -> msgattrs[++i] = '\0';
  21470.       mp -> attrstats = 0;    /* initially, all public */
  21471.   
  21472.       m_getdefs ();
  21473. !     if (mh_seq == '\0' || *mh_seq == '\0')
  21474.       goto private_only;
  21475.   
  21476.       (void) sprintf (field, "%s/%s", mp -> foldpath, mh_seq);
  21477. ***************
  21478. *** 262,268 ****
  21479.           && *(np -> n_name + j) == '-'
  21480.           && strcmp (mp -> foldpath, np -> n_name + j + 1) == 0) {
  21481.           cp = getcpy (np -> n_name + alen);
  21482. !         *(cp + j - alen) = NULL;
  21483.           if ((i = m_setatr (mp, cp, getcpy (np -> n_field))) != NOTOK)
  21484.           mp -> attrstats |= 1 << (bits + i);/* private */
  21485.       }
  21486. --- 264,270 ----
  21487.           && *(np -> n_name + j) == '-'
  21488.           && strcmp (mp -> foldpath, np -> n_name + j + 1) == 0) {
  21489.           cp = getcpy (np -> n_name + alen);
  21490. !         *(cp + j - alen) = '\0';
  21491.           if ((i = m_setatr (mp, cp, getcpy (np -> n_field))) != NOTOK)
  21492.           mp -> attrstats |= 1 << (bits + i);/* private */
  21493.       }
  21494. ***************
  21495. *** 285,290 ****
  21496. --- 287,293 ----
  21497.   
  21498.       bits = FFATTRSLOT;
  21499.       hack = strcmp (current, name) == 0;/* hack... */
  21500. +     /* if we're going to use UNSEEN, it should be set here! */
  21501.   
  21502.       for (i = 0; mp -> msgattrs[i]; i++)
  21503.       if (strcmp (mp -> msgattrs[i], name) == 0) {
  21504. ***************
  21505. *** 309,324 ****
  21506.           *ap;
  21507.           ap++) {
  21508.       if (cp = index (*ap, '-'))
  21509. !         *cp++ = NULL;
  21510.       if ((j = m_atoi (*ap)) > 0) {
  21511.   #ifdef    notdef
  21512.           if (hack && j >= mp -> lowmsg && j <= mp -> hghmsg
  21513.               && (mp -> msgstats[j] & EXISTS))
  21514.           mp -> curmsg = j;
  21515. ! #else    not notdef
  21516.           if (hack)
  21517.           mp -> curmsg = j;
  21518. ! #endif    not notdef
  21519.           for (k = cp ? m_atoi (cp) : j; j <= k; j++)
  21520.           if (j >= mp -> lowmsg && j <= mp -> hghmsg
  21521.               && (mp -> msgstats[j] & EXISTS))
  21522. --- 312,327 ----
  21523.           *ap;
  21524.           ap++) {
  21525.       if (cp = index (*ap, '-'))
  21526. !         *cp++ = '\0';
  21527.       if ((j = m_atoi (*ap)) > 0) {
  21528.   #ifdef    notdef
  21529.           if (hack && j >= mp -> lowmsg && j <= mp -> hghmsg
  21530.               && (mp -> msgstats[j] & EXISTS))
  21531.           mp -> curmsg = j;
  21532. ! #else /* not notdef */
  21533.           if (hack)
  21534.           mp -> curmsg = j;
  21535. ! #endif /* not notdef */
  21536.           for (k = cp ? m_atoi (cp) : j; j <= k; j++)
  21537.           if (j >= mp -> lowmsg && j <= mp -> hghmsg
  21538.               && (mp -> msgstats[j] & EXISTS))
  21539. *** ../mh-6.7.2/sbr/m_maildir.c    Tue Feb  6 13:08:59 1990
  21540. --- sbr/m_maildir.c    Mon Dec 14 16:20:36 1992
  21541. ***************
  21542. *** 1,4 ****
  21543. --- 1,7 ----
  21544.   /* m_maildir.c - get the path for the mail directory */
  21545. + #ifndef    lint
  21546. + static char ident[] = "@(#)$Id: m_maildir.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  21547. + #endif    /* lint */
  21548.   
  21549.   #include "../h/mh.h"
  21550.   #include <stdio.h>
  21551. ***************
  21552. *** 25,31 ****
  21553.       if ((cp = exmaildir (folder))
  21554.           && (ep = cp + strlen (cp) - 1) > cp
  21555.           && *ep == '/')
  21556. !     *ep = NULL;
  21557.   
  21558.       return cp;
  21559.   }
  21560. --- 28,34 ----
  21561.       if ((cp = exmaildir (folder))
  21562.           && (ep = cp + strlen (cp) - 1) > cp
  21563.           && *ep == '/')
  21564. !     *ep = 0;
  21565.   
  21566.       return cp;
  21567.   }
  21568. *** ../mh-6.7.2/sbr/m_msgdef.c    Fri Jan 24 10:23:08 1992
  21569. --- sbr/m_msgdef.c    Mon Dec 14 16:20:37 1992
  21570. ***************
  21571. *** 1,7 ****
  21572.   /* m_msgdef.c - some defines for sbr/m_getfld.c */
  21573.   #ifndef    lint
  21574. ! static char ident[] = "@(#)$Id: m_msgdef.c,v 1.1 1992/01/24 18:22:58 jromine Exp $";
  21575. ! #endif    lint
  21576.   #include "../h/mh.h"
  21577.   
  21578.   int    msg_count = 0;    /* disgusting hack for "inc" so it can
  21579. --- 1,7 ----
  21580.   /* m_msgdef.c - some defines for sbr/m_getfld.c */
  21581.   #ifndef    lint
  21582. ! static char ident[] = "@(#)$Id: m_msgdef.c,v 1.2 1992/12/15 00:20:22 jromine Exp $";
  21583. ! #endif    /* lint */
  21584.   #include "../h/mh.h"
  21585.   
  21586.   int    msg_count = 0;    /* disgusting hack for "inc" so it can
  21587. *** ../mh-6.7.2/sbr/m_remsg.c    Tue Mar 27 16:49:27 1990
  21588. --- sbr/m_remsg.c    Mon Dec 14 16:20:37 1992
  21589. ***************
  21590. *** 1,4 ****
  21591. --- 1,7 ----
  21592.   /* m_remsg.c - realloc a msgs structure */
  21593. + #ifndef    lint
  21594. + static char ident[] = "@(#)$Id: m_remsg.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  21595. + #endif    /* lint */
  21596.   
  21597.   #include "../h/mh.h"
  21598.   #include <stdio.h>
  21599. ***************
  21600. *** 11,19 ****
  21601.   {
  21602.       int     msgnum;
  21603.   #ifdef    MTR
  21604. !     register short *sp,
  21605.              *pp;
  21606. ! #endif    MTR
  21607.   
  21608.       if (lo == 0 && (lo = mp -> lowmsg) == 0)
  21609.       lo = 1;
  21610. --- 14,22 ----
  21611.   {
  21612.       int     msgnum;
  21613.   #ifdef    MTR
  21614. !     register int   *sp,
  21615.              *pp;
  21616. ! #endif    /* MTR */
  21617.   
  21618.       if (lo == 0 && (lo = mp -> lowmsg) == 0)
  21619.       lo = 1;
  21620. ***************
  21621. *** 25,56 ****
  21622.       return mp;
  21623.   
  21624.   #ifndef    MTR
  21625. !     mp = (struct msgs  *) realloc ((char *) mp, MSIZE (mp, lo, hi));
  21626.       if (mp == NULL)
  21627.       adios (NULLCP, "unable to re-allocate folder storage");
  21628. ! #else    MTR
  21629. !     if ((sp = (short *) calloc ((unsigned) 1, MSIZEX (mp, lo, hi))) == NULL)
  21630.       adios (NULLCP, "unable to re-allocate messages storage");
  21631.   
  21632.       pp = sp - lo;
  21633. !     if (pp < (short *)0)
  21634.       adios (NULLCP, "m_remsg() botch -- you lose big[1]");
  21635.       for (msgnum = mp -> lowmsg; msgnum <= mp -> hghmsg; msgnum++)
  21636.       pp[msgnum] = mp -> msgstats[msgnum];
  21637.       free ((char *) mp -> msgbase);
  21638.       mp -> msgstats = sp;
  21639. ! #endif    MTR
  21640.       mp -> lowoff = lo;
  21641.       mp -> hghoff = hi;
  21642.   #ifdef    MTR
  21643.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  21644. !     if (mp -> msgstats < (short *)0)
  21645.       adios (NULLCP, "m_remsg() botch -- you lose big[2]");
  21646. ! #endif    MTR
  21647.       for (msgnum = mp -> lowmsg - 1; msgnum >= lo; msgnum--)
  21648. !     mp -> msgstats[msgnum] = NULL;
  21649.       for (msgnum = mp -> hghmsg + 1; msgnum <= hi; msgnum++)
  21650. !     mp -> msgstats[msgnum] = NULL;
  21651.   
  21652.       return mp;
  21653.   }
  21654. --- 28,59 ----
  21655.       return mp;
  21656.   
  21657.   #ifndef    MTR
  21658. !     mp = (struct msgs  *) realloc ((char *) mp, MHSIZE (mp, lo, hi));
  21659.       if (mp == NULL)
  21660.       adios (NULLCP, "unable to re-allocate folder storage");
  21661. ! #else    /* MTR */
  21662. !     if ((sp = (int *) calloc ((unsigned) 1, MHSIZEX (mp, lo, hi))) == NULL)
  21663.       adios (NULLCP, "unable to re-allocate messages storage");
  21664.   
  21665.       pp = sp - lo;
  21666. !     if (pp < (int *)0)
  21667.       adios (NULLCP, "m_remsg() botch -- you lose big[1]");
  21668.       for (msgnum = mp -> lowmsg; msgnum <= mp -> hghmsg; msgnum++)
  21669.       pp[msgnum] = mp -> msgstats[msgnum];
  21670.       free ((char *) mp -> msgbase);
  21671.       mp -> msgstats = sp;
  21672. ! #endif    /* MTR */
  21673.       mp -> lowoff = lo;
  21674.       mp -> hghoff = hi;
  21675.   #ifdef    MTR
  21676.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  21677. !     if (mp -> msgstats < (int *)0)
  21678.       adios (NULLCP, "m_remsg() botch -- you lose big[2]");
  21679. ! #endif    /* MTR */
  21680.       for (msgnum = mp -> lowmsg - 1; msgnum >= lo; msgnum--)
  21681. !     mp -> msgstats[msgnum] = 0;
  21682.       for (msgnum = mp -> hghmsg + 1; msgnum <= hi; msgnum++)
  21683. !     mp -> msgstats[msgnum] = 0;
  21684.   
  21685.       return mp;
  21686.   }
  21687. *** ../mh-6.7.2/sbr/m_seq.c    Thu Feb 14 14:44:50 1991
  21688. --- sbr/m_seq.c    Mon Dec 14 16:20:38 1992
  21689. ***************
  21690. *** 1,7 ****
  21691.   /* m_seq.c - print out a message sequence */
  21692.   #ifndef    lint
  21693. ! static char ident[] = "@(#)$Id: m_seq.c,v 1.7 91/02/14 14:44:38 mh Exp $";
  21694. ! #endif    lint
  21695.   
  21696.   #include "../h/mh.h"
  21697.   #include <stdio.h>
  21698. --- 1,7 ----
  21699.   /* m_seq.c - print out a message sequence */
  21700.   #ifndef    lint
  21701. ! static char ident[] = "@(#)$Id: m_seq.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  21702. ! #endif    /* lint */
  21703.   
  21704.   #include "../h/mh.h"
  21705.   #include <stdio.h>
  21706. *** ../mh-6.7.2/sbr/m_seqnew.c    Thu Feb 14 14:46:38 1991
  21707. --- sbr/m_seqnew.c    Mon Dec 14 16:20:39 1992
  21708. ***************
  21709. *** 1,7 ****
  21710.   /* m_seqnew.c - manage sequences */
  21711.   #ifndef    lint
  21712. ! static char ident[] = "@(#)$Id: m_seqnew.c,v 1.5 91/02/14 14:46:26 mh Exp $";
  21713. ! #endif    lint
  21714.   
  21715.   #include "../h/mh.h"
  21716.   #include <ctype.h>
  21717. --- 1,7 ----
  21718.   /* m_seqnew.c - manage sequences */
  21719.   #ifndef    lint
  21720. ! static char ident[] = "@(#)$Id: m_seqnew.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  21721. ! #endif    /* lint */
  21722.   
  21723.   #include "../h/mh.h"
  21724.   #include <ctype.h>
  21725. ***************
  21726. *** 147,153 ****
  21727.   {
  21728.       register char  *pp;
  21729.   
  21730. !     if (cp == NULL || *cp == NULL) {
  21731.       advise (NULLCP, "empty sequence name");
  21732.       return 0;
  21733.       }
  21734. --- 147,153 ----
  21735.   {
  21736.       register char  *pp;
  21737.   
  21738. !     if (cp == NULL || *cp == 0) {
  21739.       advise (NULLCP, "empty sequence name");
  21740.       return 0;
  21741.       }
  21742. ***************
  21743. *** 155,161 ****
  21744.       if (strcmp (cp, "new") == 0
  21745.   #ifdef    notdef
  21746.           || strcmp (cp, "cur") == 0
  21747. ! #endif    notdef
  21748.           || strcmp (cp, "all") == 0
  21749.           || strcmp (cp, "first") == 0
  21750.           || strcmp (cp, "last") == 0
  21751. --- 155,161 ----
  21752.       if (strcmp (cp, "new") == 0
  21753.   #ifdef    notdef
  21754.           || strcmp (cp, "cur") == 0
  21755. ! #endif    /* notdef */
  21756.           || strcmp (cp, "all") == 0
  21757.           || strcmp (cp, "first") == 0
  21758.           || strcmp (cp, "last") == 0
  21759. *** ../mh-6.7.2/sbr/m_sync.c    Mon Nov  5 11:47:29 1990
  21760. --- sbr/m_sync.c    Mon Dec 14 16:20:39 1992
  21761. ***************
  21762. *** 1,7 ****
  21763.   /* m_sync.c - synchronize message sequences */
  21764.   #ifndef    lint
  21765. ! static char ident[] = "@(#)$Id: m_sync.c,v 1.6 90/11/05 11:46:34 mh Exp $";
  21766. ! #endif    lint
  21767.   
  21768.   #include "../h/mh.h"
  21769.   #include <stdio.h>
  21770. --- 1,7 ----
  21771.   /* m_sync.c - synchronize message sequences */
  21772.   #ifndef    lint
  21773. ! static char ident[] = "@(#)$Id: m_sync.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  21774. ! #endif    /* lint */
  21775.   
  21776.   #include "../h/mh.h"
  21777.   #include <stdio.h>
  21778. ***************
  21779. *** 8,14 ****
  21780.   #include <signal.h>
  21781.   #ifndef    sigmask
  21782.   #define    sigmask(s)    (1 << ((s) - 1))
  21783. ! #endif    not sigmask
  21784.   
  21785.   
  21786.   /* decision logic
  21787. --- 8,14 ----
  21788.   #include <signal.h>
  21789.   #ifndef    sigmask
  21790.   #define    sigmask(s)    (1 << ((s) - 1))
  21791. ! #endif    /* not sigmask */
  21792.   
  21793.   
  21794.   /* decision logic
  21795. ***************
  21796. *** 30,38 ****
  21797.       register FILE  *fp;
  21798.   #ifndef    BSD42
  21799.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  21800. ! #else    BSD42
  21801.       int        smask;
  21802. ! #endif    BSD42
  21803.   
  21804.       if (!(mp -> msgflags & SEQMOD))
  21805.       return;
  21806. --- 30,38 ----
  21807.       register FILE  *fp;
  21808.   #ifndef    BSD42
  21809.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  21810. ! #else    /* BSD42 */
  21811.       int        smask;
  21812. ! #endif    /* BSD42 */
  21813.   
  21814.       if (!(mp -> msgflags & SEQMOD))
  21815.       return;
  21816. ***************
  21817. *** 44,50 ****
  21818.       fp = NULL;
  21819.   
  21820.       flags = mp -> msgflags;
  21821. !     if (mh_seq == NULL || *mh_seq == NULL)
  21822.       mp -> msgflags |= READONLY;
  21823.   
  21824.       for (i = 0; mp -> msgattrs[i]; i++) {
  21825. --- 44,50 ----
  21826.       fp = NULL;
  21827.   
  21828.       flags = mp -> msgflags;
  21829. !     if (mh_seq == NULL || *mh_seq == 0)
  21830.       mp -> msgflags |= READONLY;
  21831.   
  21832.       for (i = 0; mp -> msgattrs[i]; i++) {
  21833. ***************
  21834. *** 73,82 ****
  21835.           istat = signal (SIGINT, SIG_IGN);
  21836.           qstat = signal (SIGQUIT, SIG_IGN);
  21837.           tstat = signal (SIGTERM, SIG_IGN);
  21838. ! #else    BSD42
  21839.           smask = sigblock (sigmask (SIGHUP) | sigmask (SIGINT)
  21840.                       | sigmask (SIGQUIT) | sigmask (SIGTERM));
  21841. ! #endif    BSD42
  21842.           }
  21843.           fprintf (fp, "%s: %s\n", mp -> msgattrs[i], cp);
  21844.       }
  21845. --- 73,82 ----
  21846.           istat = signal (SIGINT, SIG_IGN);
  21847.           qstat = signal (SIGQUIT, SIG_IGN);
  21848.           tstat = signal (SIGTERM, SIG_IGN);
  21849. ! #else    /* BSD42 */
  21850.           smask = sigblock (sigmask (SIGHUP) | sigmask (SIGINT)
  21851.                       | sigmask (SIGQUIT) | sigmask (SIGTERM));
  21852. ! #endif    /* BSD42 */
  21853.           }
  21854.           fprintf (fp, "%s: %s\n", mp -> msgattrs[i], cp);
  21855.       }
  21856. ***************
  21857. *** 89,97 ****
  21858.       (void) signal (SIGINT, istat);
  21859.       (void) signal (SIGQUIT, qstat);
  21860.       (void) signal (SIGTERM, tstat);
  21861. ! #else    BSD42
  21862.       (void) sigsetmask (smask);
  21863. ! #endif    BSD42
  21864.       }
  21865.       else
  21866.       if (!(mp -> msgflags & READONLY))
  21867. --- 89,97 ----
  21868.       (void) signal (SIGINT, istat);
  21869.       (void) signal (SIGQUIT, qstat);
  21870.       (void) signal (SIGTERM, tstat);
  21871. ! #else    /* BSD42 */
  21872.       (void) sigsetmask (smask);
  21873. ! #endif    /* BSD42 */
  21874.       }
  21875.       else
  21876.       if (!(mp -> msgflags & READONLY))
  21877. *** ../mh-6.7.2/sbr/m_update.c    Tue Feb  6 13:09:01 1990
  21878. --- sbr/m_update.c    Mon Dec 14 16:20:40 1992
  21879. ***************
  21880. *** 1,4 ****
  21881. --- 1,7 ----
  21882.   /* m_update.c - update the profile */
  21883. + #ifndef    lint
  21884. + static char ident[] = "@(#)$Id: m_update.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  21885. + #endif    lint
  21886.   
  21887.   #include "../h/mh.h"
  21888.   #include <stdio.h>
  21889. ***************
  21890. *** 5,11 ****
  21891.   #include <signal.h>
  21892.   #ifndef    sigmask
  21893.   #define    sigmask(s)    (1 << ((s) - 1))
  21894. ! #endif    not sigmask
  21895.   
  21896.   static int    m_chkids();
  21897.   
  21898. --- 8,14 ----
  21899.   #include <signal.h>
  21900.   #ifndef    sigmask
  21901.   #define    sigmask(s)    (1 << ((s) - 1))
  21902. ! #endif    /* not sigmask */
  21903.   
  21904.   static int    m_chkids();
  21905.   
  21906. ***************
  21907. *** 13,21 ****
  21908.       int     action;
  21909.   #ifndef    BSD42
  21910.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  21911. ! #else    BSD42
  21912.       int        smask;
  21913. ! #endif    BSD42
  21914.       register struct node   *np;
  21915.       FILE * out;
  21916.   
  21917. --- 16,24 ----
  21918.       int     action;
  21919.   #ifndef    BSD42
  21920.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  21921. ! #else    /* BSD42 */
  21922.       int        smask;
  21923. ! #endif    /* BSD42 */
  21924.       register struct node   *np;
  21925.       FILE * out;
  21926.   
  21927. ***************
  21928. *** 31,40 ****
  21929.       istat = signal (SIGINT, SIG_IGN);
  21930.       qstat = signal (SIGQUIT, SIG_IGN);
  21931.       tstat = signal (SIGTERM, SIG_IGN);
  21932. ! #else    BSD42
  21933.       smask = sigblock (sigmask (SIGHUP) | sigmask (SIGINT)
  21934.               | sigmask (SIGQUIT) | sigmask (SIGTERM));
  21935. ! #endif    BSD42
  21936.   
  21937.       if ((out = fopen (ctxpath, "w")) == NULL)
  21938.       adios (ctxpath, "unable to write");
  21939. --- 34,43 ----
  21940.       istat = signal (SIGINT, SIG_IGN);
  21941.       qstat = signal (SIGQUIT, SIG_IGN);
  21942.       tstat = signal (SIGTERM, SIG_IGN);
  21943. ! #else    /* BSD42 */
  21944.       smask = sigblock (sigmask (SIGHUP) | sigmask (SIGINT)
  21945.               | sigmask (SIGQUIT) | sigmask (SIGTERM));
  21946. ! #endif    /* BSD42 */
  21947.   
  21948.       if ((out = fopen (ctxpath, "w")) == NULL)
  21949.       adios (ctxpath, "unable to write");
  21950. ***************
  21951. *** 48,56 ****
  21952.       (void) signal (SIGINT, istat);
  21953.       (void) signal (SIGQUIT, qstat);
  21954.       (void) signal (SIGTERM, tstat);
  21955. ! #else    BSD42
  21956.       (void) sigsetmask (smask);
  21957. ! #endif    BSD42
  21958.       if (action == OK)
  21959.       _exit (0);        /* we are child, time to die */
  21960.   }
  21961. --- 51,59 ----
  21962.       (void) signal (SIGINT, istat);
  21963.       (void) signal (SIGQUIT, qstat);
  21964.       (void) signal (SIGTERM, tstat);
  21965. ! #else    /* BSD42 */
  21966.       (void) sigsetmask (smask);
  21967. ! #endif    /* BSD42 */
  21968.       if (action == OK)
  21969.       _exit (0);        /* we are child, time to die */
  21970.   }
  21971. *** ../mh-6.7.2/sbr/makedir.c    Thu Jan 23 15:12:50 1992
  21972. --- sbr/makedir.c    Mon Dec 14 16:20:40 1992
  21973. ***************
  21974. *** 1,7 ****
  21975.   /* makedir.c - make a directory */
  21976.   #ifndef    lint
  21977. ! static char ident[] = "@(#)$Id: makedir.c,v 1.7 1992/01/23 23:12:43 jromine Exp $";
  21978. ! #endif    lint
  21979.   
  21980.   #if defined (BSD42) || defined (hpux)
  21981.   /* Modified to try recursive create.  Really, this should be broken
  21982. --- 1,7 ----
  21983.   /* makedir.c - make a directory */
  21984.   #ifndef    lint
  21985. ! static char ident[] = "@(#)$Id: makedir.c,v 1.13 1992/12/15 00:20:22 jromine Exp $";
  21986. ! #endif    /* lint */
  21987.   
  21988.   #if defined (BSD42) || defined (hpux)
  21989.   /* Modified to try recursive create.  Really, this should be broken
  21990. ***************
  21991. *** 14,28 ****
  21992.   #include "../h/mh.h"
  21993.   #include <stdio.h>
  21994.   
  21995. ! #if defined (BSD42)  || defined (hpux)
  21996.   #include <errno.h>
  21997.   #include <sys/param.h>
  21998.   #include <sys/file.h>
  21999. ! #endif BDS42
  22000.   #ifdef    SYS5DIR
  22001.   #include <sys/types.h>
  22002.   #include <sys/stat.h>
  22003. ! #endif    SYS5DIR
  22004.   
  22005.   extern int  errno;
  22006.       
  22007. --- 14,32 ----
  22008.   #include "../h/mh.h"
  22009.   #include <stdio.h>
  22010.   
  22011. ! #if defined (BSD42) || defined (hpux) || defined(SVR4) || \
  22012. !     defined(ncr) || defined (_AIX) || defined(AUX)
  22013.   #include <errno.h>
  22014.   #include <sys/param.h>
  22015.   #include <sys/file.h>
  22016. ! #endif /* BSD42 ... */
  22017.   #ifdef    SYS5DIR
  22018.   #include <sys/types.h>
  22019.   #include <sys/stat.h>
  22020. ! #endif    /* SYS5DIR */
  22021. ! #if defined(SVR4) || defined(ncr)
  22022. ! #include <unistd.h>
  22023. ! #endif
  22024.   
  22025.   extern int  errno;
  22026.       
  22027. ***************
  22028. *** 34,40 ****
  22029.   #if defined (BSD42)  || defined (hpux) || defined (SYS5DIR)
  22030.       register char  *c;
  22031.       char path[MAXPATHLEN];
  22032. ! #endif BSD42
  22033.   
  22034.       m_update ();
  22035.       (void) fflush (stdout);
  22036. --- 38,44 ----
  22037.   #if defined (BSD42)  || defined (hpux) || defined (SYS5DIR)
  22038.       register char  *c;
  22039.       char path[MAXPATHLEN];
  22040. ! #endif    /* BSD42 */
  22041.   
  22042.       m_update ();
  22043.       (void) fflush (stdout);
  22044. ***************
  22045. *** 64,70 ****
  22046.           }
  22047.       }
  22048.       else
  22049. ! #endif    BSD42 or hpux or SYS5DIR
  22050.       switch (pid = vfork ()) {
  22051.       case NOTOK: 
  22052.           advise ("fork", "unable to");
  22053. --- 68,74 ----
  22054.           }
  22055.       }
  22056.       else
  22057. ! #endif    /* BSD42 or hpux or SYS5DIR */
  22058.       switch (pid = vfork ()) {
  22059.       case NOTOK: 
  22060.           advise ("fork", "unable to");
  22061. *** ../mh-6.7.2/sbr/path.c    Tue Feb  6 13:09:03 1990
  22062. --- sbr/path.c    Mon Dec 14 16:20:41 1992
  22063. ***************
  22064. *** 1,4 ****
  22065. --- 1,7 ----
  22066.   /* path.c - return a pathname */
  22067. + #ifndef    lint
  22068. + static char ident[] = "@(#)$Id: path.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  22069. + #endif    /* lint */
  22070.   
  22071.   #include "../h/mh.h"
  22072.   #include <stdio.h>
  22073. ***************
  22074. *** 27,33 ****
  22075.       if ((cp = expath (name, flag))
  22076.           && (ep = cp + strlen (cp) - 1) > cp
  22077.           && *ep == '/')
  22078. !     *ep = NULL;
  22079.   
  22080.       return cp;
  22081.   }
  22082. --- 30,36 ----
  22083.       if ((cp = expath (name, flag))
  22084.           && (ep = cp + strlen (cp) - 1) > cp
  22085.           && *ep == '/')
  22086. !     *ep = 0;
  22087.   
  22088.       return cp;
  22089.   }
  22090. ***************
  22091. *** 107,115 ****
  22092.       for (cp = f; *cp;)
  22093.       if (*cp == '/') {
  22094.           switch (*++cp) {
  22095. !         case NULL: 
  22096.               if (--cp > f)
  22097. !             *cp = NULL;
  22098.               break;
  22099.   
  22100.           case '/': 
  22101. --- 110,118 ----
  22102.       for (cp = f; *cp;)
  22103.       if (*cp == '/') {
  22104.           switch (*++cp) {
  22105. !         case 0: 
  22106.               if (--cp > f)
  22107. !             *cp = 0;
  22108.               break;
  22109.   
  22110.           case '/': 
  22111. ***************
  22112. *** 122,128 ****
  22113.               if (strcmp (cp, DOT) == 0) {
  22114.               if (cp > f + 1)
  22115.                   cp--;
  22116. !             *cp = NULL;
  22117.               break;
  22118.               }
  22119.               if (strcmp (cp, DOTDOT) == 0) {
  22120. --- 125,131 ----
  22121.               if (strcmp (cp, DOT) == 0) {
  22122.               if (cp > f + 1)
  22123.                   cp--;
  22124. !             *cp = 0;
  22125.               break;
  22126.               }
  22127.               if (strcmp (cp, DOTDOT) == 0) {
  22128. ***************
  22129. *** 131,137 ****
  22130.                   break;
  22131.               if (cp <= f)
  22132.                   cp = f + 1;
  22133. !             *cp = NULL;
  22134.               break;
  22135.               }
  22136.               if (strncmp (cp, PWD, NPWD) == 0) {
  22137. --- 134,140 ----
  22138.                   break;
  22139.               if (cp <= f)
  22140.                   cp = f + 1;
  22141. !             *cp = 0;
  22142.               break;
  22143.               }
  22144.               if (strncmp (cp, PWD, NPWD) == 0) {
  22145. *** ../mh-6.7.2/sbr/pidstatus.c    Thu Oct 29 15:00:46 1987
  22146. --- sbr/pidstatus.c    Mon Dec 14 16:20:42 1992
  22147. ***************
  22148. *** 1,4 ****
  22149. --- 1,7 ----
  22150.   /* pidstatus.c - report child's status */
  22151. + #ifndef    lint
  22152. + static char ident[] = "@(#)$Id: pidstatus.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  22153. + #endif    /* lint */
  22154.   
  22155.   #include "../h/mh.h"
  22156.   #include <signal.h>
  22157. ***************
  22158. *** 41,47 ****
  22159.   };
  22160.   #else
  22161.   extern  char *sys_siglist[];
  22162. ! #endif    BSD42
  22163.   
  22164.   /*   */
  22165.   
  22166. --- 44,50 ----
  22167.   };
  22168.   #else
  22169.   extern  char *sys_siglist[];
  22170. ! #endif    /* BSD42 */
  22171.   
  22172.   /*   */
  22173.   
  22174. ***************
  22175. *** 75,86 ****
  22176.           fprintf (fp, "Signal %d", signum);
  22177.           else
  22178.           fprintf (fp, "%s", sigs[signum]);
  22179. ! #else    BSD42
  22180.           if (signum >= NSIG)
  22181.           fprintf (fp, "Signal %d", signum);
  22182.           else
  22183.           fprintf (fp, "%s", sys_siglist[signum]);
  22184. ! #endif    BSD42
  22185.           fprintf (fp, "%s\n", status & 0x80 ? " (core dumped)" : "");
  22186.           break;
  22187.       }
  22188. --- 78,89 ----
  22189.           fprintf (fp, "Signal %d", signum);
  22190.           else
  22191.           fprintf (fp, "%s", sigs[signum]);
  22192. ! #else    /* BSD42 */
  22193.           if (signum >= NSIG)
  22194.           fprintf (fp, "Signal %d", signum);
  22195.           else
  22196.           fprintf (fp, "%s", sys_siglist[signum]);
  22197. ! #endif    /* BSD42 */
  22198.           fprintf (fp, "%s\n", status & 0x80 ? " (core dumped)" : "");
  22199.           break;
  22200.       }
  22201. *** ../mh-6.7.2/sbr/pidwait.c    Wed Jan 29 15:57:35 1992
  22202. --- sbr/pidwait.c    Mon Dec 14 16:20:42 1992
  22203. ***************
  22204. *** 1,14 ****
  22205.   /* pidwait.c - wait for child to exit */
  22206.   #ifndef    lint
  22207. ! static char ident[] = "@(#)$Id: pidwait.c,v 1.5 1992/01/29 23:57:28 jromine Exp $";
  22208. ! #endif    lint
  22209.   
  22210.   #include "../h/mh.h"
  22211.   #include <signal.h>
  22212.   #include <stdio.h>
  22213. ! #ifdef    BSD42
  22214.   #include <sys/wait.h>
  22215. ! #endif    BSD42
  22216.   
  22217.   
  22218.   int     pidwait (id, sigsok)
  22219. --- 1,14 ----
  22220.   /* pidwait.c - wait for child to exit */
  22221.   #ifndef    lint
  22222. ! static char ident[] = "@(#)$Id: pidwait.c,v 1.10 1992/12/15 00:20:22 jromine Exp $";
  22223. ! #endif    /* lint */
  22224.   
  22225.   #include "../h/mh.h"
  22226.   #include <signal.h>
  22227.   #include <stdio.h>
  22228. ! #if defined (BSD42) || defined (SVR4)
  22229.   #include <sys/wait.h>
  22230. ! #endif
  22231.   
  22232.   
  22233.   int     pidwait (id, sigsok)
  22234. ***************
  22235. *** 17,27 ****
  22236.   {
  22237.       register int    pid;
  22238.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  22239. ! #ifndef    BSD42
  22240. !     int     status;
  22241. ! #else    BSD42
  22242.       union wait status;
  22243. ! #endif    BSD42
  22244.   
  22245.       if (sigsok == NOTOK) {
  22246.   #ifdef    notdef        /* I don't see why to trap these... */
  22247. --- 17,27 ----
  22248.   {
  22249.       register int    pid;
  22250.       TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  22251. ! #if    defined(BSD42) && !defined(WAITINT)
  22252.       union wait status;
  22253. ! #else
  22254. !     int     status;
  22255. ! #endif
  22256.   
  22257.       if (sigsok == NOTOK) {
  22258.   #ifdef    notdef        /* I don't see why to trap these... */
  22259. ***************
  22260. *** 32,39 ****
  22261. --- 32,43 ----
  22262.       qstat = signal (SIGQUIT, SIG_IGN);
  22263.       }
  22264.   
  22265. + #ifdef    SVR4
  22266. +     pid = waitpid (id, &status, WUNTRACED);
  22267. + #else
  22268.       while ((pid = wait (&status)) != NOTOK && pid != id)
  22269.       continue;
  22270. + #endif
  22271.   
  22272.       if (sigsok == NOTOK) {
  22273.   #ifdef    notdef
  22274. ***************
  22275. *** 44,52 ****
  22276.       (void) signal (SIGQUIT, qstat);
  22277.       }
  22278.   
  22279. ! #ifndef    BSD42
  22280. !     return (pid == NOTOK ? NOTOK : status);
  22281. ! #else    BSD42
  22282.       return (pid == NOTOK ? NOTOK : status.w_status);
  22283. ! #endif    BSD42
  22284.   }
  22285. --- 48,56 ----
  22286.       (void) signal (SIGQUIT, qstat);
  22287.       }
  22288.   
  22289. ! #if defined(BSD42) && !defined(WAITINT)
  22290.       return (pid == NOTOK ? NOTOK : status.w_status);
  22291. ! #else
  22292. !     return (pid == NOTOK ? NOTOK : status);
  22293. ! #endif
  22294.   }
  22295. *** ../mh-6.7.2/sbr/push.c    Thu Oct 29 15:00:47 1987
  22296. --- sbr/push.c    Mon Dec 14 16:20:43 1992
  22297. ***************
  22298. *** 1,4 ****
  22299. --- 1,7 ----
  22300.   /* push.c - push a fork into the background */
  22301. + #ifndef    lint
  22302. + static char ident[] = "@(#)$Id: push.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  22303. + #endif    /* lint */
  22304.   
  22305.   #include "../h/mh.h"
  22306.   #include <stdio.h>
  22307. ***************
  22308. *** 23,29 ****
  22309.           (void) signal (SIGTSTP, SIG_IGN);
  22310.           (void) signal (SIGTTIN, SIG_IGN);
  22311.           (void) signal (SIGTTOU, SIG_IGN);
  22312. ! #endif    SIGTSTP
  22313.           (void) freopen ("/dev/null", "r", stdin);
  22314.           (void) freopen ("/dev/null", "w", stdout);
  22315.           break;
  22316. --- 26,32 ----
  22317.           (void) signal (SIGTSTP, SIG_IGN);
  22318.           (void) signal (SIGTTIN, SIG_IGN);
  22319.           (void) signal (SIGTTOU, SIG_IGN);
  22320. ! #endif    /* SIGTSTP */
  22321.           (void) freopen ("/dev/null", "r", stdin);
  22322.           (void) freopen ("/dev/null", "w", stdout);
  22323.           break;
  22324. *** ../mh-6.7.2/sbr/putenv.c    Tue Feb  6 13:08:42 1990
  22325. --- sbr/putenv.c    Mon Dec 14 16:20:43 1992
  22326. ***************
  22327. *** 1,4 ****
  22328. --- 1,7 ----
  22329.   /* putenv.c - (un) set an envariable */
  22330. + #ifndef    lint
  22331. + static char ident[] = "@(#)$Id: putenv.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  22332. + #endif    /* lint */
  22333.   
  22334.   #include "../h/mh.h"
  22335.   #include <stdio.h>
  22336. ***************
  22337. *** 8,14 ****
  22338.   
  22339.   static nvmatch();
  22340.   
  22341. ! int     putenv (name, value)
  22342.   register char  *name,
  22343.                  *value;
  22344.   {
  22345. --- 11,17 ----
  22346.   
  22347.   static nvmatch();
  22348.   
  22349. ! int     m_putenv (name, value)
  22350.   register char  *name,
  22351.                  *value;
  22352.   {
  22353. *** ../mh-6.7.2/sbr/pwd.c    Mon Feb  5 14:38:32 1990
  22354. --- sbr/pwd.c    Mon Dec 14 16:20:44 1992
  22355. ***************
  22356. *** 1,9 ****
  22357.   /* pwd.c - return the current working directory */
  22358.   
  22359.   #include "../h/mh.h"
  22360.   #if    !defined (BSD42) && !defined (SYS5DIR)
  22361.   #include "../h/local.h"
  22362. ! #endif    not BSD42 and not SYS5DIR
  22363.   #include <stdio.h>
  22364.   
  22365.   #define    MAXPATHLEN    1024
  22366. --- 1,12 ----
  22367.   /* pwd.c - return the current working directory */
  22368. + #ifndef    lint
  22369. + static char ident[] = "@(#)$Id: pwd.c,v 2.5 1992/12/15 00:20:22 jromine Exp $";
  22370. + #endif    /* lint */
  22371.   
  22372.   #include "../h/mh.h"
  22373.   #if    !defined (BSD42) && !defined (SYS5DIR)
  22374.   #include "../h/local.h"
  22375. ! #endif    /* not BSD42 and not SYS5DIR */
  22376.   #include <stdio.h>
  22377.   
  22378.   #define    MAXPATHLEN    1024
  22379. ***************
  22380. *** 19,34 ****
  22381.   #ifndef    SYS5DIR
  22382.       if (getwd (curwd) == NOTOK) {
  22383.       admonish (NULL, "unable to determine working directory");
  22384. ! #else    SYS5DIR
  22385.       if (getcwd (curwd, MAXPATHLEN) == NULL) {
  22386.       admonish (NULL, "unable to determine working directory");
  22387. ! #endif    SYS5DIR
  22388. ! #else    BSD42
  22389. !     if (getwd (curwd) == NULL) {
  22390.       admonish (NULLCP, "unable to determine working directory: %s", curwd);
  22391. ! #endif    BSD42
  22392.       if (mypath == NULL
  22393. !         || *mypath == NULL
  22394.           || ((void) strcpy (curwd, mypath), chdir (curwd)) == NOTOK) {
  22395.           (void) strcpy (curwd, "/");
  22396.           (void) chdir (curwd);
  22397. --- 22,37 ----
  22398.   #ifndef    SYS5DIR
  22399.       if (getwd (curwd) == NOTOK) {
  22400.       admonish (NULL, "unable to determine working directory");
  22401. ! #else    /* SYS5DIR */
  22402.       if (getcwd (curwd, MAXPATHLEN) == NULL) {
  22403.       admonish (NULL, "unable to determine working directory");
  22404. ! #endif    /* SYS5DIR */
  22405. ! #else    /* BSD42 */
  22406. !     if (getwd (curwd) == 0) {
  22407.       admonish (NULLCP, "unable to determine working directory: %s", curwd);
  22408. ! #endif    /* BSD42 */
  22409.       if (mypath == NULL
  22410. !         || *mypath == 0
  22411.           || ((void) strcpy (curwd, mypath), chdir (curwd)) == NOTOK) {
  22412.           (void) strcpy (curwd, "/");
  22413.           (void) chdir (curwd);
  22414. ***************
  22415. *** 37,43 ****
  22416.       }
  22417.   
  22418.       if ((cp = curwd + strlen (curwd) - 1) > curwd && *cp == '/')
  22419. !     *cp = NULL;
  22420.   
  22421.       return curwd;
  22422.   }
  22423. --- 40,46 ----
  22424.       }
  22425.   
  22426.       if ((cp = curwd + strlen (curwd) - 1) > curwd && *cp == '/')
  22427. !     *cp = 0;
  22428.   
  22429.       return curwd;
  22430.   }
  22431. ***************
  22432. *** 120,123 ****
  22433.       closedir (dd);
  22434.       return NOTOK;
  22435.   }
  22436. ! #endif    not BSD42 and not SYS5DIR
  22437. --- 123,126 ----
  22438.       closedir (dd);
  22439.       return NOTOK;
  22440.   }
  22441. ! #endif    /* not BSD42 and not SYS5DIR */
  22442. *** ../mh-6.7.2/sbr/refile.c    Thu Oct 29 15:00:49 1987
  22443. --- sbr/refile.c    Mon Dec 14 16:20:44 1992
  22444. ***************
  22445. *** 1,6 ****
  22446.   /* refile.c - refile the draft into another folder */
  22447.   
  22448. - 
  22449.   #include "../h/mh.h"
  22450.   #include <stdio.h>
  22451.   
  22452. --- 1,8 ----
  22453.   /* refile.c - refile the draft into another folder */
  22454. + #ifndef    lint
  22455. + static char ident[] = "@(#)$Id: refile.c,v 1.2 1992/12/15 00:20:22 jromine Exp $";
  22456. + #endif    /* lint */
  22457.   
  22458.   #include "../h/mh.h"
  22459.   #include <stdio.h>
  22460.   
  22461. ***************
  22462. *** 14,19 ****
  22463. --- 16,23 ----
  22464.   
  22465.       vecp = 0;
  22466.       vec[vecp++] = r1bindex (fileproc, '/');
  22467. +     vec[vecp++] = "-nolink";    /* override bad .mh_profile defaults */
  22468. +     vec[vecp++] = "-nopreserve";
  22469.       vec[vecp++] = "-file";
  22470.       vec[vecp++] = file;
  22471.   
  22472. *** ../mh-6.7.2/sbr/remdir.c    Mon Feb  5 14:39:43 1990
  22473. --- sbr/remdir.c    Mon Dec 14 16:20:45 1992
  22474. ***************
  22475. *** 1,4 ****
  22476. --- 1,7 ----
  22477.   /* remdir.c - remove a directory */
  22478. + #ifndef    lint
  22479. + static char ident[] = "@(#)$Id: remdir.c,v 1.5 1992/12/15 00:20:22 jromine Exp $";
  22480. + #endif    lint
  22481.   
  22482.   #include "../h/mh.h"
  22483.   #include <stdio.h>
  22484. ***************
  22485. *** 9,15 ****
  22486.   {
  22487.   #if    !defined (BSD42) && !defined (SYS5DIR)
  22488.       int     pid;
  22489. ! #endif    not BSD42 and not SYS5DIR
  22490.   
  22491.       m_update ();
  22492.       (void) fflush (stdout);
  22493. --- 12,18 ----
  22494.   {
  22495.   #if    !defined (BSD42) && !defined (SYS5DIR)
  22496.       int     pid;
  22497. ! #endif    /* not BSD42 and not SYS5DIR */
  22498.   
  22499.       m_update ();
  22500.       (void) fflush (stdout);
  22501. ***************
  22502. *** 32,43 ****
  22503.           return 0;
  22504.           break;
  22505.       }
  22506. ! #else    BSD42 or SYS5DIR
  22507.       if (rmdir (dir) == NOTOK) {
  22508.       admonish (dir, "unable to remove directory");
  22509.       return 0;
  22510.       }
  22511. ! #endif    BSD42 or SYS5DIR
  22512.   
  22513.       return 1;
  22514.   }
  22515. --- 35,46 ----
  22516.           return 0;
  22517.           break;
  22518.       }
  22519. ! #else    /* BSD42 or SYS5DIR */
  22520.       if (rmdir (dir) == NOTOK) {
  22521.       admonish (dir, "unable to remove directory");
  22522.       return 0;
  22523.       }
  22524. ! #endif    /* BSD42 or SYS5DIR */
  22525.   
  22526.       return 1;
  22527.   }
  22528. *** ../mh-6.7.2/sbr/smatch.c    Fri Feb  9 09:33:51 1990
  22529. --- sbr/smatch.c    Mon Dec 14 16:20:46 1992
  22530. ***************
  22531. *** 1,10 ****
  22532.   /* smatch.c - match a switch */
  22533.   
  22534.   #include "../h/mh.h"
  22535.   
  22536. ! 
  22537.   #define abs(i) (i < 0 ? -i : i)
  22538. ! 
  22539.   
  22540.   smatch(string, swp)
  22541.   register char *string;
  22542. --- 1,13 ----
  22543.   /* smatch.c - match a switch */
  22544. + #ifndef    lint
  22545. + static char ident[] = "@(#)$Id: smatch.c,v 1.5 1992/12/15 00:20:22 jromine Exp $";
  22546. + #endif    /* lint */
  22547.   
  22548.   #include "../h/mh.h"
  22549.   
  22550. ! #ifndef abs
  22551.   #define abs(i) (i < 0 ? -i : i)
  22552. ! #endif
  22553.   
  22554.   smatch(string, swp)
  22555.   register char *string;
  22556. *** ../mh-6.7.2/sbr/sprintb.c    Thu Oct 29 15:00:50 1987
  22557. --- sbr/sprintb.c    Mon Dec 14 16:20:46 1992
  22558. ***************
  22559. *** 1,4 ****
  22560. --- 1,7 ----
  22561.   /* sprintb.c - sprintf a %b string */
  22562. + #ifndef    lint
  22563. + static char ident[] = "@(#)$Id: sprintb.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  22564. + #endif    /* lint */
  22565.   
  22566.   #include "../h/mh.h"
  22567.   #include <stdio.h>
  22568. ***************
  22569. *** 31,37 ****
  22570.           for (; *bits > 32; bits++)
  22571.               continue;
  22572.       *bp++ = '>';
  22573. !     *bp = NULL;
  22574.       }
  22575.   
  22576.       return buffer;
  22577. --- 34,40 ----
  22578.           for (; *bits > 32; bits++)
  22579.               continue;
  22580.       *bp++ = '>';
  22581. !     *bp = 0;
  22582.       }
  22583.   
  22584.       return buffer;
  22585. *** ../mh-6.7.2/sbr/strindex.c    Thu Jan 23 15:13:41 1992
  22586. --- sbr/strindex.c    Mon Dec 14 16:20:47 1992
  22587. ***************
  22588. *** 1,7 ****
  22589.   /* strindex.c - "unsigned" lexical index */
  22590.   #ifndef    lint
  22591. ! static char ident[] = "@(#)$Id: strindex.c,v 2.2 1990/04/05 15:30:30 sources Exp $";
  22592. ! #endif    lint
  22593.   
  22594.   
  22595.   int  stringdex (p1, p2)
  22596. --- 1,7 ----
  22597.   /* strindex.c - "unsigned" lexical index */
  22598.   #ifndef    lint
  22599. ! static char ident[] = "@(#)$Id: strindex.c,v 2.3 1992/12/15 00:20:22 jromine Exp $";
  22600. ! #endif    /* lint */
  22601.   
  22602.   
  22603.   int  stringdex (p1, p2)
  22604. *** ../mh-6.7.2/sbr/trimcpy.c    Thu Oct 29 15:00:51 1987
  22605. --- sbr/trimcpy.c    Mon Dec 14 16:20:47 1992
  22606. ***************
  22607. *** 1,5 ****
  22608. --- 1,9 ----
  22609.   /* trimcpy.c - strip [lt]wsp and replace newlines with spaces */
  22610. + #ifndef       lint
  22611. + static char ident[] = "@(#)$Id: trimcpy.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  22612. + #endif    /*        lint */
  22613.   
  22614. + 
  22615.   #include "../h/mh.h"
  22616.   #include <ctype.h>
  22617.   #include <stdio.h>
  22618. ***************
  22619. *** 14,20 ****
  22620.       cp++;
  22621.       for (sp = cp + strlen (cp) - 1; sp >= cp; sp--)
  22622.       if (isspace (*sp))
  22623. !         *sp = NULL;
  22624.       else
  22625.           break;
  22626.       for (sp = cp; *sp; sp++)
  22627. --- 18,24 ----
  22628.       cp++;
  22629.       for (sp = cp + strlen (cp) - 1; sp >= cp; sp--)
  22630.       if (isspace (*sp))
  22631. !         *sp = 0;
  22632.       else
  22633.           break;
  22634.       for (sp = cp; *sp; sp++)
  22635. *** ../mh-6.7.2/sbr/uleq.c    Mon Apr  2 15:07:21 1990
  22636. --- sbr/uleq.c    Mon Dec 14 16:20:48 1992
  22637. ***************
  22638. *** 1,4 ****
  22639. --- 1,7 ----
  22640.   /* uleq.c - "unsigned" lexical compare */
  22641. + #ifndef    lint
  22642. + static char ident[] = "@(#)$Id: uleq.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  22643. + #endif    /* lint */
  22644.   
  22645.   #define TO_LOWER 040
  22646.   #define NO_MASK  000
  22647. ***************
  22648. *** 18,25 ****
  22649. --- 21,36 ----
  22650.   
  22651.       while (c = *c1++)
  22652.       {
  22653. + #ifdef LOCALE
  22654. +     c &= 0xff;
  22655. +     mask = *c2 & 0xff;
  22656. +     c = (isalpha(c) && isupper(c)) ? tolower(c) : c;
  22657. +     mask = (isalpha(mask) && isupper(mask)) ? tolower(mask) : mask;
  22658. +     if (c != mask)
  22659. + #else
  22660.       mask = (isalpha(c) && isalpha(*c2)) ?  TO_LOWER : NO_MASK;
  22661.       if ((c | mask) != (*c2 | mask))
  22662. + #endif
  22663.           return 0;
  22664.       else
  22665.           c2++;
  22666. *** ../mh-6.7.2/sbr/uprf.c    Mon Apr  2 15:07:24 1990
  22667. --- sbr/uprf.c    Mon Dec 14 16:20:48 1992
  22668. ***************
  22669. *** 1,4 ****
  22670. --- 1,7 ----
  22671.   /* uprf.c - "unsigned" lexical prefix  */
  22672. + #ifndef    lint
  22673. + static char ident[] = "@(#)$Id: uprf.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  22674. + #endif    /* lint */
  22675.   
  22676.   #define TO_LOWER 040
  22677.   #define NO_MASK  000
  22678. ***************
  22679. *** 16,23 ****
  22680. --- 19,34 ----
  22681.   
  22682.       while (c = *c2++)
  22683.       {
  22684. + #ifdef LOCALE
  22685. +     c &= 0xff;
  22686. +     mask = *c1 & 0xff;
  22687. +     c = (isalpha(c) && isupper(c)) ? tolower(c) : c;
  22688. +     mask = (isalpha(mask) && isupper(mask)) ? tolower(mask) : mask;
  22689. +     if (c != mask)
  22690. + #else
  22691.       mask = (isalpha(c) && isalpha(*c1)) ?  TO_LOWER : NO_MASK;
  22692.       if ((c | mask) != (*c1 | mask))
  22693. + #endif
  22694.           return 0;
  22695.       else
  22696.           c1++;
  22697. *** ../mh-6.7.2/sbr/vfgets.c    Thu Oct 29 15:00:53 1987
  22698. --- sbr/vfgets.c    Mon Dec 14 16:20:49 1992
  22699. ***************
  22700. *** 1,4 ****
  22701. --- 1,7 ----
  22702.   /* vfgets.c - virtual fgets */
  22703. + #ifndef       lint
  22704. + static char ident[] = "@(#)$Id: vfgets.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  22705. + #endif    /*        lint */
  22706.   
  22707.   #include "../h/mh.h"
  22708.   #include <stdio.h>
  22709. ***************
  22710. *** 52,58 ****
  22711.           if (toggle)
  22712.           goto wrong_guess;
  22713.           if (*++dp == '\n')
  22714. !         *--dp = NULL, cp = dp;
  22715.           else
  22716.           cp = ++dp;
  22717.       }
  22718. --- 55,61 ----
  22719.           if (toggle)
  22720.           goto wrong_guess;
  22721.           if (*++dp == '\n')
  22722. !         *--dp = 0, cp = dp;
  22723.           else
  22724.           cp = ++dp;
  22725.       }
  22726. *** ../mh-6.7.2/support/bboards/bbaka.c    Tue Mar 20 16:23:49 1990
  22727. --- support/bboards/bbaka.c    Mon Dec 14 16:20:50 1992
  22728. ***************
  22729. *** 1,4 ****
  22730. --- 1,7 ----
  22731.   /* bbaka.c - generate an alias list for BBoards */
  22732. + #ifndef    lint
  22733. + static char ident[] = "@(#)$Id: bbaka.c,v 2.4 1992/12/15 00:20:22 jromine Exp $";
  22734. + #endif    lint
  22735.   
  22736.   #include "../h/strings.h"
  22737.   #include "../zotnet/bboards.h"
  22738. ***************
  22739. *** 49,57 ****
  22740.       if (systemn) {
  22741.   #ifndef    MHMTS
  22742.       (void) sprintf (bbaddr, "%s@bboards", bb -> bb_name, LocalName ());
  22743. ! #else    MHMTS
  22744.       (void) strcpy (bbaddr, BBOARDS);
  22745. ! #endif    MHMTS
  22746.   
  22747.       if (strcmp (bb -> bb_name, bb -> bb_addr) == 0)
  22748.           aka (bb -> bb_name, bbaddr);
  22749. --- 52,60 ----
  22750.       if (systemn) {
  22751.   #ifndef    MHMTS
  22752.       (void) sprintf (bbaddr, "%s@bboards", bb -> bb_name, LocalName ());
  22753. ! #else    /* MHMTS */
  22754.       (void) strcpy (bbaddr, BBOARDS);
  22755. ! #endif    /* MHMTS */
  22756.   
  22757.       if (strcmp (bb -> bb_name, bb -> bb_addr) == 0)
  22758.           aka (bb -> bb_name, bbaddr);
  22759. ***************
  22760. *** 113,119 ****
  22761.   {
  22762.   #ifndef    MHMTS
  22763.       printf ("%s: %s\n", field, value);
  22764. ! #else    MHMTS
  22765.       printf ("%s%s %s\n", field, systemn ? ":" : ";", value);
  22766. ! #endif    MHMTS
  22767.   }
  22768. --- 116,122 ----
  22769.   {
  22770.   #ifndef    MHMTS
  22771.       printf ("%s: %s\n", field, value);
  22772. ! #else    /* MHMTS */
  22773.       printf ("%s%s %s\n", field, systemn ? ":" : ";", value);
  22774. ! #endif    /* MHMTS */
  22775.   }
  22776. *** ../mh-6.7.2/support/bboards/bbexp.c    Tue Mar 20 16:25:11 1990
  22777. --- support/bboards/bbexp.c    Mon Dec 14 16:20:50 1992
  22778. ***************
  22779. *** 1,4 ****
  22780. --- 1,7 ----
  22781.   /* bbexp.c - expunge the BBoards area */
  22782. + #ifndef    lint
  22783. + static char ident[] = "@(#)$Id: bbexp.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  22784. + #endif    /* lint */
  22785.   
  22786.   #include "../h/mh.h"
  22787.   #include "../h/dropsbr.h"
  22788. ***************
  22789. *** 21,27 ****
  22790. --- 24,34 ----
  22791.   int    pipeser ();
  22792.   
  22793.   
  22794. + #ifndef    __STDC__
  22795. + #ifdef    SYS5
  22796.   struct passwd *getpwnam ();
  22797. + #endif
  22798. + #endif
  22799.   
  22800.   /*   */
  22801.   
  22802. ***************
  22803. *** 137,143 ****
  22804.       fprintf (pf, "packf all -file %s\n", tmpfil);
  22805.   #ifdef    notdef            /* want real EOF to end it */
  22806.       fprintf (pf, "quit\n");
  22807. ! #endif    notdef
  22808.       if (td = pclose (pf))
  22809.       advise (NULLCP, "msh returns %d", td);
  22810.       (void) signal (SIGPIPE, SIG_DFL);
  22811. --- 144,150 ----
  22812.       fprintf (pf, "packf all -file %s\n", tmpfil);
  22813.   #ifdef    notdef            /* want real EOF to end it */
  22814.       fprintf (pf, "quit\n");
  22815. ! #endif    /* notdef */
  22816.       if (td = pclose (pf))
  22817.       advise (NULLCP, "msh returns %d", td);
  22818.       (void) signal (SIGPIPE, SIG_DFL);
  22819. ***************
  22820. *** 225,231 ****
  22821.   {
  22822.   #ifndef    BSD42
  22823.       (void) signal (SIGPIPE, pipeser);
  22824. ! #endif    not BSD42
  22825.   
  22826.       if (!broken_pipe++)
  22827.       advise (NULLCP, "broken pipe");
  22828. --- 232,238 ----
  22829.   {
  22830.   #ifndef    BSD42
  22831.       (void) signal (SIGPIPE, pipeser);
  22832. ! #endif    /* not BSD42 */
  22833.   
  22834.       if (!broken_pipe++)
  22835.       advise (NULLCP, "broken pipe");
  22836. *** ../mh-6.7.2/support/bboards/bbtar.c    Tue Mar 20 16:25:36 1990
  22837. --- support/bboards/bbtar.c    Mon Dec 14 16:20:51 1992
  22838. ***************
  22839. *** 1,4 ****
  22840. --- 1,7 ----
  22841.   /* bbtar.c - generate the names of archive files to be put to tape */
  22842. + #ifndef    lint
  22843. + static char ident[] = "@(#)$Id: bbtar.c,v 1.6 1992/12/15 00:20:22 jromine Exp $";
  22844. + #endif    /* lint */
  22845.   
  22846.   /* Usage:
  22847.   
  22848. ***************
  22849. *** 27,33 ****
  22850. --- 30,40 ----
  22851.   
  22852.   static    process();
  22853.   
  22854. + #ifndef    __STDC__
  22855. + #ifdef    SYS5
  22856.   struct passwd  *getpwnam ();
  22857. + #endif
  22858. + #endif
  22859.   
  22860.   /*   */
  22861.   
  22862. *** /dev/null    Tue Dec 15 08:01:10 1992
  22863. --- support/general/bootmhn.findit    Mon Nov  2 13:59:33 1992
  22864. ***************
  22865. *** 0 ****
  22866. --- 1,26 ----
  22867. + : run this script through /bin/sh
  22868. + : '$Id: bootmhn.findit,v 1.2 1992/11/02 21:58:59 jromine Exp $'
  22869. + 
  22870. + if [ -z "$1" -o -z "$2" ]; then
  22871. +     echo "usage: bootmhn.findit program library" 1>&2
  22872. +     exit 1
  22873. + fi
  22874. + 
  22875. + PGM= DIR= oIFS="$IFS" IFS=":"
  22876. + for A in $PATH $2 /usr/demo/SOUND; do
  22877. +     if [ "$A" = "." ]; then
  22878. +     continue
  22879. +     fi
  22880. +     if [ -f "$A/$1" ]; then
  22881. +     if [ "$A" = "/usr/local/bin" ]; then
  22882. +         PGM="$1" DIR=""
  22883. +     else
  22884. +         PGM="$A/$1" DIR="$A/"
  22885. +     fi
  22886. + 
  22887. +     echo "$PGM"
  22888. +     exit 0
  22889. +     fi
  22890. + done
  22891. + IFS="$oIFS"
  22892. + 
  22893. *** /dev/null    Tue Dec 15 08:01:10 1992
  22894. --- support/general/bootmhn.sh    Mon Nov 16 14:32:51 1992
  22895. ***************
  22896. *** 0 ****
  22897. --- 1,150 ----
  22898. + : run this script through /bin/sh
  22899. + : '$Id'
  22900. + 
  22901. + if [ -z "$1" ]; then
  22902. +     echo "usage: bootmhn.sh MH-library-area" 1>&2
  22903. +     exit 1
  22904. + fi
  22905. + LIB="$1"
  22906. + MHN="$LIB/mhn_defaults"
  22907. + 
  22908. + if [ -s $MHN ]; then
  22909. +     echo "%s: already exists." 1>&2
  22910. +     exit 1
  22911. + fi
  22912. + TMP=/tmp/mhn$$
  22913. + trap "rm -f $TMP" 0 1 2 3 13 15
  22914. + 
  22915. + echo "mhn-store-text: %m%P.txt" >> $TMP
  22916. + echo "mhn-store-application/PostScript: %m%P.ps" >> $TMP
  22917. + 
  22918. + PGM="`./bootmhn.findit xwud $LIB`"
  22919. + if [ ! -z "$PGM" ]; then
  22920. +     XWUD="$PGM" X11DIR="`echo $PGM | awk -F/ '{ for(i=2;i<NF;i++)printf "/%s", $i;}'`"/
  22921. + else
  22922. +     XWUD= X11DIR=
  22923. + fi
  22924. + 
  22925. + PGM="`./bootmhn.findit pbmtoxwd $LIB`"
  22926. + if [ ! -z "$PGM" ]; then
  22927. +     PBM="$PGM" PBMDIR="`echo $PGM | awk -F/ '{ for(i=2;i<NF;i++)printf "/%s", $i;}'`"/
  22928. + else
  22929. +     PBM= PBMDIR=
  22930. + fi
  22931. + 
  22932. + PGM="`./bootmhn.findit xv $LIB`"
  22933. + if [ ! -z "$PGM" ]; then
  22934. +     echo "\
  22935. + mhn-show-image: %p$PGM -geometry =-0+0 '%f'" >> $TMP
  22936. + elif [ ! -z $"PBM" -a ! -z "$XWUD" ]; then
  22937. +     echo "\
  22938. + mhn-show-image/gif: %p${PBMDIR}giftoppm | ${PBMDIR}ppmtopgm | ${PBMDIR}pgmtopbm | ${PBMDIR}pbmtoxwd | $XWUD -geometry =-0+0
  22939. + mhn-show-image/x-pbm: %p${PBMDIR}pbmtoxwd | $XWUD -geometry =-0+0
  22940. + mhn-show-image/x-pgm: %p${PBMDIR}pgmtopbm | ${PBMDIR}pbmtoxwd | $XWUD -geometry =-0+0
  22941. + mhn-show-image/x-ppm: %p${PBMDIR}ppmtopgm | ${PBMDIR}pgmtopbm | ${PBMDIR}pbmtoxwd | $XWUD -geometry =-0+0
  22942. + mhn-show-image/x-xwd: %p$XWUD -geometry =-0+0" >> $TMP
  22943. + 
  22944. +     PGM="`./bootmhn.findit djpeg $LIB`"
  22945. +     if [ ! -z "$PGM" ]; then
  22946. +     echo "\
  22947. + mhn-show-image/jpeg: %p$PGM -Pg | ${PBMDIR}ppmtopgm | ${PBMDIR}pgmtopbm | ${PBMDIR}pbmtoxwd | $XWUD -geometry =-0+0" >> $TMP
  22948. +     fi
  22949. + fi
  22950. + 
  22951. + if [ -f "/dev/audioIU" ]; then
  22952. +     PGM="`./bootmhn.findit recorder $LIB`"
  22953. +     if [ ! -z "$PGM" ]; then
  22954. +     echo "\
  22955. + mhn-store-audio/basic: %m%P.au
  22956. + mhn-compose-audio/basic: ${AUDIODIR}recorder '%f' -au -pause > /dev/tty
  22957. + mhn-show-audio/basic: %p${AUDIODIR}splayer -au" >> $TMP
  22958. +     fi
  22959. + elif [ -f "/dev/audio" ]; then
  22960. +     PGM="`./bootmhn.findit raw2audio $LIB`"
  22961. +     if [ ! -z "$PGM" ]; then
  22962. +     AUDIODIR="`echo $PGM | awk -F/ '{ for(i=2;i<NF;i++)printf "/%s", $i;}'`"/
  22963. +     echo "\
  22964. + mhn-store-audio/basic: | ${AUDIODIR}raw2audio -e ulaw -s 8000 -c 1 > %m%P.au
  22965. + mhn-store-audio/x-next: %m%P.au" >> $TMP
  22966. +     echo "\
  22967. + mhn-compose-audio/basic: ${AUDIODIR}record | ${AUDIODIR}raw2audio -F
  22968. + mhn-show-audio/basic: %p${AUDIODIR}raw2audio 2>/dev/null | play" >> $TMP
  22969. + 
  22970. +     PGM="`./bootmhn.findit adpcm_enc $LIB`"
  22971. +     if [ ! -z "$PGM" ]; then
  22972. +         DIR="`echo $PGM | awk -F/ '{ for(i=2;i<NF;i++)printf "/%s", $i;}'`"/
  22973. +         echo "\
  22974. + mhn-compose-audio/x-next: ${AUDIODIR}record | ${DIR}adpcm_enc
  22975. + mhn-show-audio/x-next: %p${DIR}adpcm_dec | ${AUDIODIR}play" >> $TMP
  22976. +     else
  22977. +         echo "\
  22978. + mhn-compose-audio/x-next: ${AUDIODIR}record
  22979. + mhn-show-audio/x-next: %p${AUDIODIR}play" >> $TMP
  22980. +     fi
  22981. +     else
  22982. +     echo "\
  22983. + mhn-compose-audio/basic: cat < /dev/audio
  22984. + mhn-show-audio/basic: %pcat > /dev/audio" >> $TMP
  22985. +     fi
  22986. + fi
  22987. + 
  22988. + PGM="`./bootmhn.findit lpr $LIB`"
  22989. + if [ ! -z "$PGM" ]; then
  22990. +     echo "\
  22991. + mhn-show-application/PostScript: %plpr -Pps" >> $TMP    
  22992. + else
  22993. +     PGM="`./bootmhn.findit lp $LIB`"
  22994. +     if [ ! -z "$PGM" ]; then    
  22995. +     echo "\
  22996. + mhn-show-application/PostScript: %plp -dps" >> $TMP    
  22997. +     fi
  22998. + fi
  22999. + 
  23000. + PGM="`./bootmhn.findit ivs_replay $LIB`"
  23001. + if [ ! -z "$PGM" ]; then
  23002. +     echo "\
  23003. + mhn-show-application/x-ivs: %p$PGM -o '%F'" >> $TMP
  23004. + fi
  23005. + 
  23006. + PGM="`./bootmhn.findit richtext $LIB`"
  23007. + if [ ! -z "$PGM" ]; then
  23008. +     echo "\
  23009. + mhn-show-text/richtext: %p$PGM -p '%F'" >> $TMP
  23010. + else
  23011. +     PGM="`./bootmhn.findit rt2raw $LIB`"
  23012. +     if [ ! -z "$PGM" ]; then
  23013. +     echo "\
  23014. + mhn-show-text/richtext: %p$PGM < '%f' | fmt -78 | more" >> $TMP
  23015. +     fi
  23016. + fi
  23017. + 
  23018. + PGM="`./bootmhn.findit xterm $LIB`"
  23019. + if [ ! -z "$PGM" ]; then
  23020. +     echo "\
  23021. + mhn-charset-iso-8859-1: xterm -fn '-*-*-medium-r-normal-*-*-120-*-*-c-*-iso8859-*' -e %s" >> $TMP
  23022. + fi
  23023. + 
  23024. + sort < $TMP > $MHN
  23025. + chmod 644 $MHN
  23026. + 
  23027. + exit 0
  23028. + 
  23029. + : not until we get a "safe" postscript environment...
  23030. + 
  23031. + PGM="`./bootmhn.findit pageview $LIB`"
  23032. + if [ "$DISPLAY" = "unix:0.0" -a ! -z "$PGM" ]; then
  23033. +     echo "mhn-show-application/PostScript: %p$PGM -" >> $TMP    
  23034. + else
  23035. +     PGM="`./bootmhn.findit gs $LIB`"
  23036. +     if [ ! -z "$PGM" ]; then
  23037. +     echo "mhn-show-application/PostScript: %p$PGM -- '%F'" >> $TMP
  23038. +     fi
  23039. + fi
  23040. + 
  23041. + : have to experiment more with this
  23042. + 
  23043. + PGM="`./bootmhn.findit ivs_record $LIB`"
  23044. + if [ ! -z "$PGM" ]; then
  23045. +     echo "\
  23046. + mhn-compose-application/x-ivs: $PGM -u localhost '%F'" >> $TMP
  23047. + fi
  23048. *** /dev/null    Tue Dec 15 08:01:10 1992
  23049. --- support/general/mhl.headers    Tue Oct 20 15:48:44 1992
  23050. ***************
  23051. *** 0 ****
  23052. --- 1,12 ----
  23053. + overflowtext="***",overflowoffset=5
  23054. + leftadjust,compwidth=9
  23055. + ignores=msgid,message-id,received,content-type,content-transfer-encoding,content-ID
  23056. + Date:formatfield="%<(nodate{text})%{text}%|%(pretty{text})%>"
  23057. + To:
  23058. + cc:
  23059. + :
  23060. + From:
  23061. + Subject:
  23062. + :
  23063. + extras:nocomponent
  23064. + :
  23065. *** /dev/null    Tue Dec 15 08:01:10 1992
  23066. --- support/general/packmbox.sh    Fri Feb 14 09:05:43 1992
  23067. ***************
  23068. *** 0 ****
  23069. --- 1,40 ----
  23070. + #! /bin/sh
  23071. + # packmbox - pack an MH folder back into a UUCP-style mbox
  23072. + # @(#)$Id: packmbox.sh,v 1.16 1992/02/14 17:05:31 jromine Exp $
  23073. + #
  23074. + # Defaults:
  23075. + #    `+folder'    defaults to current folder
  23076. + #    `msgs'     defaults to all
  23077. + #
  23078. + # Context:
  23079. + #    Current-Folder
  23080. + #
  23081. + # for simplicity (and speed) we don't parse command-line args (much)
  23082. + case $#/$1 in
  23083. +    1/-h*) echo "syntax: packmbox [+folder] [msgs] [-help]" 1>&2; exit 0;;
  23084. + esac
  23085. + 
  23086. + format="%(msg) From \
  23087. + %<{return-path}%(putstr)%|\
  23088. + %<(nonnull(mbox{from}))%(putstr)%|nobody%>@\
  23089. + %<(nonnull(host{from}))%(putstr)%|nowhere%>%> \
  23090. + %(day{date}) %(month{date}) %2(mday{date}) \
  23091. + %02(hour{date}):%02(min{date}):%02(sec{date}) \
  23092. + %(void(year{date}))%<(gt 100)%4(putnum)%|19%02(putnum)%>"
  23093. + 
  23094. + trap 'rm -f /tmp/packm$$; exit 1' 1 2 3 15
  23095. + 
  23096. + scan -noclear -noheader -noreverse -width 256 \
  23097. +             -format "${format}" $* >/tmp/packm$$
  23098. + # tricky -- you must do this "cd" after scan has updated the context
  23099. + cd `mhpath`
  23100. + 
  23101. + exec </tmp/packm$$
  23102. + rm -f /tmp/packm$$
  23103. + while read m f
  23104. + do
  23105. +     echo "$f"
  23106. +     sed -e '/^From /s/^/>/' < $m
  23107. +     echo ""
  23108. + done
  23109. + exit
  23110. *** ../mh-6.7.2/support/general/replcomps    Thu Apr  5 16:05:55 1990
  23111. --- support/general/replcomps    Sun Feb  9 14:03:19 1992
  23112. ***************
  23113. *** 1,2 ****
  23114. ! %(lit)%(formataddr %<{reply-to}%|%<{from}%|%<{sender}%|%<{return-path}%>%>%>%>)\
  23115.   %<(nonnull)%(void(width))%(putaddr To: )\n%>\
  23116. --- 1,2 ----
  23117. ! %(lit)%(formataddr %<{reply-to}%?{from}%?{sender}%?{return-path}%>)\
  23118.   %<(nonnull)%(void(width))%(putaddr To: )\n%>\
  23119. *** /dev/null    Tue Dec 15 08:01:10 1992
  23120. --- support/general/scan.default    Mon Feb 10 21:11:21 1992
  23121. ***************
  23122. *** 0 ****
  23123. --- 1,7 ----
  23124. + %; NOTE: This file is supplied for reference only; it shows the default
  23125. + %;    format string (for non-UK sites) which was compiled into "scan".
  23126. + %;    See the source file "h/scansbr.h" for details.
  23127. + %4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  23128. + %02(mon{date})/%02(mday{date})%<{date} %|*%>\
  23129. + %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  23130. + %{subject}%<{body}<<%{body}>>%>
  23131. *** ../mh-6.7.2/support/general/scan.mailx    Mon Dec 10 11:55:18 1990
  23132. --- support/general/scan.mailx    Mon Oct 26 08:44:55 1992
  23133. ***************
  23134. *** 2,6 ****
  23135.   %<{status} %|N%>\
  23136. ! %<{replied}R%|%<{encrypted}E%| %>%>\
  23137.   %4(msg)\
  23138. !  %<(mymbox{from})To: %13(friendly{to})%|%17(friendly{from})%>\
  23139.    %3(day{date}) %3(month{date}) %02(mday{date})\
  23140. --- 2,6 ----
  23141.   %<{status} %|N%>\
  23142. ! %<{replied}R%?{encrypted}E%| %>\
  23143.   %4(msg)\
  23144. !  %<(mymbox{from})%<{to}To: %13(friendly{to})%>%>%<(zero)%17(friendly{from})%>\
  23145.    %3(day{date}) %3(month{date}) %02(mday{date})\
  23146. *** ../mh-6.7.2/support/general/scan.size    Mon Dec 10 11:55:18 1990
  23147. --- support/general/scan.size    Mon Oct 26 08:44:57 1992
  23148. ***************
  23149. *** 1,2 ****
  23150. ! %4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%| %>%>\
  23151.   %02(mon{date})/%02(mday{date})%<{date} %|*%>\
  23152. --- 1,2 ----
  23153. ! %4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  23154.   %02(mon{date})/%02(mday{date})%<{date} %|*%>\
  23155. ***************
  23156. *** 3,5 ****
  23157.   %5(size) \
  23158. ! %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  23159.   %{subject}%<{body}<<%{body}%>
  23160. --- 3,5 ----
  23161.   %5(size) \
  23162. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  23163.   %{subject}%<{body}<<%{body}%>
  23164. *** ../mh-6.7.2/support/general/scan.time    Mon Dec 10 11:55:18 1990
  23165. --- support/general/scan.time    Mon Oct 26 08:44:56 1992
  23166. ***************
  23167. *** 1,2 ****
  23168. ! %4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%| %>%>\
  23169.   %02(mon{date})/%02(mday{date}) \
  23170. --- 1,2 ----
  23171. ! %4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  23172.   %02(mon{date})/%02(mday{date}) \
  23173. ***************
  23174. *** 4,6 ****
  23175.   %<{date} %|*%>\
  23176. ! %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  23177.   %{subject}%<{body}<<%{body}%>
  23178. --- 4,6 ----
  23179.   %<{date} %|*%>\
  23180. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  23181.   %{subject}%<{body}<<%{body}%>
  23182. *** ../mh-6.7.2/support/general/scan.timely    Mon Dec 10 11:55:18 1990
  23183. --- support/general/scan.timely    Mon Oct 26 08:44:58 1992
  23184. ***************
  23185. *** 1,9 ****
  23186. ! %4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%| %>%>\
  23187.   %(void(rclock{date}))\
  23188. ! %<(gt 15768000)%03(month{date})%02(year{date})%|\
  23189. ! %<(gt 604800)%02(mday{date})%03(month{date})%|\
  23190. ! %<(gt 86400) %(day{date}) %|\
  23191. ! %02(hour{date}):%02(min{date})%>%>%>\
  23192.   %<{date} %|*%>\
  23193. ! %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  23194.   %{subject}%<{body}<<%{body}%>
  23195. --- 1,9 ----
  23196. ! %4(msg)%<(cur)+%| %>%<{replied}-%?{encrypted}E%| %>\
  23197.   %(void(rclock{date}))\
  23198. ! %<(gt 15768000)%03(month{date})%(void(year{date}))%02(modulo 100)\
  23199. ! %?(gt 604800)%02(mday{date})%03(month{date})\
  23200. ! %?(gt 86400) %(day{date}) %|\
  23201. ! %02(hour{date}):%02(min{date})%>\
  23202.   %<{date} %|*%>\
  23203. ! %<(mymbox{from})%<{to}To:%14(friendly{to})%>%>%<(zero)%17(friendly{from})%>  \
  23204.   %{subject}%<{body}<<%{body}%>
  23205. *** /dev/null    Tue Dec 15 08:01:10 1992
  23206. --- support/general/viamail.sh    Fri Oct 16 10:15:06 1992
  23207. ***************
  23208. *** 0 ****
  23209. --- 1,34 ----
  23210. + : run this script through /bin/sh
  23211. + : '@(#)$Id: viamail.sh,v 1.2 1992/10/16 17:15:00 jromine Exp $'
  23212. + 
  23213. + DELAY=0 FROM=
  23214. + case "$1" in
  23215. +     -*)    DELAY="`echo $1 | sed -e 's%-%%'`"
  23216. +     shift
  23217. +     ;;
  23218. + esac
  23219. + if [ ! -z "$PERSON" ]; then
  23220. +     FROM="-viafrom $PERSON"
  23221. + fi
  23222. + 
  23223. + if [ $# -lt 3 ]; then
  23224. +     echo 'usage: viamail: "mailpath" "subject-string" directory-or-file ...' 1>&2
  23225. +     exit 1;
  23226. + fi
  23227. + 
  23228. + mailpath="$1"
  23229. + echo "mailpath = $mailpath" 1>&2
  23230. + shift
  23231. + 
  23232. + subject="$1"
  23233. + echo "subject-string = $subject" 1>&2
  23234. + shift
  23235. + 
  23236. + echo "files = $*" 1>&2
  23237. + 
  23238. + tar cvf - $* | compress | \
  23239. +     mhn -viamail "$mailpath" -viasubj "$subject" \
  23240. +     -viaparm "type=tar; conversions=x-compress" \
  23241. +     -viacmnt "extract with uncompress | tar xvpf -" \
  23242. +     -viadelay "$DELAY" \
  23243. +     -verbose $FROM
  23244. *** /dev/null    Tue Dec 15 08:01:10 1992
  23245. --- support/pop/pop-more.txt    Mon Oct 26 08:46:41 1992
  23246. ***************
  23247. *** 0 ****
  23248. --- 1,590 ----
  23249. + 
  23250. + 
  23251. + 
  23252. + 
  23253. +           draft       POP Version 3: More Service Offerings       Apr 92
  23254. + 
  23255. + 
  23256. +                          Post Office Protocol: Version 3
  23257. +                               More Service Offerings
  23258. + 
  23259. +                              Fri Apr 17 21:03:20 1992
  23260. + 
  23261. + 
  23262. +                                  Marshall T. Rose
  23263. +                            Dover Beach Consulting, Inc.
  23264. +                               mrose@dbc.mtview.ca.us
  23265. + 
  23266. + 
  23267. + 
  23268. + 
  23269. + 
  23270. + 
  23271. +           1.  Status of this Memo
  23272. + 
  23273. +           This memo provides information for the Internet community.  It
  23274. +           does not specify any standard.  Distribution of this memo is
  23275. +           unlimited.  Please send comments to the author.
  23276. + 
  23277. + 
  23278. +           2.  Abstract
  23279. + 
  23280. +           This memo suggests some modest enhancements to version 3 of
  23281. +           the Post Office Protocol (RFC 1081).  All of these extensions
  23282. +           are optional.  In particular, administrators should examine
  23283. +           their environment to see if any of these enhancements are
  23284. +           useful.
  23285. + 
  23286. + 
  23287. + 
  23288. + 
  23289. + 
  23290. + 
  23291. + 
  23292. + 
  23293. + 
  23294. + 
  23295. + 
  23296. + 
  23297. + 
  23298. + 
  23299. + 
  23300. + 
  23301. + 
  23302. + 
  23303. + 
  23304. + 
  23305. + 
  23306. +           M. Rose                                               [Page 1]
  23307. + 
  23308. + 
  23309. + 
  23310. + 
  23311. + 
  23312. +           draft       POP Version 3: More Service Offerings       Apr 92
  23313. + 
  23314. + 
  23315. +           3.  Historical Overview
  23316. + 
  23317. +           The Post Office Protocol (POP) was developed to provide a
  23318. +           simple mechanism for workstations to download their mailboxes
  23319. +           from workgroup and departmental servers.  Typically, the
  23320. +           workstations and servers are interconnected via a LAN or
  23321. +           perhaps an internet-mesh with reasonable throughput and
  23322. +           latency.
  23323. + 
  23324. +           As use of the Internet suite of protocols has grown, different
  23325. +           kind of environments are beginning to use the POP.  This memo
  23326. +           suggests optional enhancements to the POP to allow it to
  23327. +           function better in these environments.
  23328. + 
  23329. + 
  23330. + 
  23331. + 
  23332. + 
  23333. + 
  23334. + 
  23335. + 
  23336. + 
  23337. + 
  23338. + 
  23339. + 
  23340. + 
  23341. + 
  23342. + 
  23343. + 
  23344. + 
  23345. + 
  23346. + 
  23347. + 
  23348. + 
  23349. + 
  23350. + 
  23351. + 
  23352. + 
  23353. + 
  23354. + 
  23355. + 
  23356. + 
  23357. + 
  23358. + 
  23359. + 
  23360. + 
  23361. + 
  23362. + 
  23363. + 
  23364. + 
  23365. +           M. Rose                                               [Page 2]
  23366. + 
  23367. + 
  23368. + 
  23369. + 
  23370. + 
  23371. +           draft       POP Version 3: More Service Offerings       Apr 92
  23372. + 
  23373. + 
  23374. +           4.  The APOP command
  23375. + 
  23376. +           Each POP session starts with a USER/PASS exchange.  This
  23377. +           results in a POP-subscriber password being sent in the clear
  23378. +           on the network.  For intermittent use of POP, this may not
  23379. +           introduce a sizable risk.  However, many POP client
  23380. +           implementations connect to the POP server on a regular
  23381. +           basis -- to check for new mail.  Further the interval of
  23382. +           session initiation may be on the order of five minutes.
  23383. +           Hence, the risk of password capture is greatly enhanced.
  23384. + 
  23385. +           A new method of authentication is required which provides for
  23386. +           both origin authentication and replay protection, but which
  23387. +           does not involve sending a password in the clear over the
  23388. +           network.  This memo introduces a new command, APOP, to provide
  23389. +           this functionality.
  23390. + 
  23391. +           A POP server which implements the APOP command will include a
  23392. +           timestamp in its banner greeting.  The syntax of the timestamp
  23393. +           corresponds to the `msg-id' in RFC 822, and MUST be different
  23394. +           each time the POP server issues a banner greeting.  For
  23395. +           example, on a UNIX implementation in which a separate UNIX
  23396. +           process is used for each instance of a POP server, the syntax
  23397. +           of the timestamp might be:
  23398. + 
  23399. +                <process-ID.clock@hostname>
  23400. + 
  23401. +           where `process-ID' is the decimal value of the process's PID,
  23402. +           clock is the decimal value of the system clock, and hostname
  23403. +           is the fully-qualified domain-name corresponding to the host
  23404. +           where the POP server is running.
  23405. + 
  23406. +           The POP client makes note of this timestamp, and then issues
  23407. +           the APOP command.  The syntax of this command is:
  23408. + 
  23409. +                APOP name digest
  23410. + 
  23411. +           The `name' parameter is a locally-significant string which
  23412. +           identifies a particular POP-subscriber.  The `digest'
  23413. +           parameter is calculated by applying the MD5 algorithm[1] to a
  23414. +           string consisting of the timestamp (including angle-brackets)
  23415. +           followed by a shared secret.  This shared secret is a string
  23416. +           known only to the POP client and POP server.  Great care
  23417. +           should be taken to prevent unauthorized disclosure of the
  23418. +           secret, as knowledge of the secret will allow any entity to
  23419. + 
  23420. + 
  23421. + 
  23422. + 
  23423. + 
  23424. +           M. Rose                                               [Page 3]
  23425. + 
  23426. + 
  23427. + 
  23428. + 
  23429. + 
  23430. +           draft       POP Version 3: More Service Offerings       Apr 92
  23431. + 
  23432. + 
  23433. +           successfully masquerade as the named POP-subscriber.  The
  23434. +           `digest' parameter itself is a 16-octet value which is sent in
  23435. +           hexadecimal format.
  23436. + 
  23437. +           When the POP server receives the APOP command, it verifies the
  23438. +           digest provided.  If the digest is correct, the POP server
  23439. +           issues a positive response, and the POP session enters the
  23440. +           TRANSACTION state.  Otherwise, a negative response is issued
  23441. +           and the POP session remains in the AUTHORIZATION state.
  23442. + 
  23443. +           4.1.  Usage Example
  23444. + 
  23445. +                S: +OK POP server ready <1896.697170952@dbc.mtview.ca.us>
  23446. +                C: USER mrose
  23447. +                S: +OK password required for mrose
  23448. +                C: APOP c4c9334bac560ecc979e58001b3e22fb
  23449. +                S: +OK maildrop has 1 message (369 octets)
  23450. + 
  23451. +           In this example, the shared secret is the string `tanstaaf'.
  23452. +           Hence, the MD5 algorithm is applied to the string
  23453. + 
  23454. +                <1896.697170952@dbc.mtview.ca.us>tanstaaf
  23455. + 
  23456. +           which produces a digest value of
  23457. + 
  23458. +                c4c9334bac560ecc979e58001b3e22fb
  23459. + 
  23460. + 
  23461. + 
  23462. + 
  23463. + 
  23464. + 
  23465. + 
  23466. + 
  23467. + 
  23468. + 
  23469. + 
  23470. + 
  23471. + 
  23472. + 
  23473. + 
  23474. + 
  23475. + 
  23476. + 
  23477. + 
  23478. + 
  23479. + 
  23480. + 
  23481. + 
  23482. + 
  23483. +           M. Rose                                               [Page 4]
  23484. + 
  23485. + 
  23486. + 
  23487. + 
  23488. + 
  23489. +           draft       POP Version 3: More Service Offerings       Apr 92
  23490. + 
  23491. + 
  23492. +           5.  The XTND SCAN command
  23493. + 
  23494. +           The current POP model works best when network latency and
  23495. +           throughput is on the order provided by most LANs.  However,
  23496. +           when POP is used over low-speed connections (e.g., 2400 baud
  23497. +           dialup lines), the POP does not work well.
  23498. + 
  23499. +           Historically, the POP model has been to make only minimal
  23500. +           requirements on the POP server.  In order to more effectively
  23501. +           operate over low-speed connections, this model must be
  23502. +           modified somewhat.  Implementation experience shows that the
  23503. +           largest improvement can be achieved by making one shift:
  23504. +           having the POP server generate a scan listing for the POP
  23505. +           client.  This memo introduces a new command, XTND SCAN, to
  23506. +           provide this functionality.
  23507. + 
  23508. +           A POP client issues the XTND SCAN command during the
  23509. +           TRANSACTION state.  The syntax of this command is:
  23510. + 
  23511. +                XTND SCAN width [format]
  23512. + 
  23513. +           The `width' parameter is the maximum length for a scan
  23514. +           listing.  The optional `format' parameter is a quoted-string
  23515. +           with the semantics of an mh-format(5) string[2].  If the
  23516. +           `format' parameter is not given, the POP server uses a
  23517. +           locally-defined default value.  Note that the resulting format
  23518. +           string must not contain CR or LF.
  23519. + 
  23520. +           The `format' parameter is the only token in the POP which must
  23521. +           be enclosed in double-quotation marks.  Within the string, two
  23522. +           special sequences are recognized:
  23523. + 
  23524. +                \"  - double-quote
  23525. +                \\ - single-\
  23526. + 
  23527. +           Otherwise, each character is used verbatim.  Note that this
  23528. +           string can be quite long (on the order of 400 characters).
  23529. + 
  23530. +           When the POP server receives the XTND SCAN command and if it
  23531. +           implements it, it issues a positive response.  Otherwise a
  23532. +           negative response is issued.  Thereafter, whenever the POP
  23533. +           client issues a LIST command, the syntax of the resulting
  23534. +           `scan listing' is of the form:
  23535. + 
  23536. +                msgno size #string
  23537. + 
  23538. + 
  23539. + 
  23540. + 
  23541. + 
  23542. +           M. Rose                                               [Page 5]
  23543. + 
  23544. + 
  23545. + 
  23546. + 
  23547. + 
  23548. +           draft       POP Version 3: More Service Offerings       Apr 92
  23549. + 
  23550. + 
  23551. +           As with the standard POP, the `msgno' field gives the message
  23552. +           number and the `size' field gives the size of the message in
  23553. +           octets.  The `string' parameter, which immediately follows the
  23554. +           `#' character is the string calculated when the formatting
  23555. +           string is applied to the message.  Note that the `string' may
  23556. +           not be multiline.
  23557. + 
  23558. +           5.1.  Usage Example
  23559. + 
  23560. +                S: XTND SCAN 80 "%4(msg)%<(cur)+%| %>%<{replied}-%|...
  23561. +                C: +OK SCAN
  23562. +                S: LIST 1
  23563. +                C: +OK 1 369 #   1  02/03 17:49PST To:mrose           test<<
  23564. + 
  23565. + 
  23566. + 
  23567. + 
  23568. + 
  23569. + 
  23570. + 
  23571. + 
  23572. + 
  23573. + 
  23574. + 
  23575. + 
  23576. + 
  23577. + 
  23578. + 
  23579. + 
  23580. + 
  23581. + 
  23582. + 
  23583. + 
  23584. + 
  23585. + 
  23586. + 
  23587. + 
  23588. + 
  23589. + 
  23590. + 
  23591. + 
  23592. + 
  23593. + 
  23594. + 
  23595. + 
  23596. + 
  23597. + 
  23598. + 
  23599. + 
  23600. + 
  23601. +           M. Rose                                               [Page 6]
  23602. + 
  23603. + 
  23604. + 
  23605. + 
  23606. + 
  23607. +           draft       POP Version 3: More Service Offerings       Apr 92
  23608. + 
  23609. + 
  23610. +           6.  Implementations
  23611. + 
  23612. +           MH 6.7.4 implements the POP extensions described in this memo.
  23613. +           Contact Bug-MH@ics.uci.edu for information on how to get MH.
  23614. + 
  23615. + 
  23616. + 
  23617. + 
  23618. + 
  23619. + 
  23620. + 
  23621. + 
  23622. + 
  23623. + 
  23624. + 
  23625. + 
  23626. + 
  23627. + 
  23628. + 
  23629. + 
  23630. + 
  23631. + 
  23632. + 
  23633. + 
  23634. + 
  23635. + 
  23636. + 
  23637. + 
  23638. + 
  23639. + 
  23640. + 
  23641. + 
  23642. + 
  23643. + 
  23644. + 
  23645. + 
  23646. + 
  23647. + 
  23648. + 
  23649. + 
  23650. + 
  23651. + 
  23652. + 
  23653. + 
  23654. + 
  23655. + 
  23656. + 
  23657. + 
  23658. + 
  23659. + 
  23660. +           M. Rose                                               [Page 7]
  23661. + 
  23662. + 
  23663. + 
  23664. + 
  23665. + 
  23666. +           draft       POP Version 3: More Service Offerings       Apr 92
  23667. + 
  23668. + 
  23669. +           7.  Acknowledgements
  23670. + 
  23671. +           The author gratefully acknowledges the comments of Alfred
  23672. +           Grimstad and Neil Ostroff of Bellcore, and Keith McCloghrie of
  23673. +           Hughes LAN Systems.
  23674. + 
  23675. + 
  23676. + 
  23677. + 
  23678. + 
  23679. + 
  23680. + 
  23681. + 
  23682. + 
  23683. + 
  23684. + 
  23685. + 
  23686. + 
  23687. + 
  23688. + 
  23689. + 
  23690. + 
  23691. + 
  23692. + 
  23693. + 
  23694. + 
  23695. + 
  23696. + 
  23697. + 
  23698. + 
  23699. + 
  23700. + 
  23701. + 
  23702. + 
  23703. + 
  23704. + 
  23705. + 
  23706. + 
  23707. + 
  23708. + 
  23709. + 
  23710. + 
  23711. + 
  23712. + 
  23713. + 
  23714. + 
  23715. + 
  23716. + 
  23717. + 
  23718. + 
  23719. +           M. Rose                                               [Page 8]
  23720. + 
  23721. + 
  23722. + 
  23723. + 
  23724. + 
  23725. +           draft       POP Version 3: More Service Offerings       Apr 92
  23726. + 
  23727. + 
  23728. +           8.  References
  23729. + 
  23730. +           [1]  R.L. Rivest, The MD5 Message-Digest Algorithm.  Request
  23731. +                for Comments 1321, (April, 1992).
  23732. + 
  23733. +           [2]  M.T. Rose, J.L. Romine, The Rand MH Message Handling
  23734. +                System: User's Manual, November, 1985.
  23735. + 
  23736. + 
  23737. + 
  23738. + 
  23739. + 
  23740. + 
  23741. + 
  23742. + 
  23743. + 
  23744. + 
  23745. + 
  23746. + 
  23747. + 
  23748. + 
  23749. + 
  23750. + 
  23751. + 
  23752. + 
  23753. + 
  23754. + 
  23755. + 
  23756. + 
  23757. + 
  23758. + 
  23759. + 
  23760. + 
  23761. + 
  23762. + 
  23763. + 
  23764. + 
  23765. + 
  23766. + 
  23767. + 
  23768. + 
  23769. + 
  23770. + 
  23771. + 
  23772. + 
  23773. + 
  23774. + 
  23775. + 
  23776. + 
  23777. + 
  23778. +           M. Rose                                               [Page 9]
  23779. + 
  23780. + 
  23781. + 
  23782. + 
  23783. + 
  23784. +           draft       POP Version 3: More Service Offerings       Apr 92
  23785. + 
  23786. + 
  23787. +           Table of Contents
  23788. + 
  23789. + 
  23790. +           1 Status of this Memo ...................................    1
  23791. +           2 Abstract ..............................................    1
  23792. +           3 Historical Overview ...................................    2
  23793. +           4 The APOP command ......................................    3
  23794. +           4.1 Usage Example .......................................    4
  23795. +           5 The XTND SCAN command .................................    5
  23796. +           5.1 Usage Example .......................................    6
  23797. +           6 Implementations .......................................    7
  23798. +           7 Acknowledgements ......................................    8
  23799. +           8 References ............................................    9
  23800. + 
  23801. + 
  23802. + 
  23803. + 
  23804. + 
  23805. + 
  23806. + 
  23807. + 
  23808. + 
  23809. + 
  23810. + 
  23811. + 
  23812. + 
  23813. + 
  23814. + 
  23815. + 
  23816. + 
  23817. + 
  23818. + 
  23819. + 
  23820. + 
  23821. + 
  23822. + 
  23823. + 
  23824. + 
  23825. + 
  23826. + 
  23827. + 
  23828. + 
  23829. + 
  23830. + 
  23831. + 
  23832. + 
  23833. + 
  23834. + 
  23835. + 
  23836. + 
  23837. +           M. Rose                                              [Page 10]
  23838. + 
  23839. *** ../mh-6.7.2/support/pop/popaka.c    Thu Apr  5 16:02:52 1990
  23840. --- support/pop/popaka.c    Mon Dec 14 16:20:52 1992
  23841. ***************
  23842. *** 1,7 ****
  23843.   /* popaka.c - generate POP entries for MMDF-II alias file */
  23844.   #ifndef    lint
  23845. ! static char ident[] = "@(#)$Id: popaka.c,v 1.4 90/04/05 15:34:58 sources Exp $";
  23846. ! #endif    lint
  23847.   
  23848.   #include <stdio.h>
  23849.   #include "../zotnet/bboards.h"
  23850. --- 1,7 ----
  23851.   /* popaka.c - generate POP entries for MMDF-II alias file */
  23852.   #ifndef    lint
  23853. ! static char ident[] = "@(#)$Id: popaka.c,v 1.5 1992/12/15 00:20:22 jromine Exp $";
  23854. ! #endif    /* lint */
  23855.   
  23856.   #include <stdio.h>
  23857.   #include "../zotnet/bboards.h"
  23858. *** /dev/null    Tue Dec 15 08:01:10 1992
  23859. --- support/pop/popauth.c    Mon Dec 14 16:20:52 1992
  23860. ***************
  23861. *** 0 ****
  23862. --- 1,251 ----
  23863. + /* popauth.c - manipulate POP authorization DB */
  23864. + #ifndef    lint
  23865. + static char ident[] = "@(#)$Id: popauth.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  23866. + #endif    /* lint */
  23867. + 
  23868. + #include "../h/mh.h"
  23869. + #include "popauth.h"
  23870. + #undef    DBM        /* used by mts.c and ndbm.h */
  23871. + #include <ndbm.h>
  23872. + #include <pwd.h>
  23873. + #include <stdio.h>
  23874. + #include <sys/types.h>
  23875. + #include <sys/stat.h>
  23876. + #include <sys/file.h>
  23877. + #ifdef    SYS5
  23878. + #include <fcntl.h>
  23879. + #endif
  23880. + #include "../zotnet/bboards.h"
  23881. + #include "../zotnet/mts.h"
  23882. + 
  23883. + /*   */
  23884. + 
  23885. + static struct swit switches[] = {
  23886. + #define    INITSW    0
  23887. +     "init", 0,
  23888. + #define    LISTSW    1
  23889. +     "list", 0,
  23890. + #define    USERSW    2
  23891. +     "user name", 0,
  23892. + 
  23893. + #define    HELPSW    3
  23894. +     "help", 4,
  23895. + 
  23896. +     NULL, 0
  23897. + };
  23898. + 
  23899. + /*   */
  23900. + 
  23901. + char   *getpass ();
  23902. + 
  23903. + /*   */
  23904. + 
  23905. + /* ARGSUSED */
  23906. + 
  23907. + main (argc, argv)
  23908. + int    argc;
  23909. + char   *argv[];
  23910. + {
  23911. +     int        flags,
  23912. +         i,
  23913. +         initsw = 0,
  23914. +         insist,
  23915. +         listsw = 0;
  23916. +     long    clock;
  23917. +     char   *bp,
  23918. +        *cp,
  23919. +        *usersw = NULL,
  23920. +         buf[100],
  23921. +       **ap,
  23922. +       **argp,
  23923. +        *arguments[MAXARGS];
  23924. +     datum   key,
  23925. +         value;
  23926. +     DBM    *db;
  23927. +     struct authinfo auth;
  23928. + 
  23929. +     invo_name = r1bindex (argv[0], '/');
  23930. +     m_foil (NULLCP);
  23931. +     if ((cp = m_find (invo_name)) != NULL) {
  23932. +     ap = brkstring (cp = getcpy (cp), " ", "\n");
  23933. +     ap = copyip (ap, arguments);
  23934. +     }
  23935. +     else
  23936. +     ap = arguments;
  23937. +     (void) copyip (argv + 1, ap);
  23938. +     argp = arguments;
  23939. + 
  23940. + /*   */
  23941. + 
  23942. +     while (cp = *argp++) {
  23943. +     if (*cp == '-')
  23944. +         switch (smatch (++cp, switches)) {
  23945. +         case AMBIGSW: 
  23946. +             ambigsw (cp, switches);
  23947. +             done (1);
  23948. +         case UNKWNSW: 
  23949. +             adios (NULLCP, "-%s unknown", cp);
  23950. +         case HELPSW: 
  23951. +             (void) sprintf (buf, "%s [switches]", invo_name);
  23952. +             help (buf, switches);
  23953. +             done (1);
  23954. + 
  23955. +         case INITSW:
  23956. +             initsw = 1, listsw = 0;
  23957. +             continue;
  23958. +         case LISTSW:
  23959. +             listsw = 1, initsw = 0;
  23960. +             continue;
  23961. +         case USERSW:
  23962. +             if (!(usersw = *argp++) || *usersw == '-')
  23963. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  23964. +             continue;
  23965. +         }
  23966. +     adios (NULLCP, "usage: %s [switches]", invo_name);
  23967. +     }
  23968. + 
  23969. + /*   */
  23970. + 
  23971. + #ifndef    APOP
  23972. +     adios (NULLCP, "not compiled with APOP option");
  23973. + #else
  23974. +     if (getuid ())
  23975. +     initsw = listsw = 0, usersw = NULL;
  23976. + 
  23977. +     if (initsw) {
  23978. +     struct passwd *pw;
  23979. +     struct stat st;
  23980. + 
  23981. +     if ((pw = getpwnam (POPUID)) == NULL)
  23982. +         adios (NULLCP, "POP user-id unknown");
  23983. + 
  23984. +     (void) sprintf (buf, "%s.dir", APOP);
  23985. +     if (stat (buf, &st) != NOTOK) {
  23986. +         if (!getanswer ("Really initialize POP authorization DB? "))
  23987. +         done (1);
  23988. +         (void) unlink (buf);
  23989. +         (void) sprintf (buf, "%s.pag", APOP);        
  23990. +         (void) unlink (buf);
  23991. +     }
  23992. +     if ((db = dbm_open (APOP, O_RDWR | O_CREAT, 0600)) == NULL)
  23993. +         adios (APOP, "unable to create POP authorization DB");
  23994. +     if (fchown (dbm_dirfno (db), pw -> pw_uid, pw -> pw_gid) == NOTOK
  23995. +             || fchown (dbm_pagfno (db), pw -> pw_uid, pw -> pw_gid)
  23996. +                 == NOTOK)
  23997. +         advise (" ", "error setting ownership of POP authorization DB");
  23998. + 
  23999. +     done (0);
  24000. +     }
  24001. + 
  24002. +     if ((db = dbm_open (APOP, O_RDONLY, 0)) == NULL)
  24003. +     adios (APOP, "unable to open POP authorization DB");
  24004. + 
  24005. +     if (flock (dbm_pagfno (db), LOCK_SH) == NOTOK)
  24006. +     adios (APOP, "unable to lock POP authorization DB");
  24007. + 
  24008. +     if (listsw) {
  24009. +     if (usersw) {
  24010. +         key.dsize = strlen (key.dptr = usersw) + 1;
  24011. +         value = dbm_fetch (db, key);
  24012. +         if (value.dptr == NULL)
  24013. +         adios (NULLCP, "no such entry in POP authorization DB");
  24014. +         bcopy (value.dptr, (char *) &auth, sizeof auth);
  24015. +         printf ("%s\n", key.dptr);
  24016. +     }
  24017. +     else
  24018. +         for (key = dbm_firstkey (db); key.dptr; key = dbm_nextkey (db)) {
  24019. +         printf ("%s", key.dptr);
  24020. +         value = dbm_fetch (db, key);
  24021. +         if (value.dptr == NULL)
  24022. +             printf (" - no information?!?\n");
  24023. +         else {
  24024. +             bcopy (value.dptr, (char *) &auth, sizeof auth);
  24025. +             printf ("\n");
  24026. +         }
  24027. +         }
  24028. + 
  24029. +     dbm_close (db);
  24030. + 
  24031. +     done (0);
  24032. +     }
  24033. + 
  24034. +     if (usersw == NULL)
  24035. +     usersw = getusr ();
  24036. + 
  24037. +     fprintf (stderr, "Changing POP password for %s.\n", usersw);
  24038. + 
  24039. +     key.dsize = strlen (key.dptr = usersw) + 1;
  24040. +     value = dbm_fetch (db, key);
  24041. +     if (value.dptr != NULL) {
  24042. +     bcopy (value.dptr, (char *) &auth, sizeof auth);
  24043. +     dbm_close (db);
  24044. + 
  24045. +     if ((i = strlen (strcpy (buf, getpass ("Old password:")))) == 0
  24046. +             || auth.auth_secretlen != i
  24047. +             || bcmp (buf, auth.auth_secret, i))
  24048. +         fprintf (stderr, "Sorry.\n"), exit (1);
  24049. +     }
  24050. +     else
  24051. +     dbm_close (db);
  24052. + 
  24053. + #ifdef    lint
  24054. +     flags = 0;
  24055. + #endif    /* lint */
  24056. +     for (insist = 0; insist < 2; insist++) {
  24057. +     int    i;
  24058. +     char    c;
  24059. + 
  24060. +     if (insist)
  24061. +         printf ("Please use %s.\n",
  24062. +             flags == 1 ? "at least one non-numeric character"
  24063. +             : "a longer password");
  24064. + 
  24065. +     if ((i = strlen (strcpy (buf, getpass ("New password:")))) == 0) {
  24066. +         fprintf (stderr, "Password unchanged.\n");
  24067. +         exit (1);
  24068. +     }
  24069. + 
  24070. +     flags = 0;
  24071. +     for (cp = buf; c = *cp++;)
  24072. +         if (c >= 'a' && c <= 'z')
  24073. +         flags |= 2;
  24074. +         else
  24075. +         if (c >= 'A' && c <= 'Z')
  24076. +             flags |= 4;
  24077. +         else
  24078. +             if (c >= '0' && c <= '9')
  24079. +             flags |= 1;
  24080. +             else
  24081. +             flags |= 8;
  24082. + 
  24083. +     if ((flags >= 7 && i >= 4)
  24084. +         || ((flags == 2 || flags == 4) && i >= 6)
  24085. +         || ((flags == 3 || flags == 5 || flags == 6) && i >= 5))
  24086. +         break;
  24087. +     }
  24088. + 
  24089. +     if (strcmp (buf, getpass ("Retype new password:"))) {
  24090. +     fprintf (stderr, "Mismatch - password unchanged.\n");
  24091. +     exit (1);
  24092. +     }
  24093. + 
  24094. +     if ((db = dbm_open (APOP, O_RDWR, 0)) == NULL)
  24095. +     adios (APOP, "unable to open POP authorization DB");
  24096. + 
  24097. +     if (flock (dbm_pagfno (db), LOCK_EX) == NOTOK)
  24098. +     adios (APOP, "unable to lock POP authorization DB");
  24099. + 
  24100. +     key.dsize = strlen (key.dptr = usersw) + 1;
  24101. + 
  24102. +     buf[sizeof auth.auth_secret] = NULL;
  24103. +     bcopy (buf, auth.auth_secret, auth.auth_secretlen = strlen (buf));
  24104. +     value.dptr = (char *) &auth, value.dsize = sizeof auth;
  24105. + 
  24106. +     if (dbm_store (db, key, value, DBM_REPLACE))
  24107. +     adios (NULLCP, "POP authorization DB may be corrupt?!?");
  24108. +     dbm_close (db);
  24109. + #endif
  24110. + 
  24111. +     done (0);
  24112. +     /* NOTREACHED */
  24113. + }
  24114. *** /dev/null    Tue Dec 15 08:01:10 1992
  24115. --- support/pop/popauth.h    Tue Feb 11 09:41:40 1992
  24116. ***************
  24117. *** 0 ****
  24118. --- 1,8 ----
  24119. + /* popauth.h - POP authorization DB definitions */
  24120. + /* @(#)$Id: popauth.h,v 1.1 1992/02/11 17:41:39 jromine Exp $ */
  24121. + 
  24122. + 
  24123. + struct authinfo {
  24124. +     char    auth_secret[16];
  24125. +     int        auth_secretlen;
  24126. + };
  24127. *** ../mh-6.7.2/support/pop/popd.c    Mon Apr  9 09:45:16 1990
  24128. --- support/pop/popd.c    Mon Dec 14 16:20:53 1992
  24129. ***************
  24130. *** 1,7 ****
  24131.   /* popd.c - the POP server */
  24132.   #ifndef    lint
  24133. ! static char ident[] = "@(#)$Id: popd.c,v 1.8 90/04/09 09:45:09 sources Exp Locker: sources $";
  24134. ! #endif    lint
  24135.   
  24136.   /* Author:    Marshall T. Rose    <MRose@UDel>    (MTR)
  24137.           Department of Computer Science and Information Sciences
  24138. --- 1,7 ----
  24139.   /* popd.c - the POP server */
  24140.   #ifndef    lint
  24141. ! static char ident[] = "@(#)$Id: popd.c,v 1.13 1992/12/15 00:20:22 jromine Exp $";
  24142. ! #endif    /* lint */
  24143.   
  24144.   /* Author:    Marshall T. Rose    <MRose@UDel>    (MTR)
  24145.           Department of Computer Science and Information Sciences
  24146. ***************
  24147. *** 21,44 ****
  24148.   #include <sys/file.h>
  24149.   #ifndef    NOIOCTLH
  24150.   #include <sys/ioctl.h>
  24151. ! #endif    NOIOCTLH
  24152.   #include <sys/socket.h>
  24153.   #include <sys/time.h>
  24154.   #ifdef    SIGTSTP
  24155.   #include <sys/resource.h>
  24156.   #include <sys/wait.h>
  24157. ! #endif    SIGTSTP
  24158.   #include <netinet/in.h>
  24159.   #include <netdb.h>
  24160.   #include <arpa/inet.h>
  24161.   #ifdef    SYS5
  24162.   #include <fcntl.h>
  24163. ! #endif    SYS5
  24164.   
  24165.   
  24166.   #ifdef    SYS5
  24167.   #define    u_short    ushort
  24168. ! #endif    SYS5
  24169.   
  24170.   #define    NOTOK    (-1)
  24171.   #define    OK    0
  24172. --- 21,51 ----
  24173.   #include <sys/file.h>
  24174.   #ifndef    NOIOCTLH
  24175.   #include <sys/ioctl.h>
  24176. ! #endif
  24177.   #include <sys/socket.h>
  24178.   #include <sys/time.h>
  24179.   #ifdef    SIGTSTP
  24180.   #include <sys/resource.h>
  24181.   #include <sys/wait.h>
  24182. ! #endif
  24183.   #include <netinet/in.h>
  24184.   #include <netdb.h>
  24185.   #include <arpa/inet.h>
  24186. + #ifdef KPOP
  24187. + #include <krb.h>
  24188. + 
  24189. + static Key_schedule schedule;
  24190. + static KTEXT_ST ticket;
  24191. + static AUTH_DAT kdata;
  24192. + #endif
  24193.   #ifdef    SYS5
  24194.   #include <fcntl.h>
  24195. ! #endif
  24196.   
  24197.   
  24198.   #ifdef    SYS5
  24199.   #define    u_short    ushort
  24200. ! #endif
  24201.   
  24202.   #define    NOTOK    (-1)
  24203.   #define    OK    0
  24204. ***************
  24205. *** 72,77 ****
  24206. --- 79,87 ----
  24207.   static struct sockaddr_in   in_socket;
  24208.   static struct sockaddr_in  *isock = &in_socket;
  24209.   
  24210. + #ifdef KPOP
  24211. + static AUTH_DAT kdata;
  24212. + #endif
  24213.   
  24214.   static int    chldser ();
  24215.   void    padios (), padvise ();
  24216. ***************
  24217. *** 86,91 ****
  24218. --- 96,104 ----
  24219.   char  **argv,
  24220.         **envp;
  24221.   {
  24222. + #ifdef KPOP
  24223. +     int     i;
  24224. + #else
  24225.       int     fd,
  24226.               sd;
  24227.       int        on = 1;
  24228. ***************
  24229. *** 92,110 ****
  24230. --- 105,135 ----
  24231.       struct servent *sp;
  24232.       struct sockaddr_in  out_socket,
  24233.                          *osock = &out_socket;
  24234. + #endif
  24235.   
  24236. + #ifdef KPOP
  24237. +     i = sizeof(in_socket);
  24238. +     if (getpeername(0, &in_socket, &i) < 0)
  24239. +       padios("getpeername", "bad status");
  24240. + #else
  24241.       if ((sp = getservbyname (myservice, myprotocol)) == NULL)
  24242.       padios (NULLCP, "%s/%s: unknown service", myprotocol, myservice);
  24243.       isock -> sin_family = AF_INET;
  24244.       isock -> sin_port = sp -> s_port;
  24245.       isock -> sin_addr.s_addr = INADDR_ANY;
  24246. + #endif
  24247.       arginit (argv);
  24248.       envinit ();
  24249.   
  24250. + #ifndef KPOP
  24251.   #ifdef    RESTART
  24252.       for (;;) {
  24253.       char    reason[BUFSIZ];
  24254. + #if defined(BSD42) && !defined(WAITINT)
  24255.       union wait status;
  24256. + #else
  24257. +     int status;
  24258. + #endif
  24259.   
  24260.       switch (fork ()) {
  24261.           case NOTOK: 
  24262. ***************
  24263. *** 137,147 ****
  24264.       closelog ();
  24265.   #ifndef    BSD43
  24266.       openlog (myname, LOG_PID);
  24267. ! #else    BSD43
  24268.       openlog (myname, LOG_PID, LOG_DAEMON);
  24269. ! #endif    BSD43
  24270.       padvise (NULLCP, LOG_INFO, "restart");
  24271. ! #endif    RESTART
  24272.   
  24273.   /*   */
  24274.   
  24275. --- 162,172 ----
  24276.       closelog ();
  24277.   #ifndef    BSD43
  24278.       openlog (myname, LOG_PID);
  24279. ! #else    /* BSD43 */
  24280.       openlog (myname, LOG_PID, LOG_DAEMON);
  24281. ! #endif    /* BSD43 */
  24282.       padvise (NULLCP, LOG_INFO, "restart");
  24283. ! #endif    /* RESTART */
  24284.   
  24285.   /*   */
  24286.   
  24287. ***************
  24288. *** 153,175 ****
  24289.           padvise ("SO_DEBUG", LOG_WARNING, "unable to set socket option");
  24290.       if (setsockopt (sd, SOL_SOCKET, SO_KEEPALIVE, NULL, 0) == NOTOK)
  24291.       padvise ("SO_KEEPALIVE", LOG_WARNING, "unable to set socket option");
  24292. ! #else    BSD43
  24293.       if (options & SO_DEBUG)
  24294.       if (setsockopt (sd, SOL_SOCKET, SO_DEBUG, &on, sizeof on) == NOTOK)
  24295.           padvise ("SO_DEBUG", LOG_WARNING, "unable to set socket option");
  24296.       if (setsockopt (sd, SOL_SOCKET, SO_KEEPALIVE, &on, sizeof on) == NOTOK)
  24297.       padvise ("SO_KEEPALIVE", LOG_WARNING, "unable to set socket option");
  24298. ! #endif    BSD43
  24299.       if (bind (sd, (struct sockaddr *) isock, sizeof *isock) == NOTOK)
  24300.       padios ("socket", "unable to bind");
  24301.   
  24302.   #ifdef    SIGCHLD
  24303.       (void) signal (SIGCHLD, chldser);
  24304. ! #endif    SIGCHLD
  24305.       (void) listen (sd, SOMAXCONN);
  24306.   #ifdef    FAST
  24307.       popinit ();
  24308. ! #endif    FAST
  24309.       for (;;) {
  24310.       int     i = sizeof *osock;
  24311.   
  24312. --- 178,202 ----
  24313.           padvise ("SO_DEBUG", LOG_WARNING, "unable to set socket option");
  24314.       if (setsockopt (sd, SOL_SOCKET, SO_KEEPALIVE, NULL, 0) == NOTOK)
  24315.       padvise ("SO_KEEPALIVE", LOG_WARNING, "unable to set socket option");
  24316. ! #else    /* BSD43 */
  24317.       if (options & SO_DEBUG)
  24318.       if (setsockopt (sd, SOL_SOCKET, SO_DEBUG, &on, sizeof on) == NOTOK)
  24319.           padvise ("SO_DEBUG", LOG_WARNING, "unable to set socket option");
  24320.       if (setsockopt (sd, SOL_SOCKET, SO_KEEPALIVE, &on, sizeof on) == NOTOK)
  24321.       padvise ("SO_KEEPALIVE", LOG_WARNING, "unable to set socket option");
  24322. ! #endif    /* BSD43 */
  24323.       if (bind (sd, (struct sockaddr *) isock, sizeof *isock) == NOTOK)
  24324.       padios ("socket", "unable to bind");
  24325.   
  24326.   #ifdef    SIGCHLD
  24327.       (void) signal (SIGCHLD, chldser);
  24328. ! #endif    /* SIGCHLD */
  24329.       (void) listen (sd, SOMAXCONN);
  24330. + #endif /* KPOP */
  24331.   #ifdef    FAST
  24332.       popinit ();
  24333. ! #endif    /* FAST */
  24334. ! #ifndef KPOP
  24335.       for (;;) {
  24336.       int     i = sizeof *osock;
  24337.   
  24338. ***************
  24339. *** 179,193 ****
  24340.               "unable to accept connection on");
  24341.           continue;
  24342.       }
  24343.   #ifdef    FAST
  24344.       popassert ();
  24345. ! #endif    FAST
  24346.       switch (fork ()) {
  24347.           case OK: 
  24348.           (void) close (sd);
  24349.   #ifdef    SIGCHLD
  24350.           (void) signal (SIGCHLD, SIG_DFL);
  24351. ! #endif    SIGCHLD
  24352.           server (fd, osock);
  24353.           _exit (0);
  24354.   
  24355. --- 206,222 ----
  24356.               "unable to accept connection on");
  24357.           continue;
  24358.       }
  24359. + #endif
  24360.   #ifdef    FAST
  24361.       popassert ();
  24362. ! #endif    /* FAST */
  24363. ! #ifndef KPOP
  24364.       switch (fork ()) {
  24365.           case OK: 
  24366.           (void) close (sd);
  24367.   #ifdef    SIGCHLD
  24368.           (void) signal (SIGCHLD, SIG_DFL);
  24369. ! #endif    /* SIGCHLD */
  24370.           server (fd, osock);
  24371.           _exit (0);
  24372.   
  24373. ***************
  24374. *** 198,203 ****
  24375. --- 227,235 ----
  24376.           (void) close (fd);
  24377.       }
  24378.       }
  24379. + #else
  24380. +     server (0, isock);
  24381. + #endif
  24382.   }
  24383.   
  24384.   /*   */
  24385. ***************
  24386. *** 209,233 ****
  24387.       u_short port;
  24388.       struct hostent *hp;
  24389.       struct in_addr *addr;
  24390.   
  24391.       closelog ();
  24392.   #ifndef    BSD43
  24393.       openlog (myname, LOG_PID);
  24394. ! #else    BSD43
  24395.       openlog (myname, LOG_PID, LOG_DAEMON);
  24396. ! #endif    BSD43
  24397.       port = ntohs (sin -> sin_port);
  24398.       addr = &sin -> sin_addr;
  24399.       hp = gethostbyaddr (addr, sizeof *addr, sin -> sin_family);
  24400.       padvise (NULLCP, LOG_INFO, "servicing %s/%d",
  24401.           hp ? hp -> h_name : inet_ntoa (*addr), port);
  24402. ! 
  24403. !     (void) dup2 (fd, 0);
  24404. !     (void) close (fd);
  24405.       (void) dup2 (0, 1);
  24406.   
  24407.       pop (0, 1, sin -> sin_family == AF_INET && port < IPPORT_RESERVED && hp,
  24408.           hp ? hp -> h_name : NULLCP);
  24409.   }
  24410.       
  24411.   /*   */
  24412. --- 241,296 ----
  24413.       u_short port;
  24414.       struct hostent *hp;
  24415.       struct in_addr *addr;
  24416. + #ifdef KPOP
  24417. +     int auth;
  24418. +     int sin_len;
  24419. +     struct sockaddr_in faddr;
  24420. +     char instance[INST_SZ];
  24421. +     char version[9];
  24422. +     char user[ANAME_SZ];
  24423. + #endif
  24424.   
  24425.       closelog ();
  24426.   #ifndef    BSD43
  24427.       openlog (myname, LOG_PID);
  24428. ! #else    /* BSD43 */
  24429.       openlog (myname, LOG_PID, LOG_DAEMON);
  24430. ! #endif    /* BSD43 */
  24431.       port = ntohs (sin -> sin_port);
  24432.       addr = &sin -> sin_addr;
  24433.       hp = gethostbyaddr (addr, sizeof *addr, sin -> sin_family);
  24434.       padvise (NULLCP, LOG_INFO, "servicing %s/%d",
  24435.           hp ? hp -> h_name : inet_ntoa (*addr), port);
  24436. !     if (fd != 0)
  24437. !       {
  24438. !     (void) dup2 (fd, 0);
  24439. !     (void) close (fd);
  24440. !       }
  24441.       (void) dup2 (0, 1);
  24442.   
  24443. + #ifdef KPOP
  24444. +     sin_len = sizeof (struct sockaddr_in);
  24445. +     if (getpeername(0, &faddr, &sin_len) < 0) {
  24446. +       padvise("getpeername", LOG_INFO, "");
  24447. +       exit(1);
  24448. +     }
  24449. +     strcpy(instance, "*");
  24450. +     auth = krb_recvauth(0L, 0, &ticket, "pop", instance,
  24451. +             &faddr, (struct sockaddr_in *)NULL,
  24452. +             &kdata, "", schedule, version);
  24453. +     if (auth == KSUCCESS)
  24454. +       auth = krb_kntoln(&kdata, user);
  24455. + 
  24456. +     if (auth != KSUCCESS) {
  24457. +       padvise(NULLCP, LOG_INFO, "bad kerberos data, not ok'ing");
  24458. +       kpop (0, 1, NULLCP, NULLCP, auth); /* respond(NOTOK, krb_err_txt[auth]); */
  24459. +     } else {
  24460. +       kpop (0, 1, user, (hp ? hp -> h_name : NULLCP), 0);
  24461. +     }
  24462. + #else
  24463.       pop (0, 1, sin -> sin_family == AF_INET && port < IPPORT_RESERVED && hp,
  24464.           hp ? hp -> h_name : NULLCP);
  24465. + #endif
  24466.   }
  24467.       
  24468.   /*   */
  24469. ***************
  24470. *** 241,253 ****
  24471.   
  24472.       if (myname = rindex (*vec, '/'))
  24473.       myname++;
  24474. !     if (myname == NULL || *myname == NULL)
  24475.       myname = *vec;
  24476.   
  24477.       (void) gethostname (myhost, sizeof myhost);
  24478.       if (hp = gethostbyname (myhost))
  24479.       (void) strcpy (myhost, hp -> h_name);
  24480.       nbits = getdtablesize ();
  24481.   
  24482.       for (vec++; ap = *vec; vec++) {
  24483.       if (*ap == '-')
  24484. --- 304,320 ----
  24485.   
  24486.       if (myname = rindex (*vec, '/'))
  24487.       myname++;
  24488. !     if (myname == NULL || *myname == 0)
  24489.       myname = *vec;
  24490.   
  24491.       (void) gethostname (myhost, sizeof myhost);
  24492.       if (hp = gethostbyname (myhost))
  24493.       (void) strcpy (myhost, hp -> h_name);
  24494. + #ifndef BSD42
  24495. +     nbits = _NFILE;
  24496. + #else   /* BSD42 */
  24497.       nbits = getdtablesize ();
  24498. + #endif  /* BSD42 */
  24499.   
  24500.       for (vec++; ap = *vec; vec++) {
  24501.       if (*ap == '-')
  24502. ***************
  24503. *** 275,280 ****
  24504. --- 342,348 ----
  24505.   /*   */
  24506.   
  24507.   static  envinit () {
  24508. + #ifndef KPOP
  24509.       int     i,
  24510.               sd;
  24511.   
  24512. ***************
  24513. *** 306,312 ****
  24514.       if ((sd = open ("/dev/tty", O_RDWR)) != NOTOK) {
  24515.   #ifdef    TIOCNOTTY
  24516.           (void) ioctl (sd, TIOCNOTTY, NULLCP);
  24517. ! #endif    TIOCNOTTY
  24518.           (void) close (sd);
  24519.       }
  24520.       }
  24521. --- 374,380 ----
  24522.       if ((sd = open ("/dev/tty", O_RDWR)) != NOTOK) {
  24523.   #ifdef    TIOCNOTTY
  24524.           (void) ioctl (sd, TIOCNOTTY, NULLCP);
  24525. ! #endif    /* TIOCNOTTY */
  24526.           (void) close (sd);
  24527.       }
  24528.       }
  24529. ***************
  24530. *** 313,326 ****
  24531.   
  24532.       for (sd = 3; sd < nbits; sd++)
  24533.       (void) close (sd);
  24534.   
  24535.       (void) signal (SIGPIPE, SIG_IGN);
  24536.   
  24537.   #ifndef    BSD43
  24538.       openlog (myname, LOG_PID);
  24539. ! #else    BSD43
  24540.       openlog (myname, LOG_PID, LOG_DAEMON);
  24541. ! #endif    BSD43
  24542.       padvise (NULLCP, LOG_INFO, "starting");
  24543.       if (debug)
  24544.       padvise (NULLCP, LOG_DEBUG, "options=0x%x port=%d",
  24545. --- 381,395 ----
  24546.   
  24547.       for (sd = 3; sd < nbits; sd++)
  24548.       (void) close (sd);
  24549. + #endif /* KPOP */
  24550.   
  24551.       (void) signal (SIGPIPE, SIG_IGN);
  24552.   
  24553.   #ifndef    BSD43
  24554.       openlog (myname, LOG_PID);
  24555. ! #else    /* BSD43 */
  24556.       openlog (myname, LOG_PID, LOG_DAEMON);
  24557. ! #endif    /* BSD43 */
  24558.       padvise (NULLCP, LOG_INFO, "starting");
  24559.       if (debug)
  24560.       padvise (NULLCP, LOG_DEBUG, "options=0x%x port=%d",
  24561. ***************
  24562. *** 329,334 ****
  24563. --- 398,405 ----
  24564.   
  24565.   /*   */
  24566.   
  24567. + #ifndef KPOP
  24568. + 
  24569.   /* ARGSUSED */
  24570.   
  24571.   #ifdef    SIGCHLD
  24572. ***************
  24573. *** 338,350 ****
  24574.   long    code;
  24575.   struct sigcontext *sc;
  24576.   {
  24577.       union wait status;
  24578.   
  24579.       while (wait3 (&status, WNOHANG, NULLRP) > 0)
  24580.       continue;
  24581.   }
  24582.   
  24583. ! #endif    SIGCHLD
  24584.   
  24585.   /*   */
  24586.   
  24587. --- 409,426 ----
  24588.   long    code;
  24589.   struct sigcontext *sc;
  24590.   {
  24591. + #if defined(BSD42) && !defined(WAITINT)
  24592. +     int status;
  24593. + #else
  24594.       union wait status;
  24595. + #endif
  24596.   
  24597.       while (wait3 (&status, WNOHANG, NULLRP) > 0)
  24598.       continue;
  24599.   }
  24600.   
  24601. ! #endif /* SIGCHLD */
  24602. ! #endif /* KPOP */
  24603.   
  24604.   /*   */
  24605.   
  24606. *** ../mh-6.7.2/support/pop/popser.c    Fri Nov 16 16:06:38 1990
  24607. --- support/pop/popser.c    Mon Dec 14 16:20:55 1992
  24608. ***************
  24609. *** 1,10 ****
  24610.   /* popser.c - the POP service */
  24611.   #ifndef    lint
  24612. ! static char ident[]="@(#)$Id: popser.c,v 1.16 90/11/16 14:56:38 mh Exp $";
  24613.   #endif
  24614.   
  24615.   #include "../h/mh.h"
  24616.   #include "../h/dropsbr.h"
  24617.   #include "../zotnet/bboards.h"
  24618.   #include <stdio.h>
  24619.   #include "../zotnet/mts.h"
  24620. --- 1,16 ----
  24621.   /* popser.c - the POP service */
  24622.   #ifndef    lint
  24623. ! static char ident[]="@(#)$Id: popser.c,v 1.29 1992/12/15 00:20:22 jromine Exp $";
  24624.   #endif
  24625.   
  24626.   #include "../h/mh.h"
  24627.   #include "../h/dropsbr.h"
  24628. + #ifdef    MPOP
  24629. + #ifdef    BPOP
  24630. + #include "../h/formatsbr.h"
  24631. + #include "../h/scansbr.h"
  24632. + #endif
  24633. + #endif /* MPOP */
  24634.   #include "../zotnet/bboards.h"
  24635.   #include <stdio.h>
  24636.   #include "../zotnet/mts.h"
  24637. ***************
  24638. *** 15,32 ****
  24639.   #include "syslog.h"
  24640.   #include <sys/types.h>
  24641.   #include <sys/stat.h>
  24642.   #ifdef    SYS5
  24643.   #include <fcntl.h>
  24644. ! #endif    SYS5
  24645.   #ifdef    SHADOW
  24646.   #include <shadow.h>
  24647. ! #endif    SHADOW
  24648.   
  24649.   
  24650.   #define    TRUE    1
  24651.   #define    FALSE    0
  24652.   
  24653. ! #define    NVEC    4
  24654.   
  24655.   #ifndef    POPSERVICE
  24656.   #define    POPSERVICE    "pop"
  24657. --- 21,41 ----
  24658.   #include "syslog.h"
  24659.   #include <sys/types.h>
  24660.   #include <sys/stat.h>
  24661. + #ifdef KPOP
  24662. + #include <krb.h>
  24663. + #endif    /* KPOP */
  24664.   #ifdef    SYS5
  24665.   #include <fcntl.h>
  24666. ! #endif    /* SYS5 */
  24667.   #ifdef    SHADOW
  24668.   #include <shadow.h>
  24669. ! #endif    /* SHADOW */
  24670.   
  24671.   
  24672.   #define    TRUE    1
  24673.   #define    FALSE    0
  24674.   
  24675. ! #define    NVEC    5
  24676.   
  24677.   #ifndef    POPSERVICE
  24678.   #define    POPSERVICE    "pop"
  24679. ***************
  24680. *** 54,73 ****
  24681.   static int     user (), pass ();
  24682.   #ifdef    BPOP
  24683.   static        isguest(), getbbmax();
  24684.   static    int    xtnd1(), xtnd2();
  24685. ! #endif    BPOP
  24686.   #ifdef    RPOP
  24687.   static int    rpop ();
  24688. ! #endif    RPOP
  24689.   static int     status (), list (), retrieve (), delete (), reset ();
  24690.   static int    top (), last ();
  24691.   #ifdef    BPOP
  24692. ! int    xtnd ();
  24693. ! #endif    BPOP
  24694.   static int     quit ();
  24695.   #ifdef    POP2
  24696.   static int    helo (), rdp2 (), acks (), ack2 (), fold (), nack ();
  24697. ! #endif    POP2
  24698.   
  24699.   static struct vector {
  24700.       char   *v_cmd;
  24701. --- 63,89 ----
  24702.   static int     user (), pass ();
  24703.   #ifdef    BPOP
  24704.   static        isguest(), getbbmax();
  24705. + #ifndef    MPOP
  24706.   static    int    xtnd1(), xtnd2();
  24707. ! #else
  24708. ! static    int    xtnd1(), xtnd2(), xtnd3 ();
  24709. ! #endif /* MPOP */
  24710. ! #endif    /* BPOP */
  24711.   #ifdef    RPOP
  24712.   static int    rpop ();
  24713. ! #endif    /* RPOP */
  24714. ! #ifdef    APOP
  24715. ! static    int    apop ();
  24716. ! #endif
  24717.   static int     status (), list (), retrieve (), delete (), reset ();
  24718.   static int    top (), last ();
  24719.   #ifdef    BPOP
  24720. ! static int    xtnd ();
  24721. ! #endif    /* BPOP */
  24722.   static int     quit ();
  24723.   #ifdef    POP2
  24724.   static int    helo (), rdp2 (), acks (), ack2 (), fold (), nack ();
  24725. ! #endif    /* POP2 */
  24726.   
  24727.   static struct vector {
  24728.       char   *v_cmd;
  24729. ***************
  24730. *** 80,86 ****
  24731.       "pass", 1, 1, pass, auth2, trans, auth1,
  24732.   #ifdef    RPOP
  24733.       "rpop", 1, 1, rpop, auth2, trans, auth1,
  24734. ! #endif    RPOP
  24735.       "quit", 0, 0, NULL, auth1, halt, halt,
  24736.       "quit", 0, 0, NULL, auth2, halt, halt,
  24737.   
  24738. --- 96,105 ----
  24739.       "pass", 1, 1, pass, auth2, trans, auth1,
  24740.   #ifdef    RPOP
  24741.       "rpop", 1, 1, rpop, auth2, trans, auth1,
  24742. ! #endif    /* RPOP */
  24743. ! #ifdef    APOP
  24744. !     "apop", 2, 2, apop, auth1, trans, auth1,
  24745. ! #endif
  24746.       "quit", 0, 0, NULL, auth1, halt, halt,
  24747.       "quit", 0, 0, NULL, auth2, halt, halt,
  24748.   
  24749. ***************
  24750. *** 94,101 ****
  24751.       "top",  2, 2, top,  trans, trans, trans,
  24752.       "last", 0, 0, last, trans, trans, trans,
  24753.   #ifdef    BPOP
  24754.       "xtnd", 1, 2, xtnd, trans, trans, trans,
  24755. ! #endif    BPOP
  24756.       "quit", 0, 0, quit, trans, halt, halt,
  24757.   
  24758.   #ifdef    POP2
  24759. --- 113,124 ----
  24760.       "top",  2, 2, top,  trans, trans, trans,
  24761.       "last", 0, 0, last, trans, trans, trans,
  24762.   #ifdef    BPOP
  24763. + #ifndef    MPOP
  24764.       "xtnd", 1, 2, xtnd, trans, trans, trans,
  24765. ! #else
  24766. !     "xtnd", 1, 3, xtnd, trans, trans, trans,
  24767. ! #endif /* MPOP */
  24768. ! #endif    /* BPOP */
  24769.       "quit", 0, 0, quit, trans, halt, halt,
  24770.   
  24771.   #ifdef    POP2
  24772. ***************
  24773. *** 115,121 ****
  24774.       "nack", 0, 0, rdp2, ack, item, error,
  24775.       "quit", 0, 0, NULL, ack, halt, halt,
  24776.   
  24777. ! #endif    POP2
  24778.       NULL
  24779.   };
  24780.   
  24781. --- 138,144 ----
  24782.       "nack", 0, 0, rdp2, ack, item, error,
  24783.       "quit", 0, 0, NULL, ack, halt, halt,
  24784.   
  24785. ! #endif    /* POP2 */
  24786.       NULL
  24787.   };
  24788.   
  24789. ***************
  24790. *** 125,139 ****
  24791.   
  24792.   #ifdef    POP2
  24793.   static int pop2 = NOTOK;    /* current pop2 msg, or NOTOK if pop3 */
  24794. ! #endif    POP2
  24795.   #ifdef    DPOP
  24796.   static int pop_uid;
  24797.   static int pop_gid;
  24798. ! #endif    DPOP
  24799.   
  24800.   static int  rproto;
  24801.   static char *hostname;
  24802.   static char server[BUFSIZ];
  24803.   
  24804.   static char username[BUFSIZ];
  24805.   
  24806. --- 148,163 ----
  24807.   
  24808.   #ifdef    POP2
  24809.   static int pop2 = NOTOK;    /* current pop2 msg, or NOTOK if pop3 */
  24810. ! #endif    /* POP2 */
  24811.   #ifdef    DPOP
  24812.   static int pop_uid;
  24813.   static int pop_gid;
  24814. ! #endif    /* DPOP */
  24815.   
  24816.   static int  rproto;
  24817.   static char *hostname;
  24818.   static char server[BUFSIZ];
  24819. + static char timestamp[BUFSIZ];
  24820.   
  24821.   static char username[BUFSIZ];
  24822.   
  24823. ***************
  24824. *** 156,163 ****
  24825.   
  24826.   static long BBtime = 0L;
  24827.   
  24828. ! struct bboard *getbbaux ();
  24829. ! #endif    BPOP
  24830.   
  24831.   
  24832.   struct Msg {            /* Msgs[0] contains info for entire maildrop */
  24833. --- 180,187 ----
  24834.   
  24835.   static long BBtime = 0L;
  24836.   
  24837. ! static struct bboard *getbbaux ();
  24838. ! #endif    /* BPOP */
  24839.   
  24840.   
  24841.   struct Msg {            /* Msgs[0] contains info for entire maildrop */
  24842. ***************
  24843. *** 179,184 ****
  24844. --- 203,214 ----
  24845.   
  24846.   static int  nmsgs;
  24847.   static int  dmsgs;
  24848. + #ifdef    MPOP
  24849. + #ifdef    BPOP
  24850. + static int   _sc_width = 0;
  24851. + static char *nfs = NULL;
  24852. + #endif
  24853. + #endif /* MPOP */
  24854.   
  24855.   
  24856.   #define    TRM    "."
  24857. ***************
  24858. *** 190,195 ****
  24859. --- 220,230 ----
  24860.   FILE   *input;
  24861.   FILE   *output;
  24862.   
  24863. + #ifndef    __STDC__
  24864. + #ifdef    SYS5
  24865. + struct passwd *getpwnam();
  24866. + #endif
  24867. + #endif
  24868.   
  24869.   void    padvise (), padios ();
  24870.   long    lseek ();
  24871. ***************
  24872. *** 202,209 ****
  24873.   static        p_cmatch(), p_isdate(), p_ishead(), p_parse(), any();
  24874.   #else
  24875.   #define    MBX_READ    mbx_read
  24876. - extern    int    mbx_read ();
  24877.   #endif
  24878.   
  24879.   static int    setup(), setupaux(), read_map(), read_file(), pmbx_size();
  24880.   static int    quitaux(), quitfile(), respond(), getline();
  24881. --- 237,244 ----
  24882.   static        p_cmatch(), p_isdate(), p_ishead(), p_parse(), any();
  24883.   #else
  24884.   #define    MBX_READ    mbx_read
  24885.   #endif
  24886. + extern    int    mbx_read ();
  24887.   
  24888.   static int    setup(), setupaux(), read_map(), read_file(), pmbx_size();
  24889.   static int    quitaux(), quitfile(), respond(), getline();
  24890. ***************
  24891. *** 217,223 ****
  24892.       BBhead = BBtail = NULL;
  24893.       while (getbbaux (NULLCP))
  24894.       continue;
  24895. ! #endif    BPOP
  24896.   }
  24897.   
  24898.   popassert () {
  24899. --- 252,258 ----
  24900.       BBhead = BBtail = NULL;
  24901.       while (getbbaux (NULLCP))
  24902.       continue;
  24903. ! #endif    /* BPOP */
  24904.   }
  24905.   
  24906.   popassert () {
  24907. ***************
  24908. *** 273,302 ****
  24909.       BBhead = BBtail = NULL;
  24910.       while (getbbaux (NULLCP))
  24911.       continue;
  24912. ! #endif    BPOP
  24913.   }
  24914.   
  24915.   /*   */
  24916.   
  24917.   pop (in, out, priv, rhost)
  24918.   int    in,
  24919.       out,
  24920.       priv;
  24921.   char   *rhost;
  24922.   {
  24923.       char    buffer[BUFSIZ],
  24924.              *vec[NVEC + 1];
  24925.   #if    defined (DPOP) || defined (BPOP)
  24926.       register struct passwd *pw;
  24927. ! #endif    defined (DPOP) || defined (BPOP)
  24928.       register struct vector *v;
  24929.   
  24930.       m_foil (NULLCP);
  24931.       mts_init (myname);
  24932.   
  24933. -     rproto = priv;
  24934.       hostname = rhost;
  24935. !     (void) sprintf (server, "%s %s server", myhost, priv ? "RPOP" : "POP");
  24936.   
  24937.       if ((input = fdopen (in, "r")) == NULL
  24938.           || (output = fdopen (out, "w")) == NULL) {/* you lose big */
  24939. --- 308,352 ----
  24940.       BBhead = BBtail = NULL;
  24941.       while (getbbaux (NULLCP))
  24942.       continue;
  24943. ! #endif    /* BPOP */
  24944.   }
  24945.   
  24946.   /*   */
  24947.   
  24948. + #ifdef KPOP
  24949. + static char *kusername;
  24950. + 
  24951. + kpop (in, out, principal, rhost, auth)
  24952. + int   in,
  24953. +       out;
  24954. + char  *principal, *rhost;
  24955. + int auth;
  24956. + #else    /* KPOP */
  24957.   pop (in, out, priv, rhost)
  24958.   int    in,
  24959.       out,
  24960.       priv;
  24961.   char   *rhost;
  24962. + #endif    /* KPOP */
  24963.   {
  24964.       char    buffer[BUFSIZ],
  24965.              *vec[NVEC + 1];
  24966.   #if    defined (DPOP) || defined (BPOP)
  24967.       register struct passwd *pw;
  24968. ! #endif    /* defined (DPOP) || defined (BPOP) */
  24969.       register struct vector *v;
  24970.   
  24971.       m_foil (NULLCP);
  24972.       mts_init (myname);
  24973.   
  24974.       hostname = rhost;
  24975. ! #ifdef KPOP
  24976. !     rproto = 1;
  24977. !     (void) sprintf (server, "%s KPOP server", myhost);
  24978. ! #else
  24979. !     rproto = priv;
  24980. !     (void) sprintf (server, "%s server", priv ? "RPOP" : "POP");
  24981. ! #endif    /* KPOP */
  24982.   
  24983.       if ((input = fdopen (in, "r")) == NULL
  24984.           || (output = fdopen (out, "w")) == NULL) {/* you lose big */
  24985. ***************
  24986. *** 304,309 ****
  24987. --- 354,369 ----
  24988.       return;
  24989.       }
  24990.       (void) signal (SIGPIPE, pipeser);
  24991. + #ifdef KPOP
  24992. +     if (principal == NULLCP) {
  24993. +     char buf[512];
  24994. +     strcpy(buf,  "Authentication failed: ");
  24995. +     strcat(buf, krb_err_txt[auth]);
  24996. +     (void) respond (NOTOK, buf);
  24997. +     return;
  24998. +     }
  24999. +     kusername = principal;
  25000. + #endif    /* KPOP */
  25001.   
  25002.   #ifdef    DPOP
  25003.       if ((pw = getpwnam (POPUID)) == NULL || !setpwinfo (pw, POPDB, 1)) {
  25004. ***************
  25005. *** 313,319 ****
  25006.       }
  25007.       pop_uid = pw -> pw_uid;
  25008.       pop_gid = pw -> pw_gid;
  25009. ! #endif    DPOP
  25010.   #ifdef    BPOP
  25011.       if ((pw = getpwnam (popbbuser)) && pw -> pw_uid) {
  25012.       guest_uid = pw -> pw_uid;
  25013. --- 373,379 ----
  25014.       }
  25015.       pop_uid = pw -> pw_uid;
  25016.       pop_gid = pw -> pw_gid;
  25017. ! #endif    /* DPOP */
  25018.   #ifdef    BPOP
  25019.       if ((pw = getpwnam (popbbuser)) && pw -> pw_uid) {
  25020.       guest_uid = pw -> pw_uid;
  25021. ***************
  25022. *** 321,331 ****
  25023.       }
  25024.       else
  25025.       guest_uid = guest_gid = 0;
  25026. ! #endif    BPOP
  25027.   
  25028. !     (void) respond (OK, "%s ready (Comments to: PostMaster@%s)",
  25029. !         server, myhost);
  25030.   
  25031.       for (mystate = auth1; mystate != halt && mystate != error;)
  25032.       switch (getline (buffer, sizeof buffer, input)) {
  25033.           case OK: 
  25034. --- 381,396 ----
  25035.       }
  25036.       else
  25037.       guest_uid = guest_gid = 0;
  25038. ! #endif    /* BPOP */
  25039.   
  25040. !     {
  25041. !     long    clock;
  25042.   
  25043. +     (void) time (&clock);
  25044. +     (void) sprintf (timestamp, "<%d.%ld@%s>", getpid (), clock, myhost);
  25045. +     }
  25046. +     (void) respond (OK, "%s ready %s", server, timestamp);
  25047. + 
  25048.       for (mystate = auth1; mystate != halt && mystate != error;)
  25049.       switch (getline (buffer, sizeof buffer, input)) {
  25050.           case OK: 
  25051. ***************
  25052. *** 360,367 ****
  25053.   register char  **vec;
  25054.   {
  25055.       make_lower (username, vec[1]);
  25056. ! 
  25057.       return respond (OK, "password required for %s", username);
  25058.   }
  25059.   
  25060.   /*   */
  25061. --- 425,441 ----
  25062.   register char  **vec;
  25063.   {
  25064.       make_lower (username, vec[1]);
  25065. ! #ifdef KPOP
  25066. !     if (!strcmp(username, kusername))
  25067. !       return respond (OK, "Kerberos authentication succeeded. Send username as password (%s)", username);
  25068. !     else {
  25069. !     respond (NOTOK, "Wrong username supplied (%s vs. %s)",
  25070. !          kusername, username);
  25071. !     return (NOTOK);
  25072. !     }
  25073. ! #else
  25074.       return respond (OK, "password required for %s", username);
  25075. + #endif
  25076.   }
  25077.   
  25078.   /*   */
  25079. ***************
  25080. *** 374,384 ****
  25081.       register struct passwd *pw;
  25082.   #ifdef    SHADOW
  25083.       register struct spwd *shpw;
  25084. ! #endif    SHADOW
  25085. ! #else    DPOP
  25086.       register struct bboard *pw;
  25087. ! #endif    DPOP
  25088.   
  25089.   #ifndef    DPOP
  25090.   #ifdef    BPOP
  25091.       if (isguest ()) {
  25092. --- 448,478 ----
  25093.       register struct passwd *pw;
  25094.   #ifdef    SHADOW
  25095.       register struct spwd *shpw;
  25096. ! #endif    /* SHADOW */
  25097. ! #else    /* DPOP */
  25098.       register struct bboard *pw;
  25099. ! #endif    /* DPOP */
  25100.   
  25101. + #ifdef KPOP
  25102. + #ifndef DPOP
  25103. +     if ((pw = getpwnam (username)) != NULL)
  25104. +       return setup(pw, FALSE);
  25105. +     else
  25106. +       return respond (NOTOK, "no local password entry");
  25107. + #else
  25108. +     {
  25109. +       static struct bboard entry;
  25110. +       static char entry_file[BUFSIZ] = "/usr/spool/pop";
  25111. +       
  25112. +       pw = &entry;
  25113. +       pw->bb_name = username;
  25114. +       strcat(entry_file, username);
  25115. +       pw->bb_file = entry_file;
  25116. +       return setup(pw, FALSE);
  25117. +     }
  25118. + #endif
  25119. + #else    /* KPOP */
  25120. + 
  25121.   #ifndef    DPOP
  25122.   #ifdef    BPOP
  25123.       if (isguest ()) {
  25124. ***************
  25125. *** 388,414 ****
  25126.       gw.pw_name = popbbuser;
  25127.       gw.pw_uid = guest_uid;
  25128.       pw = &gw;
  25129. ! #endif    TRUSTED
  25130.       guest = 1;
  25131.       goto anonymous;
  25132.       }
  25133. ! #endif    BPOP
  25134.       if ((pw = getpwnam (username)) == NULL
  25135.   #ifndef    SHADOW
  25136.           || *pw -> pw_passwd == NULL
  25137.           || strcmp (crypt (vec[1], pw -> pw_passwd), pw -> pw_passwd)) {
  25138. ! #else    SHADOW
  25139.           || (shpw = getspnam (username)) == NULL
  25140.           || *shpw -> sp_pwdp == NULL
  25141.           || strcmp (crypt (vec[1], shpw -> sp_pwdp), shpw -> sp_pwdp)) {
  25142. ! #endif    SHADOW
  25143.   #ifdef    TRUSTED
  25144.       trusted (0, hostname, NULLCP, 0, pw ? pw -> pw_name : username,
  25145.           pw && pw -> pw_uid == 0, POPSERVICE, "tcp", NULL);
  25146. ! #endif    TRUSTED
  25147.       return respond (NOTOK, "login incorrect");
  25148.       }
  25149. ! #else    DPOP
  25150.   #ifdef    BPOP
  25151.       if (isguest ()) {
  25152.       static struct bboard gw;
  25153. --- 482,508 ----
  25154.       gw.pw_name = popbbuser;
  25155.       gw.pw_uid = guest_uid;
  25156.       pw = &gw;
  25157. ! #endif    /* TRUSTED */
  25158.       guest = 1;
  25159.       goto anonymous;
  25160.       }
  25161. ! #endif    /* BPOP */
  25162.       if ((pw = getpwnam (username)) == NULL
  25163.   #ifndef    SHADOW
  25164.           || *pw -> pw_passwd == NULL
  25165.           || strcmp (crypt (vec[1], pw -> pw_passwd), pw -> pw_passwd)) {
  25166. ! #else    /* SHADOW */
  25167.           || (shpw = getspnam (username)) == NULL
  25168.           || *shpw -> sp_pwdp == NULL
  25169.           || strcmp (crypt (vec[1], shpw -> sp_pwdp), shpw -> sp_pwdp)) {
  25170. ! #endif    /* SHADOW */
  25171.   #ifdef    TRUSTED
  25172.       trusted (0, hostname, NULLCP, 0, pw ? pw -> pw_name : username,
  25173.           pw && pw -> pw_uid == 0, POPSERVICE, "tcp", NULL);
  25174. ! #endif    /* TRUSTED */
  25175.       return respond (NOTOK, "login incorrect");
  25176.       }
  25177. ! #else    /* DPOP */
  25178.   #ifdef    BPOP
  25179.       if (isguest ()) {
  25180.       static struct bboard gw;
  25181. ***************
  25182. *** 418,424 ****
  25183.       guest = 1;
  25184.       goto anonymous;
  25185.       }
  25186. ! #endif    BPOP
  25187.       if (((pw = getbbnam (username)) == NULL
  25188.           && (pw = getbbaka (username)) == NULL)
  25189.           || *pw -> bb_passwd == NULL
  25190. --- 512,518 ----
  25191.       guest = 1;
  25192.       goto anonymous;
  25193.       }
  25194. ! #endif    /* BPOP */
  25195.       if (((pw = getbbnam (username)) == NULL
  25196.           && (pw = getbbaka (username)) == NULL)
  25197.           || *pw -> bb_passwd == NULL
  25198. ***************
  25199. *** 426,451 ****
  25200.   #ifdef    TRUSTED
  25201.       trusted (0, hostname, NULLCP, 0, pw ? pw -> bb_name : username,
  25202.           0, POPSERVICE, "tcp", NULL);
  25203. ! #endif    TRUSTED
  25204.       return respond (NOTOK, "login incorrect");
  25205.       }
  25206. ! #endif    DPOP
  25207.   
  25208.   #ifdef    BPOP
  25209.   anonymous: ;
  25210. ! #endif    BPOP
  25211.   #ifdef    TRUSTED
  25212.       if (trusted (1, hostname, NULLCP, 0, myhost,
  25213.   #ifndef    DPOP
  25214.           pw -> pw_name, pw -> pw_uid == 0,
  25215. ! #else    DPOP
  25216.           pw -> bb_name, 0,
  25217. ! #endif    DPOP
  25218.           POPSERVICE, "tcp", NULL)
  25219.           == 0)
  25220.       return respond (NOTOK, "permission denied");
  25221. ! #endif    TRUSTED
  25222.       return setup (pw, guest);
  25223.   }
  25224.   
  25225.   /*   */
  25226. --- 520,546 ----
  25227.   #ifdef    TRUSTED
  25228.       trusted (0, hostname, NULLCP, 0, pw ? pw -> bb_name : username,
  25229.           0, POPSERVICE, "tcp", NULL);
  25230. ! #endif    /* TRUSTED */
  25231.       return respond (NOTOK, "login incorrect");
  25232.       }
  25233. ! #endif    /* DPOP */
  25234.   
  25235.   #ifdef    BPOP
  25236.   anonymous: ;
  25237. ! #endif    /* BPOP */
  25238.   #ifdef    TRUSTED
  25239.       if (trusted (1, hostname, NULLCP, 0, myhost,
  25240.   #ifndef    DPOP
  25241.           pw -> pw_name, pw -> pw_uid == 0,
  25242. ! #else    /* DPOP */
  25243.           pw -> bb_name, 0,
  25244. ! #endif    /* DPOP */
  25245.           POPSERVICE, "tcp", NULL)
  25246.           == 0)
  25247.       return respond (NOTOK, "permission denied");
  25248. ! #endif    /* TRUSTED */
  25249.       return setup (pw, guest);
  25250. + #endif /* KPOP */
  25251.   }
  25252.   
  25253.   /*   */
  25254. ***************
  25255. *** 477,483 ****
  25256.   
  25257.       return i;
  25258.   }
  25259. ! #endif    BPOP
  25260.   
  25261.   /*   */
  25262.   
  25263. --- 572,578 ----
  25264.   
  25265.       return i;
  25266.   }
  25267. ! #endif    /* BPOP */
  25268.   
  25269.   /*   */
  25270.   
  25271. ***************
  25272. *** 487,499 ****
  25273.   {
  25274.   #ifndef    DPOP
  25275.       register struct passwd *pw;
  25276. ! #else    DPOP
  25277.       register int hostok = 0;
  25278.       register char  *bp,
  25279.              *cp;
  25280.       char    buffer[BUFSIZ];
  25281.       register struct bboard *pw;
  25282. ! #endif    DPOP
  25283.   
  25284.   #ifndef    DPOP
  25285.       if (!rproto || (pw = getpwnam (username)) == NULL) {
  25286. --- 582,594 ----
  25287.   {
  25288.   #ifndef    DPOP
  25289.       register struct passwd *pw;
  25290. ! #else    /* DPOP */
  25291.       register int hostok = 0;
  25292.       register char  *bp,
  25293.              *cp;
  25294.       char    buffer[BUFSIZ];
  25295.       register struct bboard *pw;
  25296. ! #endif    /* DPOP */
  25297.   
  25298.   #ifndef    DPOP
  25299.       if (!rproto || (pw = getpwnam (username)) == NULL) {
  25300. ***************
  25301. *** 500,506 ****
  25302.   #ifdef    TRUSTED
  25303.       trusted (0, hostname, vec[1], 0, username, 0, "rpop", "tcp",
  25304.           NULL);
  25305. ! #endif    TRUSTED
  25306.       return respond (NOTOK, "login incorrect");
  25307.       }
  25308.       if (chdir (pw -> pw_dir) == NOTOK && chdir ("/") == NOTOK)
  25309. --- 595,601 ----
  25310.   #ifdef    TRUSTED
  25311.       trusted (0, hostname, vec[1], 0, username, 0, "rpop", "tcp",
  25312.           NULL);
  25313. ! #endif    /* TRUSTED */
  25314.       return respond (NOTOK, "login incorrect");
  25315.       }
  25316.       if (chdir (pw -> pw_dir) == NOTOK && chdir ("/") == NOTOK)
  25317. ***************
  25318. *** 509,518 ****
  25319.   #ifdef    TRUSTED
  25320.       trusted (0, hostname, vec[1], 0, pw -> pw_name,
  25321.          pw -> pw_uid == 0, "rpop", "tcp", NULL);
  25322. ! #endif    TRUSTED
  25323.       return respond (NOTOK, "permission denied");
  25324.       }
  25325. ! #else    DPOP
  25326.       if (!rproto
  25327.           || ((pw = getbbnam (username)) == NULL
  25328.           && (pw = getbbaka (username)) == NULL)) {
  25329. --- 604,613 ----
  25330.   #ifdef    TRUSTED
  25331.       trusted (0, hostname, vec[1], 0, pw -> pw_name,
  25332.          pw -> pw_uid == 0, "rpop", "tcp", NULL);
  25333. ! #endif    /* TRUSTED */
  25334.       return respond (NOTOK, "permission denied");
  25335.       }
  25336. ! #else    /* DPOP */
  25337.       if (!rproto
  25338.           || ((pw = getbbnam (username)) == NULL
  25339.           && (pw = getbbaka (username)) == NULL)) {
  25340. ***************
  25341. *** 519,525 ****
  25342.   #ifdef    TRUSTED
  25343.       trusted (0, hostname, vec[1], 0, username, 0, "rpop", "tcp",
  25344.           NULL);
  25345. ! #endif    TRUSTED
  25346.       return respond (NOTOK, "login incorrect");
  25347.       }
  25348.   /*
  25349. --- 614,620 ----
  25350.   #ifdef    TRUSTED
  25351.       trusted (0, hostname, vec[1], 0, username, 0, "rpop", "tcp",
  25352.           NULL);
  25353. ! #endif    /* TRUSTED */
  25354.       return respond (NOTOK, "login incorrect");
  25355.       }
  25356.   /*
  25357. ***************
  25358. *** 530,536 ****
  25359.       (void) sprintf (buffer, "%s@%s", vec[1], hostname);
  25360.       for (bp = pw -> bb_addr; bp; bp = cp) {
  25361.       if ((cp = index (bp, ',')))
  25362. !         *cp = NULL;
  25363.       hostok = uleq (bp, buffer);
  25364.       if (cp)
  25365.           *cp++ = ',';
  25366. --- 625,631 ----
  25367.       (void) sprintf (buffer, "%s@%s", vec[1], hostname);
  25368.       for (bp = pw -> bb_addr; bp; bp = cp) {
  25369.       if ((cp = index (bp, ',')))
  25370. !         *cp = 0;
  25371.       hostok = uleq (bp, buffer);
  25372.       if (cp)
  25373.           *cp++ = ',';
  25374. ***************
  25375. *** 541,574 ****
  25376.   #ifdef    TRUSTED
  25377.       trusted (0, hostname, vec[1], 0, pw -> bb_name, 0, "rpop",
  25378.           "tcp", NULL);
  25379. ! #endif    TRUSTED
  25380.       return respond (NOTOK, "permission denied");
  25381.       }
  25382. ! #endif    DPOP
  25383.   
  25384.   #ifdef    TRUSTED
  25385.       if (trusted (1, hostname, vec[1], 0, username,
  25386.   #ifndef    DPOP
  25387.           pw -> pw_uid == 0,
  25388. ! #else    DPOP
  25389.           0,
  25390. ! #endif    DPOP
  25391.           "rpop", "tcp", NULL)
  25392.           == 0)
  25393.       return respond (NOTOK, "permission denied");
  25394. ! #endif    TRUSTED
  25395.       return setup (pw, FALSE);
  25396.   }
  25397. ! #endif    RPOP
  25398.   
  25399.   /*   */
  25400.   
  25401.   static int setup (pw, guest)
  25402.   #ifndef    DPOP
  25403.   register struct passwd *pw;
  25404. ! #else    DPOP
  25405.   register struct bboard *pw;
  25406. ! #endif    DPOP
  25407.   int    guest;
  25408.   {
  25409.   #ifdef    BPOP
  25410. --- 636,761 ----
  25411.   #ifdef    TRUSTED
  25412.       trusted (0, hostname, vec[1], 0, pw -> bb_name, 0, "rpop",
  25413.           "tcp", NULL);
  25414. ! #endif    /* TRUSTED */
  25415.       return respond (NOTOK, "permission denied");
  25416.       }
  25417. ! #endif    /* DPOP */
  25418.   
  25419.   #ifdef    TRUSTED
  25420.       if (trusted (1, hostname, vec[1], 0, username,
  25421.   #ifndef    DPOP
  25422.           pw -> pw_uid == 0,
  25423. ! #else    /* DPOP */
  25424.           0,
  25425. ! #endif    /* DPOP */
  25426.           "rpop", "tcp", NULL)
  25427.           == 0)
  25428.       return respond (NOTOK, "permission denied");
  25429. ! #endif    /* TRUSTED */
  25430.       return setup (pw, FALSE);
  25431.   }
  25432. ! #endif    /* RPOP */
  25433.   
  25434.   /*   */
  25435.   
  25436. + #ifdef    APOP
  25437. + #include "popauth.h"
  25438. + #include "../../uip/md5.c"
  25439. + #include <ndbm.h>
  25440. + #include <sys/file.h>
  25441. + #ifdef    SYS5
  25442. + #include <fcntl.h>
  25443. + #endif
  25444. + 
  25445. + 
  25446. + static int apop (vec)
  25447. + register char  **vec;
  25448. + {
  25449. +     register char *cp;
  25450. +     char    buffer[BUFSIZ];
  25451. +     register unsigned char *dp;
  25452. +     unsigned char *ep,
  25453. +            digest[16];
  25454. + #ifndef    DPOP
  25455. +     register struct passwd *pw;
  25456. + #else
  25457. +     register struct bboard *pw;
  25458. + #endif
  25459. +     struct stat st;
  25460. +     datum   key,
  25461. +         value;
  25462. +     DBM       *db;
  25463. +     MD5_CTX mdContext;
  25464. +     struct authinfo auth;
  25465. + 
  25466. +     (void) strcpy (username, vec[1]);
  25467. + 
  25468. + #ifndef    DPOP
  25469. +     if ((pw = getpwnam (username)) == NULL
  25470. +         || *pw -> pw_passwd == NULL) {
  25471. +     return respond (NOTOK, "user invalid");
  25472. +     }
  25473. + #else
  25474. +     if (((pw = getbbnam (username)) == NULL
  25475. +         && (pw = getbbaka (username)) == NULL)
  25476. +         || *pw -> bb_passwd == NULL) {
  25477. +     return respond (NOTOK, "subscriber invalid");
  25478. +     }
  25479. + #endif
  25480. + 
  25481. +     if ((db = dbm_open (APOP, O_RDONLY, 0)) == NULL)
  25482. +     return respond (NOTOK, "POP authorization DB not available (%d)",
  25483. +             errno);
  25484. +     if (fstat (dbm_pagfno (db), &st) != NOTOK
  25485. +         && (st.st_mode & 0777) != 0600) {
  25486. +     dbm_close (db);
  25487. +     return respond (NOTOK, "POP authorization DB has wrong mode (0%o)",
  25488. +             st.st_mode & 0777);
  25489. +     }
  25490. +     if (flock (dbm_pagfno (db), LOCK_SH) == NOTOK) {
  25491. +     dbm_close (db);
  25492. +     return respond (NOTOK, "unable to lock POP authorization DB (%d)",
  25493. +             errno);
  25494. +     }
  25495. +     key.dsize = strlen (key.dptr = vec[1]) + 1;
  25496. +     value = dbm_fetch (db, key);
  25497. +     if (value.dptr == NULL) {
  25498. +     dbm_close (db);
  25499. +     return respond (NOTOK, "not authorized");
  25500. +     }
  25501. +     bcopy (value.dptr, (char *) &auth, sizeof auth);
  25502. +     (void) sprintf (cp = buffer, "%s%*.*s", timestamp, auth.auth_secretlen,
  25503. +             auth.auth_secretlen, auth.auth_secret);
  25504. + 
  25505. +     dbm_close (db);
  25506. + 
  25507. +     MD5Init (&mdContext);
  25508. +     MD5Update (&mdContext, (unsigned char *) buffer,
  25509. +            (unsigned int) (strlen (timestamp) + auth.auth_secretlen));
  25510. +     MD5Final (digest, &mdContext);
  25511. + 
  25512. +     cp = buffer;
  25513. +     for (ep = (dp = digest) + sizeof digest / sizeof digest[0];
  25514. +          dp < ep;
  25515. +          cp += 2)
  25516. +     (void) sprintf (cp, "%02x", *dp++ & 0xff);
  25517. +     *cp = NULL;
  25518. + 
  25519. +     if (strcmp (vec[2], buffer))
  25520. +     return respond (NOTOK, "authentication failure");
  25521. + 
  25522. +     return setup (pw, 0);
  25523. + }
  25524. + #endif
  25525. + 
  25526. + /*   */
  25527. + 
  25528.   static int setup (pw, guest)
  25529.   #ifndef    DPOP
  25530.   register struct passwd *pw;
  25531. ! #else    /* DPOP */
  25532.   register struct bboard *pw;
  25533. ! #endif    /* DPOP */
  25534.   int    guest;
  25535.   {
  25536.   #ifdef    BPOP
  25537. ***************
  25538. *** 576,610 ****
  25539.       (void) setgid (guest_gid);
  25540.   #ifndef    SYS5
  25541.       (void) initgroups (popbbuser, guest_gid);
  25542. ! #endif    SYS5
  25543.       (void) setuid (guest_uid);
  25544.       }
  25545.       else {
  25546. ! #endif    BPOP
  25547.   #ifndef    DPOP
  25548.       (void) setgid (pw -> pw_gid);
  25549.   #ifndef    SYS5
  25550.       (void) initgroups (pw -> pw_name, pw -> pw_gid);
  25551. ! #endif    SYS5
  25552.       (void) setuid (pw -> pw_uid);
  25553. ! #else    DPOP
  25554.       (void) setgid (pop_gid);
  25555.   #ifndef    SYS5
  25556.       (void) initgroups (POPUID, pop_gid);
  25557. ! #endif    SYS5
  25558.       (void) setuid (pop_uid);
  25559. ! #endif    DPOP
  25560.   #ifdef    BPOP
  25561.       }
  25562. ! #endif    BPOP
  25563.   
  25564.   #ifndef    DPOP
  25565.       (void) sprintf (maildrop, "%s/%s",
  25566.           mmdfldir && *mmdfldir ? mmdfldir : pw -> pw_dir,
  25567.           mmdflfil && *mmdflfil ? mmdflfil : pw -> pw_name);
  25568. ! #else    DPOP
  25569.       (void) strcpy (maildrop, pw -> bb_file);
  25570. ! #endif    DPOP
  25571.   
  25572.       if (setupaux (guest) == NOTOK)
  25573.       return NOTOK;
  25574. --- 763,797 ----
  25575.       (void) setgid (guest_gid);
  25576.   #ifndef    SYS5
  25577.       (void) initgroups (popbbuser, guest_gid);
  25578. ! #endif    /* SYS5 */
  25579.       (void) setuid (guest_uid);
  25580.       }
  25581.       else {
  25582. ! #endif    /* BPOP */
  25583.   #ifndef    DPOP
  25584.       (void) setgid (pw -> pw_gid);
  25585.   #ifndef    SYS5
  25586.       (void) initgroups (pw -> pw_name, pw -> pw_gid);
  25587. ! #endif    /* SYS5 */
  25588.       (void) setuid (pw -> pw_uid);
  25589. ! #else    /* DPOP */
  25590.       (void) setgid (pop_gid);
  25591.   #ifndef    SYS5
  25592.       (void) initgroups (POPUID, pop_gid);
  25593. ! #endif    /* SYS5 */
  25594.       (void) setuid (pop_uid);
  25595. ! #endif    /* DPOP */
  25596.   #ifdef    BPOP
  25597.       }
  25598. ! #endif    /* BPOP */
  25599.   
  25600.   #ifndef    DPOP
  25601.       (void) sprintf (maildrop, "%s/%s",
  25602.           mmdfldir && *mmdfldir ? mmdfldir : pw -> pw_dir,
  25603.           mmdflfil && *mmdflfil ? mmdflfil : pw -> pw_name);
  25604. ! #else    /* DPOP */
  25605.       (void) strcpy (maildrop, pw -> bb_file);
  25606. ! #endif    /* DPOP */
  25607.   
  25608.       if (setupaux (guest) == NOTOK)
  25609.       return NOTOK;
  25610. ***************
  25611. *** 616,622 ****
  25612.           nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  25613.       }
  25614.       else
  25615. ! #endif    POP2
  25616.       return respond (OK,
  25617.           nmsgs ? "maildrop has %d message%s (%d octets)" : "maildrop empty",
  25618.           nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  25619. --- 803,809 ----
  25620.           nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  25621.       }
  25622.       else
  25623. ! #endif    /* POP2 */
  25624.       return respond (OK,
  25625.           nmsgs ? "maildrop has %d message%s (%d octets)" : "maildrop empty",
  25626.           nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  25627. ***************
  25628. *** 633,639 ****
  25629.   
  25630.   #ifdef    BPOP
  25631.       xtnded = 0;
  25632. ! #endif    BPOP
  25633.       if ((dp = readonly ? fopen (maildrop, "r") : lkfopen (maildrop, "r"))
  25634.           == NULL)
  25635.       switch (errno) {
  25636. --- 820,826 ----
  25637.   
  25638.   #ifdef    BPOP
  25639.       xtnded = 0;
  25640. ! #endif    /* BPOP */
  25641.       if ((dp = readonly ? fopen (maildrop, "r") : lkfopen (maildrop, "r"))
  25642.           == NULL)
  25643.       switch (errno) {
  25644. ***************
  25645. *** 877,883 ****
  25646.       respond ('#', "0 unable to change folders");
  25647.       return NOTOK;
  25648.   }
  25649. ! #endif    POP2
  25650.   
  25651.   static int  list (vec)
  25652.   register char  **vec;
  25653. --- 1064,1070 ----
  25654.       respond ('#', "0 unable to change folders");
  25655.       return NOTOK;
  25656.   }
  25657. ! #endif    /* POP2 */
  25658.   
  25659.   static int  list (vec)
  25660.   register char  **vec;
  25661. ***************
  25662. *** 892,901 ****
  25663.   
  25664.   #ifndef    BPOP
  25665.       return respond (OK, "%d %d", i, Msgs[i].m_size);
  25666. ! #else    BPOP
  25667.       return respond (OK, xtnded ? "%d %d %d" : "%d %d",
  25668. !         i, Msgs[i].m_size, Msgs[i].m_id);
  25669. ! #endif    BPOP
  25670.       }
  25671.   
  25672.       (void) respond (OK, "%d message%s (%d octets)",
  25673. --- 1079,1113 ----
  25674.   
  25675.   #ifndef    BPOP
  25676.       return respond (OK, "%d %d", i, Msgs[i].m_size);
  25677. ! #else    /* BPOP */
  25678. ! #ifdef    MPOP
  25679. !     if (nfs && !xtnded) {
  25680. !         char   *cp;
  25681. ! 
  25682. !         (void) fseek (dp, Msgs[i].m_start, 0);
  25683. ! 
  25684. !         switch (scan (dp, i, 0, nfs, 0, 0, NULLCP,
  25685. !               (long) Msgs[i].m_size, 0)) {
  25686. !         case SCNMSG:
  25687. !         case SCNENC:
  25688. !         case SCNERR:
  25689. !             if (cp = index (scanl, '\n'))
  25690. !             *cp = NULL;
  25691. !             return respond (OK, "%d %d #%s",
  25692. !                     i, Msgs[i].m_size, scanl);
  25693. ! 
  25694. !         case SCNEOF:
  25695. !             return respond (OK, "%d %d #%*d  empty",
  25696. !                     i, Msgs[i].m_size, DMAXFOLDER, i);
  25697. ! 
  25698. !         default:
  25699. !             break;
  25700. !         }
  25701. !     }
  25702. ! #endif /* MPOP */
  25703.       return respond (OK, xtnded ? "%d %d %d" : "%d %d",
  25704. !             i, Msgs[i].m_size, Msgs[i].m_id);
  25705. ! #endif    /* BPOP */
  25706.       }
  25707.   
  25708.       (void) respond (OK, "%d message%s (%d octets)",
  25709. ***************
  25710. *** 902,914 ****
  25711.           nmsgs - dmsgs, nmsgs - dmsgs != 1 ? "s" : "",
  25712.           Msgs[0].m_size);
  25713.       for (i = 1; i <= nmsgs; i++)
  25714. !     if (!(Msgs[i].m_flags & MDELE))
  25715.   #ifndef BPOP
  25716.           multiline ("%d %d", i, Msgs[i].m_size);
  25717. ! #else    BPOP
  25718.           multiline (xtnded ? "%d %d %d" : "%d %d",
  25719. !             i, Msgs[i].m_size, Msgs[i].m_id);
  25720. ! #endif    BPOP
  25721.       multiend ();
  25722.   
  25723.       return OK;
  25724. --- 1114,1154 ----
  25725.           nmsgs - dmsgs, nmsgs - dmsgs != 1 ? "s" : "",
  25726.           Msgs[0].m_size);
  25727.       for (i = 1; i <= nmsgs; i++)
  25728. !     if (!(Msgs[i].m_flags & MDELE)) {
  25729.   #ifndef BPOP
  25730.           multiline ("%d %d", i, Msgs[i].m_size);
  25731. ! #else    /* BPOP */
  25732. ! #ifdef    MPOP
  25733. !         if (nfs && !xtnded) {
  25734. !         char   *cp;
  25735. ! 
  25736. !         (void) fseek (dp, Msgs[i].m_start, 0);
  25737. ! 
  25738. !         switch (scan (dp, i, 0, nfs, 0, 0, NULLCP,
  25739. !                   (long) Msgs[i].m_size, 0)) {
  25740. !             case SCNMSG:
  25741. !             case SCNENC:
  25742. !             case SCNERR:
  25743. !                 if (cp = index (scanl, '\n'))
  25744. !                 *cp = NULL;
  25745. !                 multiline ("%d %d #%s",
  25746. !                    i, Msgs[i].m_size, scanl);
  25747. !             continue;
  25748. ! 
  25749. !             case SCNEOF:
  25750. !             multiline ("%d %d #%*d  empty",
  25751. !                    i, Msgs[i].m_size, DMAXFOLDER, i);
  25752. !             continue;
  25753. ! 
  25754. !             default:
  25755. !             break;
  25756. !         }
  25757. !         }
  25758. ! #endif /* MPOP */
  25759.           multiline (xtnded ? "%d %d %d" : "%d %d",
  25760. !                i, Msgs[i].m_size, Msgs[i].m_id);
  25761. ! #endif    /* BPOP */
  25762. !     }
  25763.       multiend ();
  25764.   
  25765.       return OK;
  25766. ***************
  25767. *** 945,951 ****
  25768.           fgets (buffer, sizeof buffer, dp) != NULL && pos < Msgs[i].m_stop;
  25769.           pos += (long) (cp - buffer + 1)) {
  25770.       if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  25771. !         *cp = NULL;
  25772.       multiline ("%s", buffer);
  25773.       }
  25774.   #ifdef    POP2
  25775. --- 1185,1191 ----
  25776.           fgets (buffer, sizeof buffer, dp) != NULL && pos < Msgs[i].m_stop;
  25777.           pos += (long) (cp - buffer + 1)) {
  25778.       if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  25779. !         *cp = 0;
  25780.       multiline ("%s", buffer);
  25781.       }
  25782.   #ifdef    POP2
  25783. ***************
  25784. *** 1004,1009 ****
  25785. --- 1244,1259 ----
  25786.   
  25787.       Msgs[0].m_last = lastseen;
  25788.   
  25789. + #ifdef    MPOP
  25790. + #ifdef    BPOP
  25791. +     if (nfs) {
  25792. +     if (scanl)
  25793. +         free (scanl), scanl = NULL;
  25794. +     free (nfs), nfs = NULL;
  25795. +     }
  25796. + #endif
  25797. + #endif /* MPOP */
  25798. + 
  25799.       return status (vec);
  25800.   }
  25801.   
  25802. ***************
  25803. *** 1024,1030 ****
  25804.       return respond (NOTOK, "no such message: \"%s\"", vec[1]);
  25805.       if (Msgs[i].m_flags & MDELE)
  25806.       return respond (NOTOK, "message %d is deleted", i);
  25807. !     if ((j = atoi (vec[2])) <= 0)
  25808.       return respond (NOTOK, "bad number: \"%s\"", vec[2]);
  25809.   
  25810.       (void) respond (OK, vec[0]);
  25811. --- 1274,1280 ----
  25812.       return respond (NOTOK, "no such message: \"%s\"", vec[1]);
  25813.       if (Msgs[i].m_flags & MDELE)
  25814.       return respond (NOTOK, "message %d is deleted", i);
  25815. !     if ((j = atoi (vec[2])) < 0)
  25816.       return respond (NOTOK, "bad number: \"%s\"", vec[2]);
  25817.   
  25818.       (void) respond (OK, vec[0]);
  25819. ***************
  25820. *** 1034,1046 ****
  25821.           fgets (buffer, sizeof buffer, dp) != NULL && pos < Msgs[i].m_stop;
  25822.           pos += (long) (cp - buffer + 1)) {
  25823.       if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  25824. !         *cp = NULL;
  25825.       if (body) {
  25826.           if (lines++ >= j)
  25827.           break;
  25828.       }
  25829.       else
  25830. !         if (*buffer == NULL)
  25831.           body++;
  25832.       multiline ("%s", buffer);
  25833.       }
  25834. --- 1284,1296 ----
  25835.           fgets (buffer, sizeof buffer, dp) != NULL && pos < Msgs[i].m_stop;
  25836.           pos += (long) (cp - buffer + 1)) {
  25837.       if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  25838. !         *cp = 0;
  25839.       if (body) {
  25840.           if (lines++ >= j)
  25841.           break;
  25842.       }
  25843.       else
  25844. !         if (*buffer == 0)
  25845.           body++;
  25846.       multiline ("%s", buffer);
  25847.       }
  25848. ***************
  25849. *** 1051,1056 ****
  25850. --- 1301,1308 ----
  25851.   
  25852.   /*   */
  25853.   
  25854. + /* ARGSUSED */
  25855. + 
  25856.   static int  last (vec)  
  25857.   char  **vec;
  25858.   {
  25859. ***************
  25860. *** 1069,1074 ****
  25861. --- 1321,1330 ----
  25862.       return xtnd1 (vec);
  25863.       if (strcmp (vec[1], "x-bboards") == 0)
  25864.       return xtnd2 (vec);
  25865. + #ifdef    MPOP
  25866. +     if (strcmp (vec[1], "scan") == 0)
  25867. +     return xtnd3 (vec);
  25868. + #endif /* MPOP */
  25869.   
  25870.       return respond (NOTOK, "unknown XTND command: \"%s\"", vec[1]);
  25871.   }
  25872. ***************
  25873. *** 1263,1272 ****
  25874.       padvise (NULLCP, LOG_DEBUG, "updated: \"%s\", 0%o, %d, %s",
  25875.           bb -> bb_name, bb -> bb_flags, bb -> bb_maxima, bb -> bb_date);
  25876.   }
  25877. - #endif    BPOP
  25878.   
  25879.   /*   */
  25880.   
  25881.   static int  quit (vec)
  25882.   char   **vec;
  25883.   {
  25884. --- 1519,1548 ----
  25885.       padvise (NULLCP, LOG_DEBUG, "updated: \"%s\", 0%o, %d, %s",
  25886.           bb -> bb_name, bb -> bb_flags, bb -> bb_maxima, bb -> bb_date);
  25887.   }
  25888.   
  25889.   /*   */
  25890.   
  25891. + #ifdef    MPOP
  25892. + static int xtnd3 (vec)
  25893. + register char **vec;
  25894. + {
  25895. +     if (vec[2] == NULL)
  25896. +     return respond (NOTOK, "too few arguments to XTND \"%s\"", vec[1]);
  25897. +     if ((_sc_width = atoi (vec[2])) < WIDTH / 2)
  25898. +     _sc_width = WIDTH / 2;
  25899. +     nfs = new_fs (NULLCP, vec[3], FORMAT);
  25900. +     if (scanl)
  25901. +     (void) free (scanl), scanl = NULL;
  25902. + 
  25903. +     return respond (OK, vec[1]);
  25904. + }
  25905. + 
  25906. + int    sc_width () { return _sc_width; }
  25907. + #endif /* MPOP */
  25908. + #endif    /* BPOP */
  25909. + 
  25910. + /*   */
  25911. + 
  25912.   static int  quit (vec)
  25913.   char   **vec;
  25914.   {
  25915. ***************
  25916. *** 1281,1287 ****
  25917.   #ifdef    BPOP
  25918.       if (xtnded)
  25919.       return respond (OK, "%s signing off", server);
  25920. ! #endif    BPOP
  25921.   
  25922.       if (n == d)
  25923.       return respond (OK, "%s signing off (maildrop empty)", server);
  25924. --- 1557,1563 ----
  25925.   #ifdef    BPOP
  25926.       if (xtnded)
  25927.       return respond (OK, "%s signing off", server);
  25928. ! #endif    /* BPOP */
  25929.   
  25930.       if (n == d)
  25931.       return respond (OK, "%s signing off (maildrop empty)", server);
  25932. ***************
  25933. *** 1326,1335 ****
  25934.               map2[BUFSIZ];
  25935.       struct stat st;
  25936.   
  25937. !     if ((dmsgs == 0 && rmsgs == 0) || (Msgs[0].m_flags & MREAD))
  25938.       return OK;
  25939.   
  25940. - if(debug)padvise(NULLCP,LOG_DEBUG,"XXX: rmsgs=%d",rmsgs);
  25941.       if (fstat (fileno (dp), &st) == NOTOK)
  25942.       return respond (NOTOK, "unable to stat file");
  25943.       if (mtime != st.st_mtime)
  25944. --- 1602,1613 ----
  25945.               map2[BUFSIZ];
  25946.       struct stat st;
  25947.   
  25948. ! if(debug)padvise(NULLCP,LOG_DEBUG,"XXX: dmsgs=%d rmsgs=%d readonly=%d",
  25949. !          dmsgs, rmsgs, Msgs[0].m_flags & MREAD);
  25950. ! 
  25951. !     if (dmsgs == 0 || (Msgs[0].m_flags & MREAD))
  25952.       return OK;
  25953.   
  25954.       if (fstat (fileno (dp), &st) == NOTOK)
  25955.       return respond (NOTOK, "unable to stat file");
  25956.       if (mtime != st.st_mtime)
  25957. ***************
  25958. *** 1339,1348 ****
  25959.       if (nmsgs == dmsgs) {
  25960.   #ifndef    SYS5
  25961.       i = truncate (maildrop, 0);
  25962. ! #else    SYS5
  25963.       i = open (maildrop, O_WRONLY | O_TRUNC);
  25964.       if (i != NOTOK) (void) close (i);
  25965. ! #endif    SYS5
  25966.       (void) unlink (map_name (maildrop));/* XXX */
  25967.       if (i == NOTOK)
  25968.           return respond (NOTOK, "unable to zero %s", maildrop);
  25969. --- 1617,1626 ----
  25970.       if (nmsgs == dmsgs) {
  25971.   #ifndef    SYS5
  25972.       i = truncate (maildrop, 0);
  25973. ! #else    /* SYS5 */
  25974.       i = open (maildrop, O_WRONLY | O_TRUNC);
  25975.       if (i != NOTOK) (void) close (i);
  25976. ! #endif    /* SYS5 */
  25977.       (void) unlink (map_name (maildrop));/* XXX */
  25978.       if (i == NOTOK)
  25979.           return respond (NOTOK, "unable to zero %s", maildrop);
  25980. ***************
  25981. *** 1403,1413 ****
  25982.   
  25983.       for (i = 0; i < NVEC; i++) {
  25984.       while (isspace (*bp))
  25985. !         *bp++ = NULL;
  25986. !     if (*bp == NULL) {
  25987.           vec[i] = NULL;
  25988.           break;
  25989.       }
  25990.       vec[i] = bp;
  25991.       while (!isspace (*bp))
  25992.           bp++;
  25993. --- 1681,1715 ----
  25994.   
  25995.       for (i = 0; i < NVEC; i++) {
  25996.       while (isspace (*bp))
  25997. !         *bp++ = 0;
  25998. !     if (*bp == 0) {
  25999.           vec[i] = NULL;
  26000.           break;
  26001.       }
  26002. + 
  26003. +     if (*bp == '"') {
  26004. +         for (vec[i] = ++bp; *bp != '\0' && *bp != '"'; bp++)
  26005. +         if (*bp == '\\') {
  26006. +             switch (*++bp) {
  26007. +             case 'n':
  26008. +                 (void) strcpy (bp, bp + 1);
  26009. +                 *--bp = '\n';
  26010. +                 break;
  26011. + 
  26012. +             case '\\':
  26013. +             case '"':
  26014. +                 (void) strcpy (bp - 1, bp);
  26015. +                 /* and fall... */
  26016. +             default:
  26017. +                 bp--;
  26018. +                 break;
  26019. +             }
  26020. +         }
  26021. +         if (*bp == '"')
  26022. +         *bp++ = '\0';
  26023. +         continue;
  26024. +     }
  26025. +     
  26026.       vec[i] = bp;
  26027.       while (!isspace (*bp))
  26028.           bp++;
  26029. ***************
  26030. *** 1415,1425 ****
  26031.       i--;
  26032.       vec[NVEC] = NULL;
  26033.   
  26034. !     if (*bp != NULL) {
  26035.       (void) respond (NOTOK, "too many arguments");
  26036.       return NULL;
  26037.       }
  26038. !     if (*vec[0] == NULL) {
  26039.       (void) respond (NOTOK, "null command");
  26040.       return NULL;
  26041.       }
  26042. --- 1717,1727 ----
  26043.       i--;
  26044.       vec[NVEC] = NULL;
  26045.   
  26046. !     if (*bp != 0) {
  26047.       (void) respond (NOTOK, "too many arguments");
  26048.       return NULL;
  26049.       }
  26050. !     if (*vec[0] == 0) {
  26051.       (void) respond (NOTOK, "null command");
  26052.       return NULL;
  26053.       }
  26054. ***************
  26055. *** 1531,1539 ****
  26056.       return NOTOK;
  26057.       if (c == EOF && p == s)
  26058.       return DONE;
  26059. !     *p++ = NULL;
  26060. !     if (debug)
  26061.       padvise (NULLCP, LOG_DEBUG, "<--- %s", s);
  26062.   
  26063.       return OK;
  26064.   }
  26065. --- 1833,1847 ----
  26066.       return NOTOK;
  26067.       if (c == EOF && p == s)
  26068.       return DONE;
  26069. !     if (debug) {
  26070. !     if (*--p == '\n')
  26071. !         *p = 0;
  26072.       padvise (NULLCP, LOG_DEBUG, "<--- %s", s);
  26073. +     if (*p == 0)
  26074. +         *p = '\n';
  26075. +     p++;
  26076. +     }
  26077. +     *p++ = 0;
  26078.   
  26079.       return OK;
  26080.   }
  26081. ***************
  26082. *** 1645,1652 ****
  26083.   {
  26084.       register int    len,
  26085.                       size;
  26086. -     long    ld1,
  26087. -             ld2;
  26088.       register char  *bp;
  26089.       char    buffer[BUFSIZ];
  26090.       register struct drop   *cp,
  26091. --- 1953,1958 ----
  26092. ***************
  26093. *** 1654,1659 ****
  26094. --- 1960,1971 ----
  26095.                              *ep,
  26096.                              *pp;
  26097.   
  26098. + /* MTR: tsk, tsk, tsk... */
  26099. +     (void) fseek (fp, pos, 0);
  26100. +     if (fgets (buffer, sizeof buffer, fp)
  26101. +         && strcmp (buffer, mmdlm1) == 0)
  26102. +     return mbx_read (fp, pos, drops, noisy);
  26103. + 
  26104.       /* get drop storage */
  26105.       pp = (struct drop  *) calloc ((unsigned) (len = MAXFOLDER), sizeof *dp);
  26106.   
  26107. ***************
  26108. *** 1666,1675 ****
  26109.           admonish (NULLCP, "unable to allocate drop storage");
  26110.       return NOTOK;
  26111.       }
  26112. - 
  26113. -     /* get sizes of msg delimiters */
  26114. -     ld1 = (long) strlen (mmdlm1);
  26115. -     ld2 = (long) strlen (mmdlm2);
  26116.   
  26117.       /* rewind drop file */
  26118.       (void) fseek (fp, pos, 0);
  26119. --- 1978,1983 ----
  26120. *** ../mh-6.7.2/support/pop/popwrd.c    Thu Apr  5 16:02:50 1990
  26121. --- support/pop/popwrd.c    Mon Dec 14 16:20:56 1992
  26122. ***************
  26123. *** 1,7 ****
  26124.   /* popwrd.c - set password for a POP subscriber */
  26125.   #ifndef    lint
  26126. ! static char ident[] = "@(#)$Id: popwrd.c,v 1.5 90/04/05 15:34:47 sources Exp $";
  26127. ! #endif    lint
  26128.   
  26129.   #include "../h/strings.h"
  26130.   #include "../zotnet/bboards.h"
  26131. --- 1,7 ----
  26132.   /* popwrd.c - set password for a POP subscriber */
  26133.   #ifndef    lint
  26134. ! static char ident[] = "@(#)$Id: popwrd.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  26135. ! #endif    /* lint */
  26136.   
  26137.   #include "../h/strings.h"
  26138.   #include "../zotnet/bboards.h"
  26139. ***************
  26140. *** 13,20 ****
  26141.   #include <sys/file.h>
  26142.   #ifdef    SYS5
  26143.   #include <fcntl.h>
  26144. ! #endif    SYS5
  26145.   
  26146.   
  26147.   static char  temp[] = "ptmp";
  26148.   static char  home[BUFSIZ];
  26149. --- 13,25 ----
  26150.   #include <sys/file.h>
  26151.   #ifdef    SYS5
  26152.   #include <fcntl.h>
  26153. ! #endif    /* SYS5 */
  26154.   
  26155. + #ifndef    __STDC__
  26156. + #ifdef    SYS5
  26157. + struct passwd *getpwnam();
  26158. + #endif
  26159. + #endif
  26160.   
  26161.   static char  temp[] = "ptmp";
  26162.   static char  home[BUFSIZ];
  26163. ***************
  26164. *** 85,91 ****
  26165.   
  26166.   #ifdef    lint
  26167.       flags = 0;
  26168. ! #endif    lint
  26169.       for (insist = 0; insist < 2; insist++) {
  26170.       if (insist)
  26171.           printf ("Please use %s.\n",
  26172. --- 90,96 ----
  26173.   
  26174.   #ifdef    lint
  26175.       flags = 0;
  26176. ! #endif    /* lint */
  26177.       for (insist = 0; insist < 2; insist++) {
  26178.       if (insist)
  26179.           printf ("Please use %s.\n",
  26180. ***************
  26181. *** 155,161 ****
  26182.   
  26183.   #ifdef    SIGTSTP
  26184.       (void) signal (SIGTSTP, SIG_IGN);
  26185. ! #endif    SIGTSTP
  26186.       if ((fp = fdopen (fd, "w")) == NULL) {
  26187.       fprintf (stderr, "fdopen loses.\n");
  26188.       (void) unlink (temp);
  26189. --- 160,166 ----
  26190.   
  26191.   #ifdef    SIGTSTP
  26192.       (void) signal (SIGTSTP, SIG_IGN);
  26193. ! #endif    /* SIGTSTP */
  26194.       if ((fp = fdopen (fd, "w")) == NULL) {
  26195.       fprintf (stderr, "fdopen loses.\n");
  26196.       (void) unlink (temp);
  26197. *** ../mh-6.7.2/support/pop/syslog.c    Thu Apr  5 16:02:51 1990
  26198. --- support/pop/syslog.c    Mon Dec 14 16:20:57 1992
  26199. ***************
  26200. *** 3,10 ****
  26201.   static char SccsId[] =    "@(#)syslog.c    4.1 (Berkeley) 5/27/83";
  26202.   #endif
  26203.   #ifndef    lint
  26204. ! static char ident[] = "@(#)$Id: syslog.c,v 1.5 90/04/05 15:34:53 sources Exp $";
  26205. ! #endif    lint
  26206.   
  26207.   /*
  26208.    * SYSLOG -- print message on log file
  26209. --- 3,10 ----
  26210.   static char SccsId[] =    "@(#)syslog.c    4.1 (Berkeley) 5/27/83";
  26211.   #endif
  26212.   #ifndef    lint
  26213. ! static char ident[] = "@(#)$Id: syslog.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  26214. ! #endif    /* lint */
  26215.   
  26216.   /*
  26217.    * SYSLOG -- print message on log file
  26218. ***************
  26219. *** 27,33 ****
  26220. --- 27,35 ----
  26221.   
  26222.   #define    MAXLINE    1024        /* max message size */
  26223.   #define BUFSLOP    20        /* space to allow for "extra stuff" */
  26224. + #ifndef NULL
  26225.   #define NULL    0        /* manifest */
  26226. + #endif
  26227.   
  26228.   #define LOG_COOLIT    LOG_LOCAL0    /* local syslog code */
  26229.   #define LOG_DGRAM    LOG_LOCAL1    /* idem */
  26230. ***************
  26231. *** 34,44 ****
  26232.   
  26233.   #ifndef    LOG_HOST
  26234.   #define LOG_HOST    "localhost"    /* host where syslogd is running */
  26235. ! #endif    LOG_HOST
  26236.   
  26237.   int    LogFile = -1;        /* fd for log */
  26238.   int    LogStat    = 0;        /* status bits, set by initlog */
  26239. ! char    *LogTag = NULL;        /* string to tag the entry with */
  26240.   int    LogMask = LOG_DEBUG;    /* lowest priority to be logged */
  26241.   
  26242.   struct sockaddr_in SyslogAddr;
  26243. --- 36,46 ----
  26244.   
  26245.   #ifndef    LOG_HOST
  26246.   #define LOG_HOST    "localhost"    /* host where syslogd is running */
  26247. ! #endif    /* LOG_HOST */
  26248.   
  26249.   int    LogFile = -1;        /* fd for log */
  26250.   int    LogStat    = 0;        /* status bits, set by initlog */
  26251. ! char    *LogTag = (char *)NULL;    /* string to tag the entry with */
  26252.   int    LogMask = LOG_DEBUG;    /* lowest priority to be logged */
  26253.   
  26254.   struct sockaddr_in SyslogAddr;
  26255. ***************
  26256. *** 81,91 ****
  26257.               }
  26258.               c = *f++;
  26259.               if (c != 'm') {
  26260. ! #ifndef    UCI
  26261.                   *b++ = '%', *b++ = c, *b++ = '\0';
  26262. ! #else    UCI
  26263.                   *b++ = '%', *b++ = c;
  26264. ! #endif    UCI
  26265.                   continue;
  26266.               }
  26267.               if ((unsigned)errno > sys_nerr)
  26268. --- 83,93 ----
  26269.               }
  26270.               c = *f++;
  26271.               if (c != 'm') {
  26272. ! #ifndef    notdef
  26273.                   *b++ = '%', *b++ = c, *b++ = '\0';
  26274. ! #else
  26275.                   *b++ = '%', *b++ = c;
  26276. ! #endif
  26277.                   continue;
  26278.               }
  26279.               if ((unsigned)errno > sys_nerr)
  26280. ***************
  26281. *** 158,161 ****
  26282.       (void) close(LogFile);
  26283.       LogFile = -1;
  26284.   }
  26285. ! #endif    not BSD43
  26286. --- 160,163 ----
  26287.       (void) close(LogFile);
  26288.       LogFile = -1;
  26289.   }
  26290. ! #endif    /* not BSD43 */
  26291. *** ../mh-6.7.2/uip/ali.c    Thu Apr  5 16:03:56 1990
  26292. --- uip/ali.c    Mon Dec 14 16:20:58 1992
  26293. ***************
  26294. *** 1,12 ****
  26295.   /* ali.c - the new ali */
  26296.   #ifndef    lint
  26297. ! static char ident[] = "@(#)$Id: ali.c,v 1.3 90/04/05 15:03:38 sources Exp $";
  26298. ! #endif    lint
  26299.   
  26300.   #include "../h/mh.h"
  26301.   #include "../h/addrsbr.h"
  26302.   #include "../h/aliasbr.h"
  26303.   #include <stdio.h>
  26304.   
  26305.   
  26306.   #define    NVEC    50        /* maximum number of names */
  26307. --- 1,15 ----
  26308.   /* ali.c - the new ali */
  26309.   #ifndef    lint
  26310. ! static char ident[] = "@(#)$Id: ali.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  26311. ! #endif    /* lint */
  26312.   
  26313.   #include "../h/mh.h"
  26314.   #include "../h/addrsbr.h"
  26315.   #include "../h/aliasbr.h"
  26316.   #include <stdio.h>
  26317. + #ifdef LOCALE
  26318. + #include    <locale.h>
  26319. + #endif
  26320.   
  26321.   
  26322.   #define    NVEC    50        /* maximum number of names */
  26323. ***************
  26324. *** 37,43 ****
  26325.   #define    HELPSW    8
  26326.       "help", 4,
  26327.   
  26328. !     NULL, NULL
  26329.   };
  26330.   
  26331.   /*   */
  26332. --- 40,46 ----
  26333.   #define    HELPSW    8
  26334.       "help", 4,
  26335.   
  26336. !     NULL, 0
  26337.   };
  26338.   
  26339.   /*   */
  26340. ***************
  26341. *** 68,73 ****
  26342. --- 71,79 ----
  26343.              *arguments[MAXARGS];
  26344.       struct aka *ak;
  26345.   
  26346. + #ifdef LOCALE
  26347. +     setlocale(LC_ALL, "");
  26348. + #endif
  26349.       invo_name = r1bindex (argv[0], '/');
  26350.       mts_init (invo_name);
  26351.       if ((cp = m_find (invo_name)) != NULL) {
  26352. ***************
  26353. *** 132,140 ****
  26354.   
  26355.       if (!noalias) {
  26356.       (void) alias (AliasFile);
  26357. !     if (cp = m_find ("Aliasfile"))    /* allow Aliasfile: profile entry */
  26358. !         if ((i = alias (cp)) != AK_OK)
  26359. !         adios (NULLCP, "aliasing error in %s - %s", cp, akerror (i));
  26360.       }
  26361.       
  26362.   
  26363. --- 138,153 ----
  26364.   
  26365.       if (!noalias) {
  26366.       (void) alias (AliasFile);
  26367. !     if (cp = m_find ("Aliasfile")) { /* allow Aliasfile: profile entry */
  26368. !         char *dp = NULL;
  26369. ! 
  26370. !         for (ap = brkstring(dp = getcpy(cp), " ", "\n"); ap && *ap; ap++)
  26371. !         if ((i = alias (*ap)) != AK_OK)
  26372. !             adios (NULLCP,
  26373. !                 "aliasing error in %s - %s", *ap, akerror (i));
  26374. !         if (dp)
  26375. !         free(dp);
  26376. !     }
  26377.       }
  26378.       
  26379.   
  26380. ***************
  26381. *** 148,154 ****
  26382.           print_aka (akvalue (vec[i]), list, 0);
  26383.       else {
  26384.       if (inverted)
  26385. !         adios (NULLCP, "usage: %s addresses ...  (you forgot the addresses)",
  26386.           invo_name);
  26387.   
  26388.       for (ak = akahead; ak; ak = ak -> ak_next) {
  26389. --- 161,168 ----
  26390.           print_aka (akvalue (vec[i]), list, 0);
  26391.       else {
  26392.       if (inverted)
  26393. !         adios (NULLCP,
  26394. !             "usage: %s -user addresses ...  (you forgot the addresses)",
  26395.           invo_name);
  26396.   
  26397.       for (ak = akahead; ak; ak = ak -> ak_next) {
  26398. ***************
  26399. *** 191,197 ****
  26400.                   pos += 2;
  26401.               }
  26402.   
  26403. !         case NULL: 
  26404.           break;
  26405.   
  26406.           default: 
  26407. --- 205,211 ----
  26408.                   pos += 2;
  26409.               }
  26410.   
  26411. !         case 0: 
  26412.           break;
  26413.   
  26414.           default: 
  26415. ***************
  26416. *** 244,251 ****
  26417. --- 258,269 ----
  26418.       }
  26419.       mnfree (mp);
  26420.   
  26421. + #ifdef    notdef
  26422.       printf ("%s: ", s);
  26423.       print_aka (vp ? vp : s, list, pos += strlen (s) + 1);
  26424. + #else
  26425. +     print_aka (vp ? vp : s, list, 0);
  26426. + #endif
  26427.       if (vp)
  26428.       free (vp);
  26429.   }
  26430. *** ../mh-6.7.2/uip/aliasbr.c    Thu Apr  5 16:03:33 1990
  26431. --- uip/aliasbr.c    Mon Dec 14 16:20:59 1992
  26432. ***************
  26433. *** 1,7 ****
  26434.   /* aliasbr.c - new aliasing mechanism */
  26435.   #ifndef    lint
  26436. ! static char ident[] = "@(#)$Id: aliasbr.c,v 1.7 90/04/05 14:59:03 sources Exp $";
  26437. ! #endif    lint
  26438.   
  26439.   #include "../h/mh.h"
  26440.   #include "../h/aliasbr.h"
  26441. --- 1,7 ----
  26442.   /* aliasbr.c - new aliasing mechanism */
  26443.   #ifndef    lint
  26444. ! static char ident[] = "@(#)$Id: aliasbr.c,v 1.13 1992/12/15 00:20:22 jromine Exp $";
  26445. ! #endif    /* lint */
  26446.   
  26447.   #include "../h/mh.h"
  26448.   #include "../h/aliasbr.h"
  26449. ***************
  26450. *** 26,33 ****
  26451. --- 26,37 ----
  26452.   static        add_aka();
  26453.   static int    aleq(), addfile(), addgroup(), addmember(), addall();
  26454.   
  26455. + #ifndef    __STDC__
  26456. + #ifdef    SYS5
  26457.   struct passwd  *getpwent ();
  26458.   struct group   *getgrnam (), *getgrgid ();
  26459. + #endif
  26460. + #endif
  26461.   
  26462.   /*   */
  26463.   
  26464. ***************
  26465. *** 110,116 ****
  26466.           else
  26467.           aliasent++;
  26468.   
  26469. !     return (*aliasent == NULL || *aliasent == '*');
  26470.   }
  26471.   
  26472.   /*   */
  26473. --- 114,120 ----
  26474.           else
  26475.           aliasent++;
  26476.   
  26477. !     return (*aliasent == 0 || *aliasent == '*');
  26478.   }
  26479.   
  26480.   /*   */
  26481. ***************
  26482. *** 152,158 ****
  26483.           case ':':         /* comment */
  26484.           case ';': 
  26485.           case '#':
  26486. !         case NULL: 
  26487.           continue;
  26488.       }
  26489.   
  26490. --- 156,162 ----
  26491.           case ':':         /* comment */
  26492.           case ';': 
  26493.           case '#':
  26494. !         case 0: 
  26495.           continue;
  26496.       }
  26497.   
  26498. ***************
  26499. *** 180,186 ****
  26500.       }
  26501.   
  26502.       switch (*(pp = scanp (ap))) {
  26503. !         case NULL:         /* EOL */
  26504.           (void) fclose (fp);
  26505.           return AK_ERROR;
  26506.   
  26507. --- 184,190 ----
  26508.       }
  26509.   
  26510.       switch (*(pp = scanp (ap))) {
  26511. !         case 0:         /* EOL */
  26512.           (void) fclose (fp);
  26513.           return AK_ERROR;
  26514.   
  26515. ***************
  26516. *** 283,289 ****
  26517.       p = cp;
  26518.       while (!isspace (*cp) && *cp)
  26519.       cp++;
  26520. !     *cp = NULL;
  26521.   
  26522.       return p;
  26523.   }
  26524. --- 287,293 ----
  26525.       p = cp;
  26526.       while (!isspace (*cp) && *cp)
  26527.       cp++;
  26528. !     *cp = 0;
  26529.   
  26530.       return p;
  26531.   }
  26532. ***************
  26533. *** 300,306 ****
  26534.       while (!isspace (*cp) && *cp && *cp != ':' && *cp != ';')
  26535.       cp++;
  26536.       *c = *cp;
  26537. !     *cp++ = NULL;
  26538.       *a = cp;
  26539.   
  26540.       return p;
  26541. --- 304,310 ----
  26542.       while (!isspace (*cp) && *cp && *cp != ':' && *cp != ';')
  26543.       cp++;
  26544.       *c = *cp;
  26545. !     *cp++ = 0;
  26546.       *a = cp;
  26547.   
  26548.       return p;
  26549. ***************
  26550. *** 318,324 ****
  26551.   
  26552.       if ((fp = fopen (libpath (file), "r")) == NULL) {
  26553.       akerrst = file;
  26554. !     return NULL;
  26555.       }
  26556.   
  26557.       while (fgets (buffer, sizeof buffer, fp) != NULL)
  26558. --- 322,328 ----
  26559.   
  26560.       if ((fp = fopen (libpath (file), "r")) == NULL) {
  26561.       akerrst = file;
  26562. !     return 0;
  26563.       }
  26564.   
  26565.       while (fgets (buffer, sizeof buffer, fp) != NULL)
  26566. ***************
  26567. *** 343,367 ****
  26568.       gr = getgrgid (atoi (grp));
  26569.       if (!gr) {
  26570.       akerrst = grp;
  26571. !     return NULL;
  26572.       }
  26573.   
  26574. ! #ifndef DBM
  26575.       if (homehead == NULL)
  26576.       init_pw ();
  26577. ! #endif /* DBM */
  26578.   
  26579.       while (gp = *gr -> gr_mem++)
  26580. ! #ifdef DBM
  26581.       {
  26582.       struct passwd *pw;
  26583. ! #endif /* DBM */
  26584.       for (hm = homehead; hm; hm = hm -> h_next)
  26585.           if (!strcmp (hm -> h_name, gp)) {
  26586.           add_aka (ak, hm -> h_name);
  26587.           break;
  26588.           }
  26589. ! #ifdef DBM
  26590.           if (pw = getpwnam(gp))
  26591.       {
  26592.           hmalloc(pw);
  26593. --- 347,371 ----
  26594.       gr = getgrgid (atoi (grp));
  26595.       if (!gr) {
  26596.       akerrst = grp;
  26597. !     return 0;
  26598.       }
  26599.   
  26600. ! #ifndef DBMPWD
  26601.       if (homehead == NULL)
  26602.       init_pw ();
  26603. ! #endif /* DBMPWD */
  26604.   
  26605.       while (gp = *gr -> gr_mem++)
  26606. ! #ifdef DBMPWD
  26607.       {
  26608.       struct passwd *pw;
  26609. ! #endif /* DBMPWD */
  26610.       for (hm = homehead; hm; hm = hm -> h_next)
  26611.           if (!strcmp (hm -> h_name, gp)) {
  26612.           add_aka (ak, hm -> h_name);
  26613.           break;
  26614.           }
  26615. ! #ifdef DBMPWD
  26616.           if (pw = getpwnam(gp))
  26617.       {
  26618.           hmalloc(pw);
  26619. ***************
  26620. *** 368,374 ****
  26621.           add_aka (ak, gp);
  26622.       }
  26623.       }
  26624. ! #endif /* DBM */
  26625.   
  26626.       return 1;
  26627.   }
  26628. --- 372,378 ----
  26629.           add_aka (ak, gp);
  26630.       }
  26631.       }
  26632. ! #endif /* DBMPWD */
  26633.   
  26634.       return 1;
  26635.   }
  26636. ***************
  26637. *** 391,402 ****
  26638.       }
  26639.       if (!gr) {
  26640.       akerrst = grp;
  26641. !     return NULL;
  26642.       }
  26643.   
  26644. ! #ifndef DBM
  26645.       if (homehead == NULL)
  26646. ! #endif /* DBM */
  26647.       init_pw ();
  26648.   
  26649.       for (hm = homehead; hm; hm = hm -> h_next)
  26650. --- 395,406 ----
  26651.       }
  26652.       if (!gr) {
  26653.       akerrst = grp;
  26654. !     return 0;
  26655.       }
  26656.   
  26657. ! #ifndef DBMPWD
  26658.       if (homehead == NULL)
  26659. ! #endif /* DBMPWD */
  26660.       init_pw ();
  26661.   
  26662.       for (hm = homehead; hm; hm = hm -> h_next)
  26663. ***************
  26664. *** 411,426 ****
  26665.   static    int addall (ak)
  26666.   register struct aka *ak;
  26667.   {
  26668. !     int     noshell = NoShell == NULLCP || *NoShell == NULL;
  26669.       register struct home   *hm;
  26670.   
  26671. ! #ifndef DBM
  26672.       if (homehead == NULL)
  26673. ! #endif /* DBM */
  26674.       init_pw ();
  26675. - #ifndef DBM
  26676.       if (Everyone < 0)
  26677. - #endif /* DBM */
  26678.       Everyone = EVERYONE;
  26679.   
  26680.       for (hm = homehead; hm; hm = hm -> h_next)
  26681. --- 415,428 ----
  26682.   static    int addall (ak)
  26683.   register struct aka *ak;
  26684.   {
  26685. !     int     noshell = NoShell == NULLCP || *NoShell == 0;
  26686.       register struct home   *hm;
  26687.   
  26688. ! #ifndef DBMPWD
  26689.       if (homehead == NULL)
  26690. ! #endif /* DBMPWD */
  26691.       init_pw ();
  26692.       if (Everyone < 0)
  26693.       Everyone = EVERYONE;
  26694.   
  26695.       for (hm = homehead; hm; hm = hm -> h_next)
  26696. ***************
  26697. *** 443,463 ****
  26698.       if (cp == NULL)
  26699.       cp = addrs;
  26700.       else
  26701. !     if (*cp == NULL)
  26702.           return (cp = NULL);
  26703.   
  26704.       for (pp = cp; isspace (*pp); pp++)
  26705.       continue;
  26706. !     if (*pp == NULL)
  26707.       return (cp = NULL);
  26708. !     for (qp = pp; *qp != NULL && *qp != ','; qp++)
  26709.       continue;
  26710.       if (*qp == ',')
  26711. !     *qp++ = NULL;
  26712.       for (cp = qp, qp--; qp > pp; qp--)
  26713. !     if (*qp != NULL)
  26714.           if (isspace (*qp))
  26715. !         *qp = NULL;
  26716.           else
  26717.           break;
  26718.   
  26719. --- 445,465 ----
  26720.       if (cp == NULL)
  26721.       cp = addrs;
  26722.       else
  26723. !     if (*cp == 0)
  26724.           return (cp = NULL);
  26725.   
  26726.       for (pp = cp; isspace (*pp); pp++)
  26727.       continue;
  26728. !     if (*pp == 0)
  26729.       return (cp = NULL);
  26730. !     for (qp = pp; *qp != 0 && *qp != ','; qp++)
  26731.       continue;
  26732.       if (*qp == ',')
  26733. !     *qp++ = 0;
  26734.       for (cp = qp, qp--; qp > pp; qp--)
  26735. !     if (*qp != 0)
  26736.           if (isspace (*qp))
  26737. !         *qp = 0;
  26738.           else
  26739.           break;
  26740.   
  26741. ***************
  26742. *** 492,498 ****
  26743.   
  26744.   init_pw () {
  26745.       register struct passwd  *pw;
  26746. ! #ifdef DBM
  26747.       static int       init;
  26748.     
  26749.       if (!init)
  26750. --- 494,500 ----
  26751.   
  26752.   init_pw () {
  26753.       register struct passwd  *pw;
  26754. ! #ifdef DBMPWD
  26755.       static int       init;
  26756.     
  26757.       if (!init)
  26758. ***************
  26759. *** 502,508 ****
  26760.           homehead=NULL;
  26761.           hometail=NULL;
  26762.           init++;
  26763. ! #endif /* DBM */
  26764.   
  26765.       (void) setpwent ();
  26766.   
  26767. --- 504,510 ----
  26768.           homehead=NULL;
  26769.           hometail=NULL;
  26770.           init++;
  26771. ! #endif /* DBMPWD */
  26772.   
  26773.       (void) setpwent ();
  26774.   
  26775. ***************
  26776. *** 511,519 ****
  26777.           break;
  26778.   
  26779.       (void) endpwent ();
  26780. ! #ifdef DBM
  26781.       }
  26782. ! #endif /* DBM */
  26783.   }
  26784.   
  26785.   /*   */
  26786. --- 513,521 ----
  26787.           break;
  26788.   
  26789.       (void) endpwent ();
  26790. ! #ifdef DBMPWD
  26791.       }
  26792. ! #endif /* DBMPWD */
  26793.   }
  26794.   
  26795.   /*   */
  26796. ***************
  26797. *** 555,561 ****
  26798.       p -> h_shell = getcpy (pw -> pw_shell);
  26799.   #ifdef    BSD42
  26800.       p -> h_ngrps = 0;
  26801. ! #endif    BSD42
  26802.       p -> h_next = NULL;
  26803.       if (hometail != NULL)
  26804.       hometail -> h_next = p;
  26805. --- 557,563 ----
  26806.       p -> h_shell = getcpy (pw -> pw_shell);
  26807.   #ifdef    BSD42
  26808.       p -> h_ngrps = 0;
  26809. ! #endif    /* BSD42 */
  26810.       p -> h_next = NULL;
  26811.       if (hometail != NULL)
  26812.       hometail -> h_next = p;
  26813. ***************
  26814. *** 573,596 ****
  26815.   register char   *name;
  26816.   {
  26817.       register struct home *hp;
  26818. ! #ifdef DBM
  26819.       struct passwd *pw;
  26820.       char lname[32];
  26821.       char *c,*c1;
  26822. ! #else  /* DBM */
  26823.   
  26824.       if (homehead == NULL)
  26825.       init_pw ();
  26826. ! #endif /* DBM */
  26827.   
  26828.       for (hp = homehead; hp; hp = hp -> h_next)
  26829.       if (uleq (name, hp -> h_name))
  26830.           return hp;
  26831.   
  26832. ! #ifdef DBM       /* The only place where there might be problems */
  26833.                   /* This assumes that ALL usernames are kept in lowercase */
  26834.       for (c = name,c1 = lname; *c; c++, c1++)
  26835. !         if (isupper(*c))
  26836.           *c1 = tolower(*c);
  26837.       else
  26838.           *c1 = *c;
  26839. --- 575,598 ----
  26840.   register char   *name;
  26841.   {
  26842.       register struct home *hp;
  26843. ! #ifdef DBMPWD
  26844.       struct passwd *pw;
  26845.       char lname[32];
  26846.       char *c,*c1;
  26847. ! #else  /* DBMPWD */
  26848.   
  26849.       if (homehead == NULL)
  26850.       init_pw ();
  26851. ! #endif /* DBMPWD */
  26852.   
  26853.       for (hp = homehead; hp; hp = hp -> h_next)
  26854.       if (uleq (name, hp -> h_name))
  26855.           return hp;
  26856.   
  26857. ! #ifdef DBMPWD       /* The only place where there might be problems */
  26858.                   /* This assumes that ALL usernames are kept in lowercase */
  26859.       for (c = name,c1 = lname; *c; c++, c1++)
  26860. !         if (isalpha(*c) && isupper(*c))
  26861.           *c1 = tolower(*c);
  26862.       else
  26863.           *c1 = *c;
  26864. ***************
  26865. *** 597,604 ****
  26866.       *c1 = NULL;
  26867.       if (pw = getpwnam(lname))
  26868.       return(hmalloc(pw));
  26869. ! #endif /* DBM */
  26870.       
  26871.       return NULL;
  26872.   }
  26873. ! #endif    MMDFMTS
  26874. --- 599,606 ----
  26875.       *c1 = NULL;
  26876.       if (pw = getpwnam(lname))
  26877.       return(hmalloc(pw));
  26878. ! #endif /* DBMPWD */
  26879.       
  26880.       return NULL;
  26881.   }
  26882. ! #endif    /* MMDFMTS */
  26883. *** ../mh-6.7.2/uip/anno.c    Thu Apr  5 16:02:54 1990
  26884. --- uip/anno.c    Mon Dec 14 16:20:59 1992
  26885. ***************
  26886. *** 1,11 ****
  26887.   /* anno.c - annotate messages */
  26888.   #ifndef    lint
  26889. ! static char ident[] = "@(#)$Id: anno.c,v 2.3 90/04/05 15:35:14 sources Exp $";
  26890. ! #endif    lint
  26891.   
  26892.   #include "../h/mh.h"
  26893.   #include <ctype.h>
  26894.   #include <stdio.h>
  26895.   
  26896.   static make_comp();
  26897.   /*   */
  26898. --- 1,14 ----
  26899.   /* anno.c - annotate messages */
  26900.   #ifndef    lint
  26901. ! static char ident[] = "@(#)$Id: anno.c,v 2.6 1992/12/15 00:20:22 jromine Exp $";
  26902. ! #endif    /* lint */
  26903.   
  26904.   #include "../h/mh.h"
  26905.   #include <ctype.h>
  26906.   #include <stdio.h>
  26907. + #ifdef LOCALE
  26908. + #include    <locale.h>
  26909. + #endif
  26910.   
  26911.   static make_comp();
  26912.   /*   */
  26913. ***************
  26914. *** 30,36 ****
  26915.   #define    HELPSW    6
  26916.       "help", 4,
  26917.   
  26918. !     NULL, NULL
  26919.   };
  26920.   
  26921.   /*   */
  26922. --- 33,39 ----
  26923.   #define    HELPSW    6
  26924.       "help", 4,
  26925.   
  26926. !     NULL, 0
  26927.   };
  26928.   
  26929.   /*   */
  26930. ***************
  26931. *** 57,62 ****
  26932. --- 60,68 ----
  26933.              *msgs[MAXARGS];
  26934.       struct msgs *mp;
  26935.   
  26936. + #ifdef LOCALE
  26937. +     setlocale(LC_ALL, "");
  26938. + #endif
  26939.       invo_name = r1bindex (argv[0], '/');
  26940.       if ((cp = m_find (invo_name)) != NULL) {
  26941.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  26942. ***************
  26943. *** 123,129 ****
  26944.   #ifdef UCI
  26945.       if (strcmp(invo_name, "fanno") == 0)    /* ugh! */
  26946.       datesw = 0;
  26947. ! #endif UCI
  26948.   
  26949.   /*   */
  26950.   
  26951. --- 129,135 ----
  26952.   #ifdef UCI
  26953.       if (strcmp(invo_name, "fanno") == 0)    /* ugh! */
  26954.       datesw = 0;
  26955. ! #endif    /* UCI */
  26956.   
  26957.   /*   */
  26958.   
  26959. ***************
  26960. *** 179,185 ****
  26961.       }
  26962.   
  26963.       if ((cp = *ap + strlen (*ap) - 1) > *ap && *cp == ':')
  26964. !     *cp = NULL;
  26965.       if (strlen (*ap) == 0)
  26966.       adios (NULLCP, "null component name");
  26967.       if (**ap == '-')
  26968. --- 185,191 ----
  26969.       }
  26970.   
  26971.       if ((cp = *ap + strlen (*ap) - 1) > *ap && *cp == ':')
  26972. !     *cp = 0;
  26973.       if (strlen (*ap) == 0)
  26974.       adios (NULLCP, "null component name");
  26975.       if (**ap == '-')
  26976. *** ../mh-6.7.2/uip/annosbr.c    Thu Apr  5 16:02:53 1990
  26977. --- uip/annosbr.c    Mon Dec 14 16:21:00 1992
  26978. ***************
  26979. *** 1,7 ****
  26980.   /* annosbr.c - prepend annotation to messages */
  26981.   #ifndef    lint
  26982. ! static char ident[] = "@(#)$Id: annosbr.c,v 2.4 90/04/05 15:35:09 sources Exp $";
  26983. ! #endif    lint
  26984.   
  26985.   #include "../h/mh.h"
  26986.   #include "../zotnet/tws.h"
  26987. --- 1,7 ----
  26988.   /* annosbr.c - prepend annotation to messages */
  26989.   #ifndef    lint
  26990. ! static char ident[] = "@(#)$Id: annosbr.c,v 2.5 1992/12/15 00:20:22 jromine Exp $";
  26991. ! #endif    /* lint */
  26992.   
  26993.   #include "../h/mh.h"
  26994.   #include "../zotnet/tws.h"
  26995. *** ../mh-6.7.2/uip/ap.c    Thu Apr  5 16:03:39 1990
  26996. --- uip/ap.c    Mon Dec 14 16:21:01 1992
  26997. ***************
  26998. *** 1,12 ****
  26999.   /* ap.c - parse addresses 822-style */
  27000.   #ifndef    lint
  27001. ! static char ident[] = "@(#)$Id: ap.c,v 1.3 90/04/05 15:00:32 sources Exp $";
  27002. ! #endif    lint
  27003.   
  27004.   #include "../h/mh.h"
  27005.   #include "../h/addrsbr.h"
  27006.   #include "../h/formatsbr.h"
  27007.   #include <stdio.h>
  27008.   
  27009.   
  27010.   #define    NADDRS    100
  27011. --- 1,15 ----
  27012.   /* ap.c - parse addresses 822-style */
  27013.   #ifndef    lint
  27014. ! static char ident[] = "@(#)$Id: ap.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  27015. ! #endif    /* lint */
  27016.   
  27017.   #include "../h/mh.h"
  27018.   #include "../h/addrsbr.h"
  27019.   #include "../h/formatsbr.h"
  27020.   #include <stdio.h>
  27021. + #ifdef LOCALE
  27022. + #include    <locale.h>
  27023. + #endif
  27024.   
  27025.   
  27026.   #define    NADDRS    100
  27027. ***************
  27028. *** 35,41 ****
  27029.   #define    HELPSW    5
  27030.       "help", 4,
  27031.   
  27032. !     NULL, NULL
  27033.   };
  27034.   
  27035.   /*   */
  27036. --- 38,44 ----
  27037.   #define    HELPSW    5
  27038.       "help", 4,
  27039.   
  27040. !     NULL, 0
  27041.   };
  27042.   
  27043.   /*   */
  27044. ***************
  27045. *** 42,48 ****
  27046.   
  27047.   static struct format *fmt;
  27048.   
  27049. ! static int dat[4];
  27050.   
  27051.   static int    process();
  27052.   /*   */
  27053. --- 45,51 ----
  27054.   
  27055.   static struct format *fmt;
  27056.   
  27057. ! static int dat[5];
  27058.   
  27059.   static int    process();
  27060.   /*   */
  27061. ***************
  27062. *** 67,72 ****
  27063. --- 70,78 ----
  27064.          *arguments[MAXARGS],
  27065.              *addrs[NADDRS];
  27066.   
  27067. + #ifdef LOCALE
  27068. +     setlocale(LC_ALL, "");
  27069. + #endif
  27070.       invo_name = r1bindex (argv[0], '/');
  27071.       mts_init (invo_name);
  27072.       if ((cp = m_find (invo_name)) != NULL) {
  27073. ***************
  27074. *** 141,147 ****
  27075.       width = WBUFSIZ;
  27076.       fmt_norm = normalize;
  27077.       (void) fmt_compile (nfs, &fmt);
  27078. !     dat[0] = dat[1] = dat[2] = 0;
  27079.       dat[3] = width;
  27080.   
  27081.       for (addrp = 0; addrs[addrp]; addrp++)
  27082. --- 147,153 ----
  27083.       width = WBUFSIZ;
  27084.       fmt_norm = normalize;
  27085.       (void) fmt_compile (nfs, &fmt);
  27086. !     dat[0] = dat[1] = dat[2] = dat[4] = 0;
  27087.       dat[3] = width;
  27088.   
  27089.       for (addrp = 0; addrs[addrp]; addrp++)
  27090. *** ../mh-6.7.2/uip/bbc.c    Thu Apr  5 16:02:56 1990
  27091. --- uip/bbc.c    Mon Dec 14 09:10:30 1992
  27092. ***************
  27093. *** 1,6 ****
  27094.   /* bbc.c - ZOTnet BBoard checker */
  27095.   #ifndef    lint
  27096. ! static char ident[] = "@(#)$Id: bbc.c,v 2.5 90/04/05 14:56:21 sources Exp $";
  27097.   #endif    lint
  27098.   
  27099.   #include "../h/mh.h"
  27100. --- 1,6 ----
  27101.   /* bbc.c - ZOTnet BBoard checker */
  27102.   #ifndef    lint
  27103. ! static char ident[] = "@(#)$Id: bbc.c,v 2.12 1992/12/14 17:10:25 jromine Exp $";
  27104.   #endif    lint
  27105.   
  27106.   #include "../h/mh.h"
  27107. ***************
  27108. *** 24,29 ****
  27109. --- 24,32 ----
  27110.   #include <sys/time.h>
  27111.   #include <sys/resource.h>
  27112.   #endif    SIGTSTP
  27113. + #ifdef LOCALE
  27114. + #include    <locale.h>
  27115. + #endif
  27116.   
  27117.   #define    RCFILE    ".bbrc"
  27118.   
  27119. ***************
  27120. *** 130,136 ****
  27121.   #ifdef    BPOP
  27122.   extern char response[];
  27123.   
  27124. ! char   *getusr (), **getip ();
  27125.   #endif    BPOP
  27126.   
  27127.   int    sigser (), action ();
  27128. --- 133,140 ----
  27129.   #ifdef    BPOP
  27130.   extern char response[];
  27131.   
  27132. ! extern char   *getusr ();
  27133. ! static char  **getip ();
  27134.   #endif    BPOP
  27135.   
  27136.   int    sigser (), action ();
  27137. ***************
  27138. *** 137,143 ****
  27139.   int    hupser ();
  27140.   #ifdef    SIGTSTP
  27141.   int    tstpid;
  27142. ! int    tstpser ();
  27143.   #endif    SIGTSTP
  27144.   
  27145.   static char *rcfile=NULL;
  27146. --- 141,147 ----
  27147.   int    hupser ();
  27148.   #ifdef    SIGTSTP
  27149.   int    tstpid;
  27150. ! static  int    tstpser ();
  27151.   #endif    SIGTSTP
  27152.   
  27153.   static char *rcfile=NULL;
  27154. ***************
  27155. *** 179,189 ****
  27156.          *bbs[NBB + 1],
  27157.   #endif    UCL
  27158.          *vec[MAXARGS];
  27159. - 
  27160.   #ifdef    UCL
  27161.       called_bbc = 1;
  27162.       bbp = 0;
  27163.   #endif    UCL
  27164.       invo_name = r1bindex (argv[0], '/');
  27165.   #ifdef    BPOP
  27166.       mts_init (invo_name);
  27167. --- 183,196 ----
  27168.          *bbs[NBB + 1],
  27169.   #endif    UCL
  27170.          *vec[MAXARGS];
  27171.   #ifdef    UCL
  27172.       called_bbc = 1;
  27173.       bbp = 0;
  27174.   #endif    UCL
  27175. + 
  27176. + #ifdef LOCALE
  27177. +     setlocale(LC_ALL, "");
  27178. + #endif
  27179.       invo_name = r1bindex (argv[0], '/');
  27180.   #ifdef    BPOP
  27181.       mts_init (invo_name);
  27182. ***************
  27183. *** 725,731 ****
  27184.       if ((cp = rc ? rc : getenv ("MHBBRC")) && *cp) {
  27185.       rcfile = path (cp, TFILE);
  27186.       if (*cp != '/')
  27187. !         (void) putenv ("MHBBRC", rcfile);
  27188.       }
  27189.       else
  27190.       rcfile = concat (mypath, "/", RCFILE, NULLCP);
  27191. --- 732,738 ----
  27192.       if ((cp = rc ? rc : getenv ("MHBBRC")) && *cp) {
  27193.       rcfile = path (cp, TFILE);
  27194.       if (*cp != '/')
  27195. !         (void) m_putenv ("MHBBRC", rcfile);
  27196.       }
  27197.       else
  27198.       rcfile = concat (mypath, "/", RCFILE, NULLCP);
  27199. ***************
  27200. *** 810,822 ****
  27201. --- 817,837 ----
  27202.   int    sig;
  27203.   {
  27204.       int        pid;
  27205. + #if defined(BSD42) && !defined(WAITINT)
  27206.       union wait w;
  27207. + #else
  27208. +     int    w;
  27209. + #endif
  27210.   
  27211.       rcend ();
  27212.   
  27213. + #ifdef SVR4
  27214. +     waitpid(tstpid, &w, WUNTRACED);
  27215. + #else
  27216.       while ((pid = wait3 (&w, WUNTRACED, (struct rusage *) 0)) != NOTOK
  27217.           && pid != tstpid)
  27218.       continue;
  27219. + #endif
  27220.   
  27221.       (void) signal (SIGTSTP, SIG_DFL);
  27222.   #ifdef    BSD42
  27223. *** ../mh-6.7.2/uip/bbl.c    Thu Apr  5 16:07:44 1990
  27224. --- uip/bbl.c    Tue Nov  3 16:39:27 1992
  27225. ***************
  27226. *** 1,6 ****
  27227.   /* bbl.c - ease the tasks of a BBleader */
  27228.   #ifndef    lint
  27229. ! static char ident[] = "@(#)$Id: bbl.c,v 2.1 90/04/05 14:56:46 sources Exp $";
  27230.   #endif    lint
  27231.   
  27232.   #include "../h/mh.h"
  27233. --- 1,6 ----
  27234.   /* bbl.c - ease the tasks of a BBleader */
  27235.   #ifndef    lint
  27236. ! static char ident[] = "@(#)$Id: bbl.c,v 2.4 1992/11/04 00:39:25 jromine Exp $";
  27237.   #endif    lint
  27238.   
  27239.   #include "../h/mh.h"
  27240. ***************
  27241. *** 9,14 ****
  27242. --- 9,17 ----
  27243.   #include <ctype.h>
  27244.   #include <pwd.h>
  27245.   #include <stdio.h>
  27246. + #ifdef LOCALE
  27247. + #include    <locale.h>
  27248. + #endif
  27249.   
  27250.   /*   */
  27251.   
  27252. ***************
  27253. *** 50,58 ****
  27254.   static    struct bboard  *bb = NULL;
  27255.   
  27256.   
  27257.   #ifdef    SYS5
  27258.   struct    passwd    *getpwnam (), *getpwuid ();
  27259. ! #endif    SYS5
  27260.   
  27261.   /*   */
  27262.   
  27263. --- 53,63 ----
  27264.   static    struct bboard  *bb = NULL;
  27265.   
  27266.   
  27267. + #ifndef    __STDC__
  27268.   #ifdef    SYS5
  27269.   struct    passwd    *getpwnam (), *getpwuid ();
  27270. ! #endif    /* SYS5 */
  27271. ! #endif
  27272.   
  27273.   /*   */
  27274.   
  27275. ***************
  27276. *** 69,74 ****
  27277. --- 74,82 ----
  27278.              *arguments[MAXARGS];
  27279.       struct passwd  *pw;
  27280.   
  27281. + #ifdef LOCALE
  27282. +     setlocale(LC_ALL, "");
  27283. + #endif
  27284.       invo_name = r1bindex (argv[0], '/');
  27285.       if ((cp = m_find (invo_name)) != NULL) {
  27286.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  27287. ***************
  27288. *** 90,96 ****
  27289.       if (pw -> pw_uid != geteuid ())
  27290.       adios (NULLCP, "not running setuid to %s", bboards);
  27291.   
  27292. !     current_folder = (cp = m_find (pfolder)) ? getcpy (cp) : defalt;
  27293.   
  27294.   /*   */
  27295.   
  27296. --- 98,105 ----
  27297.       if (pw -> pw_uid != geteuid ())
  27298.       adios (NULLCP, "not running setuid to %s", bboards);
  27299.   
  27300. !     current_folder = ((cp = m_find (pfolder)) || (cp = m_find (inbox)))
  27301. !         ? getcpy (cp) : defalt;
  27302.   
  27303.   /*   */
  27304.   
  27305. *** ../mh-6.7.2/uip/burst.c    Thu Apr  5 16:03:40 1990
  27306. --- uip/burst.c    Mon Dec 14 16:21:01 1992
  27307. ***************
  27308. *** 1,12 ****
  27309.   /* burst.c - explode digests into individual messages */
  27310.   #ifndef    lint
  27311. ! static char ident[] = "@(#)$Id: burst.c,v 1.3 90/04/05 15:00:42 sources Exp $";
  27312. ! #endif    lint
  27313.   
  27314.   #include "../h/mh.h"
  27315.   #include <stdio.h>
  27316.   #include <sys/types.h>
  27317.   #include <sys/stat.h>
  27318.   
  27319.   static    cpybrst(), burst();
  27320.   /*   */
  27321. --- 1,15 ----
  27322.   /* burst.c - explode digests into individual messages */
  27323.   #ifndef    lint
  27324. ! static char ident[] = "@(#)$Id: burst.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  27325. ! #endif    /* lint */
  27326.   
  27327.   #include "../h/mh.h"
  27328.   #include <stdio.h>
  27329.   #include <sys/types.h>
  27330.   #include <sys/stat.h>
  27331. + #ifdef LOCALE
  27332. + #include    <locale.h>
  27333. + #endif
  27334.   
  27335.   static    cpybrst(), burst();
  27336.   /*   */
  27337. ***************
  27338. *** 30,36 ****
  27339.   #define    HELPSW    6
  27340.       "help", 4,
  27341.   
  27342. !     NULL, NULL
  27343.   };
  27344.   
  27345.   /*   */
  27346. --- 33,39 ----
  27347.   #define    HELPSW    6
  27348.       "help", 4,
  27349.   
  27350. !     NULL, 0
  27351.   };
  27352.   
  27353.   /*   */
  27354. ***************
  27355. *** 69,74 ****
  27356. --- 72,80 ----
  27357.              *msgs[MAXARGS];
  27358.       struct smsg *smsgs;
  27359.   
  27360. + #ifdef LOCALE
  27361. +     setlocale(LC_ALL, "");
  27362. + #endif
  27363.       invo_name = r1bindex (argv[0], '/');
  27364.       if ((cp = m_find (invo_name)) != NULL) {
  27365.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  27366. ***************
  27367. *** 191,196 ****
  27368. --- 197,203 ----
  27369.               msgp;
  27370.       register long   pos;
  27371.       register char   c,
  27372. +             cc,
  27373.                      *msgnam;
  27374.       char    buffer[BUFSIZ],
  27375.               f1[BUFSIZ],
  27376. ***************
  27377. *** 207,213 ****
  27378.   
  27379.       mode = fstat (fileno (in), &st) != NOTOK ? (st.st_mode & 0777)
  27380.       : m_gmprot ();
  27381. !     for (msgp = 1, pos = 0L; msgp <= MAXFOLDER;) {
  27382.       while (fgets (buffer, sizeof buffer, in) != NULL
  27383.           && buffer[0] == '\n')
  27384.           pos += (long) strlen (buffer);
  27385. --- 214,220 ----
  27386.   
  27387.       mode = fstat (fileno (in), &st) != NOTOK ? (st.st_mode & 0777)
  27388.       : m_gmprot ();
  27389. !     for (msgp = 0, pos = 0L; msgp <= MAXFOLDER;) {
  27390.       while (fgets (buffer, sizeof buffer, in) != NULL
  27391.           && buffer[0] == '\n')
  27392.           pos += (long) strlen (buffer);
  27393. ***************
  27394. *** 216,227 ****
  27395.       (void) fseek (in, pos, 0);
  27396.       smsgs[msgp].s_start = pos;
  27397.   
  27398. !     for (c = NULL;
  27399.           fgets (buffer, sizeof buffer, in) != NULL;
  27400.           c = buffer[0])
  27401.           if (strncmp (buffer, delim3, ld3) == 0
  27402. !             && peekc (in) == '\n'
  27403. !             && (msgp == 1 || c == '\n'))
  27404.           break;
  27405.           else
  27406.           pos += (long) strlen (buffer);
  27407. --- 223,234 ----
  27408.       (void) fseek (in, pos, 0);
  27409.       smsgs[msgp].s_start = pos;
  27410.   
  27411. !     for (c = 0;
  27412.           fgets (buffer, sizeof buffer, in) != NULL;
  27413.           c = buffer[0])
  27414.           if (strncmp (buffer, delim3, ld3) == 0
  27415. !             && (msgp == 1 || c == '\n')
  27416. !             && ((cc = peekc (in)) == '\n' || cc == EOF))
  27417.           break;
  27418.           else
  27419.           pos += (long) strlen (buffer);
  27420. ***************
  27421. *** 228,239 ****
  27422.   
  27423.       wasdlm = strncmp (buffer, delim3, ld3) == 0;
  27424.       if (smsgs[msgp].s_start != pos)
  27425. !         smsgs[msgp++].s_stop = c == '\n' && wasdlm ? pos - 1 : pos;
  27426.       if (feof (in)) {
  27427.           if (wasdlm) {
  27428.           smsgs[msgp - 1].s_stop -= ((long) strlen (buffer) + 1);
  27429.           msgp++;        /* fake "End of XXX Digest" */
  27430.           }
  27431.           break;
  27432.       }
  27433.       pos += (long) strlen (buffer);
  27434. --- 235,248 ----
  27435.   
  27436.       wasdlm = strncmp (buffer, delim3, ld3) == 0;
  27437.       if (smsgs[msgp].s_start != pos)
  27438. !         smsgs[msgp++].s_stop = (c == '\n' && wasdlm) ? pos - 1 : pos;
  27439.       if (feof (in)) {
  27440. + #ifdef    notdef
  27441.           if (wasdlm) {
  27442.           smsgs[msgp - 1].s_stop -= ((long) strlen (buffer) + 1);
  27443.           msgp++;        /* fake "End of XXX Digest" */
  27444.           }
  27445. + #endif
  27446.           break;
  27447.       }
  27448.       pos += (long) strlen (buffer);
  27449. ***************
  27450. *** 241,247 ****
  27451.   
  27452.   /*   */
  27453.   
  27454. !     switch (--msgp) {        /* toss "End of XXX Digest" */
  27455.       case 0: 
  27456.           adios (NULLCP, "burst() botch -- you lose big");
  27457.   
  27458. --- 250,256 ----
  27459.   
  27460.   /*   */
  27461.   
  27462. !     switch (msgp--) {        /* toss "End of XXX Digest" */
  27463.       case 0: 
  27464.           adios (NULLCP, "burst() botch -- you lose big");
  27465.   
  27466. ***************
  27467. *** 254,264 ****
  27468.       default: 
  27469.           if (verbosw)
  27470.           printf ("%d message%s exploded from digest %d\n",
  27471. !             msgp - 1, msgp - 1 != 1 ? "s" : "", msgnum);
  27472. !         if (msgp == 2)    /* XXX */
  27473. !         msgp++;
  27474.           break;
  27475.       }
  27476.   
  27477.       if ((mp = m_remsg (mp, 0, mp -> hghmsg + msgp)) == NULL)
  27478.       adios (NULLCP, "unable to allocate folder storage");
  27479. --- 263,272 ----
  27480.       default: 
  27481.           if (verbosw)
  27482.           printf ("%d message%s exploded from digest %d\n",
  27483. !             msgp, msgp != 1 ? "s" : "", msgnum);
  27484.           break;
  27485.       }
  27486. +     /* msgp now contains the number of new msgs to be created */
  27487.   
  27488.       if ((mp = m_remsg (mp, 0, mp -> hghmsg + msgp)) == NULL)
  27489.       adios (NULLCP, "unable to allocate folder storage");
  27490. ***************
  27491. *** 265,278 ****
  27492.   
  27493.   /*   */
  27494.   
  27495. !     msgp--;
  27496. !     j = mp -> hghmsg;
  27497. !     mp -> hghmsg += msgp - 1;
  27498. !     mp -> nummsg += msgp - 1;
  27499.       if (mp -> hghsel > msgnum)
  27500. !     mp -> hghsel += msgp - 1;
  27501.   
  27502. !     if (inplace && msgp > 1)
  27503.       for (i = mp -> hghmsg; j > msgnum; i--, j--) {
  27504.           (void) strcpy (f1, m_name (i));
  27505.           (void) strcpy (f2, m_name (j));
  27506. --- 273,285 ----
  27507.   
  27508.   /*   */
  27509.   
  27510. !     j = mp -> hghmsg;        /* old value */
  27511. !     mp -> hghmsg += msgp;
  27512. !     mp -> nummsg += msgp;
  27513.       if (mp -> hghsel > msgnum)
  27514. !     mp -> hghsel += msgp;
  27515.   
  27516. !     if (inplace)
  27517.       for (i = mp -> hghmsg; j > msgnum; i--, j--) {
  27518.           (void) strcpy (f1, m_name (i));
  27519.           (void) strcpy (f2, m_name (j));
  27520. ***************
  27521. *** 283,296 ****
  27522.           if (rename (f2, f1) == NOTOK)
  27523.               admonish (f1, "unable to rename %s to", f2);
  27524.           mp -> msgstats[i] = mp -> msgstats[j];
  27525. !         mp -> msgstats[j] = NULL;
  27526.           mp -> msgflags |= SEQMOD;
  27527.           }
  27528.       }
  27529.       
  27530.       mp -> msgstats[msgnum] &= ~SELECTED;
  27531. !     i = inplace ? msgnum + msgp - 1 : mp -> hghmsg;
  27532. !     for (j = msgp; j >= (inplace ? 1 : 2); i--, j--) {
  27533.       (void) strcpy (f1, m_name (i));
  27534.       (void) strcpy (f2, m_scratch ("", invo_name));
  27535.       if (verbosw && i != msgnum)
  27536. --- 290,303 ----
  27537.           if (rename (f2, f1) == NOTOK)
  27538.               admonish (f1, "unable to rename %s to", f2);
  27539.           mp -> msgstats[i] = mp -> msgstats[j];
  27540. !         mp -> msgstats[j] = 0;
  27541.           mp -> msgflags |= SEQMOD;
  27542.           }
  27543.       }
  27544.       
  27545.       mp -> msgstats[msgnum] &= ~SELECTED;
  27546. !     i = inplace ? msgnum + msgp : mp -> hghmsg; /* new hghmsg is hghmsg+msgp */
  27547. !     for (j = msgp; j >= (inplace ? 0 : 1); i--, j--) {
  27548.       (void) strcpy (f1, m_name (i));
  27549.       (void) strcpy (f2, m_scratch ("", invo_name));
  27550.       if (verbosw && i != msgnum)
  27551. ***************
  27552. *** 337,343 ****
  27553.                       state;
  27554.   
  27555.       for (state = S1; (c = fgetc (in)) != EOF && len > 0; len--) {
  27556. !     if (c == NULL)
  27557.           continue;
  27558.       switch (state) {
  27559.           case S1: 
  27560. --- 344,350 ----
  27561.                       state;
  27562.   
  27563.       for (state = S1; (c = fgetc (in)) != EOF && len > 0; len--) {
  27564. !     if (c == 0)
  27565.           continue;
  27566.       switch (state) {
  27567.           case S1: 
  27568. *** ../mh-6.7.2/uip/comp.c    Thu Apr  5 16:03:53 1990
  27569. --- uip/comp.c    Mon Dec 14 16:21:02 1992
  27570. ***************
  27571. *** 1,12 ****
  27572.   /* comp.c - compose a message */
  27573.   #ifndef    lint
  27574. ! static char ident[] = "@(#)$Id: comp.c,v 1.3 90/04/05 15:03:07 sources Exp $";
  27575. ! #endif    lint
  27576.   
  27577.   #include "../h/mh.h"
  27578.   #include <stdio.h>
  27579.   #include <sys/types.h>
  27580.   #include <sys/stat.h>
  27581.   
  27582.   /*   */
  27583.   
  27584. --- 1,15 ----
  27585.   /* comp.c - compose a message */
  27586.   #ifndef    lint
  27587. ! static char ident[] = "@(#)$Id: comp.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  27588. ! #endif    /* lint */
  27589.   
  27590.   #include "../h/mh.h"
  27591.   #include <stdio.h>
  27592.   #include <sys/types.h>
  27593.   #include <sys/stat.h>
  27594. + #ifdef LOCALE
  27595. + #include    <locale.h>
  27596. + #endif
  27597.   
  27598.   /*   */
  27599.   
  27600. ***************
  27601. *** 42,48 ****
  27602.       "help", 4,
  27603.   
  27604.   
  27605. !     NULL, NULL
  27606.   };
  27607.   
  27608.   /*   */
  27609. --- 45,51 ----
  27610.       "help", 4,
  27611.   
  27612.   
  27613. !     NULL, 0
  27614.   };
  27615.   
  27616.   /*   */
  27617. ***************
  27618. *** 61,67 ****
  27619.   #define NEWSW    5
  27620.       "new", 0,
  27621.   
  27622. !     NULL, NULL
  27623.   };
  27624.   
  27625.   
  27626. --- 64,70 ----
  27627.   #define NEWSW    5
  27628.       "new", 0,
  27629.   
  27630. !     NULL, 0
  27631.   };
  27632.   
  27633.   
  27634. ***************
  27635. *** 72,78 ****
  27636.       "list", 0,
  27637.       "refile", 0,
  27638.   
  27639. !     NULL, NULL
  27640.   };
  27641.   
  27642.   /*   */
  27643. --- 75,81 ----
  27644.       "list", 0,
  27645.       "refile", 0,
  27646.   
  27647. !     NULL, 0
  27648.   };
  27649.   
  27650.   /*   */
  27651. ***************
  27652. *** 107,112 ****
  27653. --- 110,118 ----
  27654.       struct msgs *mp = NULL;
  27655.       struct stat st;
  27656.   
  27657. + #ifdef LOCALE
  27658. +     setlocale(LC_ALL, "");
  27659. + #endif
  27660.       invo_name = r1bindex (argv[0], '/');
  27661.       if ((cp = m_find (invo_name)) != NULL) {
  27662.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  27663. ***************
  27664. *** 306,311 ****
  27665.   
  27666.       if (nwhat)
  27667.       done (0);
  27668. !     (void) m_whatnow (ed, nedit, use, drft, NULLCP, 0, NULLMP, NULLCP, 0, cwd);
  27669.       done (1);
  27670.   }
  27671. --- 312,317 ----
  27672.   
  27673.       if (nwhat)
  27674.       done (0);
  27675. !     (void) what_now (ed, nedit, use, drft, NULLCP, 0, NULLMP, NULLCP, 0, cwd);
  27676.       done (1);
  27677.   }
  27678. *** ../mh-6.7.2/uip/conflict.c    Thu Apr  5 16:03:26 1990
  27679. --- uip/conflict.c    Mon Dec 14 16:07:55 1992
  27680. ***************
  27681. *** 1,7 ****
  27682.   /* conflict.c - the new conflict */
  27683.   #ifndef    lint
  27684. ! static char ident[] = "@(#)$Id: conflict.c,v 2.2 90/04/05 14:57:02 sources Exp $";
  27685. ! #endif    lint
  27686.   
  27687.   #include "../h/mh.h"
  27688.   #include "../h/aliasbr.h"
  27689. --- 1,7 ----
  27690.   /* conflict.c - the new conflict */
  27691.   #ifndef    lint
  27692. ! static char ident[] = "@(#)$Id: conflict.c,v 2.9 1992/12/15 00:07:52 jromine Exp $";
  27693. ! #endif    /* lint */
  27694.   
  27695.   #include "../h/mh.h"
  27696.   #include "../h/aliasbr.h"
  27697. ***************
  27698. *** 10,17 ****
  27699.   #include "../zotnet/mts.h"
  27700.   #include <grp.h>
  27701.   #include <pwd.h>
  27702.   
  27703. - 
  27704.   #define    NDIRS    100
  27705.   #define    NGRPS    100
  27706.   
  27707. --- 10,19 ----
  27708.   #include "../zotnet/mts.h"
  27709.   #include <grp.h>
  27710.   #include <pwd.h>
  27711. + #ifdef LOCALE
  27712. + #include    <locale.h>
  27713. + #endif
  27714.   
  27715.   #define    NDIRS    100
  27716.   #define    NGRPS    100
  27717.   
  27718. ***************
  27719. *** 27,33 ****
  27720.   #define    HELPSW    2
  27721.       "help", 4,
  27722.   
  27723. !     NULL, NULL
  27724.   };
  27725.   
  27726.   /*   */
  27727. --- 29,35 ----
  27728.   #define    HELPSW    2
  27729.       "help", 4,
  27730.   
  27731. !     NULL, 0
  27732.   };
  27733.   
  27734.   /*   */
  27735. ***************
  27736. *** 43,49 ****
  27737.   extern struct home *homehead;
  27738.   
  27739.   
  27740. ! struct    group *getgrent (),*getgrgid();
  27741.   
  27742.   /*   */
  27743.   
  27744. --- 45,53 ----
  27745.   extern struct home *homehead;
  27746.   
  27747.   
  27748. ! #if !defined(__STDC__) && !defined(__stdc__)    /* __stdc__ for convex */
  27749. ! struct    group *getgrent (), *getgrgid();
  27750. ! #endif /* !__STDC__ */
  27751.   
  27752.   /*   */
  27753.   
  27754. ***************
  27755. *** 60,65 ****
  27756. --- 64,72 ----
  27757.               buf[80],
  27758.              *akv[50];
  27759.   
  27760. + #ifdef LOCALE
  27761. +     setlocale(LC_ALL, "");
  27762. + #endif
  27763.       invo_name = r1bindex (argv[0], '/');
  27764.       m_foil (NULLCP);
  27765.       mts_init (invo_name);
  27766. ***************
  27767. *** 118,124 ****
  27768.   #ifdef    UCI
  27769.       ldr_names ();
  27770.       ldr_ship ();
  27771. ! #endif    UCI
  27772.       maildrops ();
  27773.   
  27774.       done (0);
  27775. --- 125,131 ----
  27776.   #ifdef    UCI
  27777.       ldr_names ();
  27778.       ldr_ship ();
  27779. ! #endif    /* UCI */
  27780.       maildrops ();
  27781.   
  27782.       done (0);
  27783. ***************
  27784. *** 225,231 ****
  27785.   #ifdef    BSD42
  27786.           else
  27787.           hm -> h_ngrps++;
  27788. ! #endif    BSD42
  27789.   
  27790.           for (dp = cp + 1; *dp; dp++)
  27791.           if (strcmp (*cp, *dp) == 0) {
  27792. --- 232,238 ----
  27793.   #ifdef    BSD42
  27794.           else
  27795.           hm -> h_ngrps++;
  27796. ! #endif    /* BSD42 */
  27797.   
  27798.           for (dp = cp + 1; *dp; dp++)
  27799.           if (strcmp (*cp, *dp) == 0) {
  27800. ***************
  27801. *** 245,251 ****
  27802.               hm -> h_name, hm -> h_ngrps, NGROUPS);
  27803.           hit++;
  27804.       }
  27805. ! #endif    BSD42
  27806.   
  27807.       if (!hit && out && !mail)
  27808.       fprintf (out, "all group members accounted for\n");
  27809. --- 252,258 ----
  27810.               hm -> h_name, hm -> h_ngrps, NGROUPS);
  27811.           hit++;
  27812.       }
  27813. ! #endif    /* BSD42 */
  27814.   
  27815.       if (!hit && out && !mail)
  27816.       fprintf (out, "all group members accounted for\n");
  27817. ***************
  27818. *** 289,297 ****
  27819.       register int    hit = 0;
  27820.   #ifdef SYS5DIR
  27821.       register struct dirent *dp;
  27822. ! #else  SYS5DIR
  27823.       register struct direct *dp;
  27824. ! #endif SYS5DIR
  27825.       register DIR *dd = opendir (drop);
  27826.   
  27827.       if (!dd) {
  27828. --- 296,304 ----
  27829.       register int    hit = 0;
  27830.   #ifdef SYS5DIR
  27831.       register struct dirent *dp;
  27832. ! #else    /*  SYS5DIR */
  27833.       register struct direct *dp;
  27834. ! #endif    /* SYS5DIR */
  27835.       register DIR *dd = opendir (drop);
  27836.   
  27837.       if (!dd) {
  27838. ***************
  27839. *** 438,445 ****
  27840.       while (*cp && !isspace (*cp))
  27841.           cp++;
  27842.       while (*cp && isspace (*cp))
  27843. !         *cp++ = NULL;
  27844. !     if (*cp == NULL)
  27845.           break;
  27846.       if (q < gl_ldr + MAXGLS)
  27847.           *q++ = cp;
  27848. --- 445,452 ----
  27849.       while (*cp && !isspace (*cp))
  27850.           cp++;
  27851.       while (*cp && isspace (*cp))
  27852. !         *cp++ = '\0';
  27853. !     if (*cp == '\0')
  27854.           break;
  27855.       if (q < gl_ldr + MAXGLS)
  27856.           *q++ = cp;
  27857. ***************
  27858. *** 543,546 ****
  27859.       if (!hit && out && !mail)
  27860.       fprintf (out, "all group leaders accounted for\n");
  27861.   }
  27862. ! #endif    UCI
  27863. --- 550,553 ----
  27864.       if (!hit && out && !mail)
  27865.       fprintf (out, "all group leaders accounted for\n");
  27866.   }
  27867. ! #endif    /* UCI */
  27868. *** ../mh-6.7.2/uip/dist.c    Thu Oct 29 15:02:18 1987
  27869. --- uip/dist.c    Mon Dec 14 16:21:03 1992
  27870. ***************
  27871. *** 1,9 ****
  27872. --- 1,15 ----
  27873.   /* dist.c - re-distribute a message */
  27874. + #ifndef    lint
  27875. + static char ident[] = "@(#)$Id: dist.c,v 1.5 1992/12/15 00:20:22 jromine Exp $";
  27876. + #endif    /* lint */
  27877.   
  27878.   #include "../h/mh.h"
  27879.   #include <stdio.h>
  27880.   #include <sys/types.h>
  27881.   #include <sys/stat.h>
  27882. + #ifdef LOCALE
  27883. + #include    <locale.h>
  27884. + #endif
  27885.   
  27886.   /*   */
  27887.   
  27888. ***************
  27889. *** 44,50 ****
  27890.   #define    FILESW    13
  27891.       "file file", -4,        /* interface from msh */
  27892.   
  27893. !     NULL, NULL
  27894.   };
  27895.   
  27896.   /*   */
  27897. --- 50,56 ----
  27898.   #define    FILESW    13
  27899.       "file file", -4,        /* interface from msh */
  27900.   
  27901. !     NULL, 0
  27902.   };
  27903.   
  27904.   /*   */
  27905. ***************
  27906. *** 61,67 ****
  27907.   #define NEWSW    4
  27908.       "new", 0,
  27909.   
  27910. !     NULL, NULL
  27911.   };
  27912.   
  27913.   
  27914. --- 67,73 ----
  27915.   #define NEWSW    4
  27916.       "new", 0,
  27917.   
  27918. !     NULL, 0
  27919.   };
  27920.   
  27921.   
  27922. ***************
  27923. *** 71,77 ****
  27924.       "list", 0,
  27925.       "refile +folder", 0,
  27926.   
  27927. !     NULL, NULL
  27928.   };
  27929.   
  27930.   /*   */
  27931. --- 77,83 ----
  27932.       "list", 0,
  27933.       "refile +folder", 0,
  27934.   
  27935. !     NULL, 0
  27936.   };
  27937.   
  27938.   /*   */
  27939. ***************
  27940. *** 109,114 ****
  27941. --- 115,123 ----
  27942.       struct msgs *mp = NULL;
  27943.       struct stat st;
  27944.   
  27945. + #ifdef LOCALE
  27946. +     setlocale(LC_ALL, "");
  27947. + #endif
  27948.       invo_name = r1bindex (argv[0], '/');
  27949.       if ((cp = m_find (invo_name)) != NULL) {
  27950.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  27951. ***************
  27952. *** 307,313 ****
  27953.   
  27954.       if (nwhat)
  27955.       done (0);
  27956. !     (void) m_whatnow (ed, nedit, NOUSE, drft, msgnam, 1, mp,
  27957.       anot ? "Resent" : NULLCP, inplace, cwd);
  27958.       done (1);
  27959.   }
  27960. --- 316,322 ----
  27961.   
  27962.       if (nwhat)
  27963.       done (0);
  27964. !     (void) what_now (ed, nedit, NOUSE, drft, msgnam, 1, mp,
  27965.       anot ? "Resent" : NULLCP, inplace, cwd);
  27966.       done (1);
  27967.   }
  27968. *** ../mh-6.7.2/uip/distsbr.c    Thu Apr  5 16:03:41 1990
  27969. --- uip/distsbr.c    Mon Dec 14 16:21:04 1992
  27970. ***************
  27971. *** 1,7 ****
  27972.   /* distsbr.c - routines to do additional "dist-style" processing */
  27973.   #ifndef    lint
  27974. ! static char ident[] = "@(#)$Id: distsbr.c,v 1.3 90/04/05 15:00:50 sources Exp $";
  27975. ! #endif    lint
  27976.   
  27977.   #include "../h/mh.h"
  27978.   #include <ctype.h>
  27979. --- 1,7 ----
  27980.   /* distsbr.c - routines to do additional "dist-style" processing */
  27981.   #ifndef    lint
  27982. ! static char ident[] = "@(#)$Id: distsbr.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  27983. ! #endif    /* lint */
  27984.   
  27985.   #include "../h/mh.h"
  27986.   #include <ctype.h>
  27987. *** ../mh-6.7.2/uip/dp.c    Thu Apr  5 16:03:41 1990
  27988. --- uip/dp.c    Mon Dec 14 16:21:05 1992
  27989. ***************
  27990. *** 1,12 ****
  27991.   /* dp.c  - parse dates 822-style */
  27992.   #ifndef    lint
  27993. ! static char ident[] = "@(#)$Id: dp.c,v 1.3 90/04/05 15:01:00 sources Exp $";
  27994. ! #endif    lint
  27995.   
  27996.   #include "../h/mh.h"
  27997.   #include "../h/formatsbr.h"
  27998.   #include "../zotnet/tws.h"
  27999.   #include <stdio.h>
  28000.   
  28001.   
  28002.   #define    NDATES    100
  28003. --- 1,15 ----
  28004.   /* dp.c  - parse dates 822-style */
  28005.   #ifndef    lint
  28006. ! static char ident[] = "@(#)$Id: dp.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  28007. ! #endif    /* lint */
  28008.   
  28009.   #include "../h/mh.h"
  28010.   #include "../h/formatsbr.h"
  28011.   #include "../zotnet/tws.h"
  28012.   #include <stdio.h>
  28013. + #ifdef LOCALE
  28014. + #include    <locale.h>
  28015. + #endif
  28016.   
  28017.   
  28018.   #define    NDATES    100
  28019. ***************
  28020. *** 30,36 ****
  28021.   #define    HELPSW    3
  28022.       "help", 4,
  28023.   
  28024. !     NULL, NULL
  28025.   };
  28026.   
  28027.   /*   */
  28028. --- 33,39 ----
  28029.   #define    HELPSW    3
  28030.       "help", 4,
  28031.   
  28032. !     NULL, 0
  28033.   };
  28034.   
  28035.   /*   */
  28036. ***************
  28037. *** 37,43 ****
  28038.   
  28039.   static struct format *fmt;
  28040.   
  28041. ! static int dat[4];
  28042.   
  28043.   static int    process();
  28044.   /*   */
  28045. --- 40,46 ----
  28046.   
  28047.   static struct format *fmt;
  28048.   
  28049. ! static int dat[5];
  28050.   
  28051.   static int    process();
  28052.   /*   */
  28053. ***************
  28054. *** 61,66 ****
  28055. --- 64,72 ----
  28056.              *arguments[MAXARGS],
  28057.              *dates[NDATES];
  28058.   
  28059. + #ifdef LOCALE
  28060. +     setlocale(LC_ALL, "");
  28061. + #endif
  28062.       invo_name = r1bindex (argv[0], '/');
  28063.       if ((cp = m_find (invo_name)) != NULL) {
  28064.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  28065. ***************
  28066. *** 124,130 ****
  28067.       if (width > WBUFSIZ)
  28068.       width = WBUFSIZ;
  28069.       (void) fmt_compile (nfs, &fmt);
  28070. !     dat[0] = dat[1] = dat[2] = 0;
  28071.       dat[3] = width;
  28072.   
  28073.       for (datep = 0; dates[datep]; datep++)
  28074. --- 130,136 ----
  28075.       if (width > WBUFSIZ)
  28076.       width = WBUFSIZ;
  28077.       (void) fmt_compile (nfs, &fmt);
  28078. !     dat[0] = dat[1] = dat[2] = dat[4] = 0;
  28079.       dat[3] = width;
  28080.   
  28081.       for (datep = 0; dates[datep]; datep++)
  28082. *** ../mh-6.7.2/uip/dropsbr.c    Fri Jan 25 15:02:47 1991
  28083. --- uip/dropsbr.c    Mon Dec 14 16:21:06 1992
  28084. ***************
  28085. *** 1,7 ****
  28086.   /* dropsbr.c - write to a mailbox */
  28087.   #ifndef    lint
  28088. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.12 90/11/05 13:26:50 mh Exp $";
  28089. ! #endif    lint
  28090.   
  28091.   #include <stdio.h>
  28092.   #ifndef    MMDFONLY
  28093. --- 1,7 ----
  28094.   /* dropsbr.c - write to a mailbox */
  28095.   #ifndef    lint
  28096. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.15 1992/12/15 00:20:22 jromine Exp $";
  28097. ! #endif    /* lint */
  28098.   
  28099.   #include <stdio.h>
  28100.   #ifndef    MMDFONLY
  28101. ***************
  28102. *** 8,18 ****
  28103.   #include "../h/mh.h"
  28104.   #include "../h/dropsbr.h"
  28105.   #include "../zotnet/mts.h"
  28106. ! #else    MMDFONLY
  28107.   #include "dropsbr.h"
  28108.   #include "strings.h"
  28109.   #include "mmdfonly.h"
  28110. ! #endif    MMDFONLY
  28111.   #include <errno.h>
  28112.   #include <sys/types.h>
  28113.   #include <sys/stat.h>
  28114. --- 8,18 ----
  28115.   #include "../h/mh.h"
  28116.   #include "../h/dropsbr.h"
  28117.   #include "../zotnet/mts.h"
  28118. ! #else    /* MMDFONLY */
  28119.   #include "dropsbr.h"
  28120.   #include "strings.h"
  28121.   #include "mmdfonly.h"
  28122. ! #endif    /* MMDFONLY */
  28123.   #include <errno.h>
  28124.   #include <sys/types.h>
  28125.   #include <sys/stat.h>
  28126. ***************
  28127. *** 113,119 ****
  28128.   
  28129.   #ifdef    BSD42
  28130.           case EWOULDBLOCK:
  28131. ! #endif    BSD42
  28132.           case ETXTBSY: 
  28133.               j = errno;
  28134.               sleep (5);
  28135. --- 113,119 ----
  28136.   
  28137.   #ifdef    BSD42
  28138.           case EWOULDBLOCK:
  28139. ! #endif    /* BSD42 */
  28140.           case ETXTBSY: 
  28141.               j = errno;
  28142.               sleep (5);
  28143. ***************
  28144. *** 163,169 ****
  28145.       if (lseek (fd, (long) (-count), 2) == (long) NOTOK
  28146.           || read (fd, ldelim, count) != count)
  28147.       return NOTOK;
  28148. !     ldelim[count] = NULL;
  28149.   
  28150.       if (strcmp (ldelim, mmdlm2)
  28151.           && write (fd, "\n", 1) != 1
  28152. --- 163,169 ----
  28153.       if (lseek (fd, (long) (-count), 2) == (long) NOTOK
  28154.           || read (fd, ldelim, count) != count)
  28155.       return NOTOK;
  28156. !     ldelim[count] = 0;
  28157.   
  28158.       if (strcmp (ldelim, mmdlm2)
  28159.           && write (fd, "\n", 1) != 1
  28160. ***************
  28161. *** 395,401 ****
  28162.               
  28163.           for (j = 0; fgets (buffer, sizeof buffer, fp) != NULL; j++) {
  28164.           if (j != 0 && strncmp (buffer, "From ", 5) == 0) {
  28165. !             (void) write (fd, ">", 1);
  28166.               size++;
  28167.           }
  28168.           i = strlen (buffer);
  28169. --- 395,401 ----
  28170.               
  28171.           for (j = 0; fgets (buffer, sizeof buffer, fp) != NULL; j++) {
  28172.           if (j != 0 && strncmp (buffer, "From ", 5) == 0) {
  28173. !             (void) write (md, ">", 1);
  28174.               size++;
  28175.           }
  28176.           i = strlen (buffer);
  28177. ***************
  28178. *** 682,688 ****
  28179.       if (read (fd, (char *) &tmpd, sizeof *dp) != sizeof *dp) {
  28180.   #ifdef    notdef
  28181.       admonish (NULLCP, "%s: missing or partial index", file);
  28182. ! #endif    notdef
  28183.       return NOTOK;
  28184.       }
  28185.   #ifndef    NTOHLSWAP
  28186. --- 682,688 ----
  28187.       if (read (fd, (char *) &tmpd, sizeof *dp) != sizeof *dp) {
  28188.   #ifdef    notdef
  28189.       admonish (NULLCP, "%s: missing or partial index", file);
  28190. ! #endif    /* notdef */
  28191.       return NOTOK;
  28192.       }
  28193.   #ifndef    NTOHLSWAP
  28194. *** ../mh-6.7.2/uip/fmtdump.c    Thu Jan 23 16:04:50 1992
  28195. --- uip/fmtdump.c    Tue Nov  3 16:42:33 1992
  28196. ***************
  28197. *** 1,52 ****
  28198.   #ifndef lint
  28199. ! static char ident[] = "@(#)$Id: fmtdump.c,v 1.7 1992/01/24 00:04:45 jromine Exp $";
  28200.   #endif
  28201. - /*
  28202. -  * fmtdump - compile format file and dump out instructions
  28203. -  *
  28204. -  * usage:
  28205. -  *
  28206. -  *    fmtdump [formatfile]
  28207. -  *
  28208. -  */
  28209.   
  28210.   #include "../h/mh.h"
  28211.   #include "../h/formatsbr.h"
  28212.   #include "../h/fmtcompile.h"
  28213.   #include <stdio.h>
  28214.   
  28215. - static struct format *lvec[128];
  28216. - static lused = 0;
  28217.   
  28218. ! char *f_typestr(), *c_typestr();
  28219. ! static int findlabel();
  28220.   
  28221. ! void
  28222. ! main(argc, argv)
  28223. !     int argc;
  28224. !     char **argv;
  28225.   {
  28226. !     int n;
  28227. !     struct format *fmt;
  28228. !     char *file = "scan.format";
  28229. !     char *str;
  28230.   
  28231. !     if (argc > 1)
  28232. !         file = argv[1];
  28233.   
  28234. !     /* Read format file into memory */
  28235. !     str = new_fs(file, 0, 0);
  28236.   
  28237. !     /* Compile format */
  28238. !     n = fmt_compile(str, &fmt);
  28239.   
  28240. !     /* Dump format */
  28241. !     dumpall(fmt);
  28242. !     exit(0);
  28243.   }
  28244.   
  28245. ! dumpall(fmth)
  28246. !     register struct format *fmth;
  28247.   {
  28248.       int i;
  28249.       register struct format *fmt, *addr;
  28250. --- 1,115 ----
  28251. + /* fmtdump.c - compile format file and dump out instructions */
  28252.   #ifndef lint
  28253. ! static char ident[] = "@(#)$Id: fmtdump.c,v 1.10 1992/11/04 00:42:31 jromine Exp $";
  28254.   #endif
  28255.   
  28256.   #include "../h/mh.h"
  28257.   #include "../h/formatsbr.h"
  28258.   #include "../h/fmtcompile.h"
  28259. + #include "../h/scansbr.h"
  28260.   #include <stdio.h>
  28261. + #ifdef LOCALE
  28262. + #include    <locale.h>
  28263. + #endif
  28264.   
  28265.   
  28266. ! static struct swit switches[] = {
  28267. ! #define    FORMSW    0
  28268. !     "form formatfile", 0,
  28269. ! #define    FMTSW    1
  28270. !     "format string", 5,
  28271.   
  28272. ! #define    HELPSW    2
  28273. !     "help", 4,
  28274. ! 
  28275. !     NULL, 0
  28276. ! };
  28277. ! 
  28278. ! 
  28279. ! /* for assignlabel */
  28280. ! static     struct format *lvec[128];
  28281. ! static     lused = 0;
  28282. ! 
  28283. ! static    char *f_typestr(), *c_typestr();
  28284. ! static    void  fmt_dump(), dumpone(), assignlabel(), litputs(), litputc();
  28285. ! static     int   findlabel();
  28286. ! 
  28287. ! /*   */
  28288. ! 
  28289. ! /* ARGSUSED */
  28290. ! 
  28291. ! main (argc, argv)
  28292. ! int     argc;
  28293. ! char   *argv[];
  28294.   {
  28295. !     int    ncomps;
  28296. !     char   *cp,
  28297. !        *form = NULL,
  28298. !        *format = NULL,
  28299. !             buf[100],
  28300. !           **ap,
  28301. !           **argp,
  28302. !            *nfs,
  28303. !            *arguments[MAXARGS];
  28304. !     struct format *fmt;
  28305.   
  28306. ! #ifdef LOCALE
  28307. !     setlocale(LC_ALL, "");
  28308. ! #endif
  28309. !     invo_name = r1bindex (argv[0], '/');
  28310. !     if ((cp = m_find (invo_name)) != NULL) {
  28311. !     ap = brkstring (cp = getcpy (cp), " ", "\n");
  28312. !     ap = copyip (ap, arguments);
  28313. !     }
  28314. !     else
  28315. !     ap = arguments;
  28316. !     (void) copyip (argv + 1, ap);
  28317. !     argp = arguments;
  28318.   
  28319. ! /*   */
  28320.   
  28321. !     while (cp = *argp++) {
  28322. !     if (*cp == '-')
  28323. !         switch (smatch (++cp, switches)) {
  28324. !         case AMBIGSW: 
  28325. !             ambigsw (cp, switches);
  28326. !             done (1);
  28327. !         case UNKWNSW: 
  28328. !             adios (NULLCP, "-%s unknown", cp);
  28329. !         case HELPSW: 
  28330. !             (void) sprintf (buf, "%s [switches]",
  28331. !                 invo_name);
  28332. !             help (buf, switches);
  28333. !             done (1);
  28334.   
  28335. !         case FORMSW: 
  28336. !             if (!(form = *argp++) || *form == '-')
  28337. !             adios (NULLCP, "missing argument to %s", argp[-2]);
  28338. !             format = NULL;
  28339. !             continue;
  28340. !         case FMTSW: 
  28341. !             if (!(format = *argp++) || *format == '-')
  28342. !             adios (NULLCP, "missing argument to %s", argp[-2]);
  28343. !             form = NULL;
  28344. !             continue;
  28345. ! 
  28346. !         }
  28347. !     if (form)
  28348. !         adios (NULLCP, "only one form at a time!");
  28349. !     else
  28350. !         form = cp;
  28351. !     }
  28352. ! 
  28353. !     nfs = new_fs (form, format, FORMAT);    /* must be before chdir() */
  28354. !     ncomps = fmt_compile(nfs, &fmt);
  28355. ! 
  28356. !     fmt_dump(fmt);
  28357. !     done(0);
  28358.   }
  28359.   
  28360. ! static void
  28361. ! fmt_dump (fmth)
  28362. ! register struct format *fmth;
  28363.   {
  28364.       int i;
  28365.       register struct format *fmt, *addr;
  28366. ***************
  28367. *** 78,83 ****
  28368. --- 141,147 ----
  28369.       }
  28370.   }
  28371.   
  28372. + static void
  28373.   dumpone(fmt)
  28374.       register struct format *fmt;
  28375.   {
  28376. ***************
  28377. *** 202,208 ****
  28378.       case FT_IF_S_NULL:
  28379.       case FT_IF_MATCH:
  28380.       case FT_IF_AMATCH:
  28381. !         printf(" false, goto");
  28382.       case FT_GOTO:
  28383.           i = findlabel(fmt + fmt->f_skip);
  28384.           printf(" L%d", i);
  28385. --- 266,272 ----
  28386.       case FT_IF_S_NULL:
  28387.       case FT_IF_MATCH:
  28388.       case FT_IF_AMATCH:
  28389. !         printf(" continue else goto");
  28390.       case FT_GOTO:
  28391.           i = findlabel(fmt + fmt->f_skip);
  28392.           printf(" L%d", i);
  28393. ***************
  28394. *** 212,218 ****
  28395.       case FT_IF_V_NE:
  28396.       case FT_IF_V_GT:
  28397.           i = findlabel(fmt + fmt->f_skip);
  28398. !         printf(" %d goto L%d", fmt->f_value, i);
  28399.           break;
  28400.   
  28401.       case FT_V_EQ:
  28402. --- 276,282 ----
  28403.       case FT_IF_V_NE:
  28404.       case FT_IF_V_GT:
  28405.           i = findlabel(fmt + fmt->f_skip);
  28406. !         printf(" %d continue else goto L%d", fmt->f_value, i);
  28407.           break;
  28408.   
  28409.       case FT_V_EQ:
  28410. ***************
  28411. *** 222,227 ****
  28412. --- 286,292 ----
  28413.       case FT_LV_PLUS_L:
  28414.       case FT_LV_MINUS_L:
  28415.       case FT_LV_DIVIDE_L:
  28416. +     case FT_LV_MODULO_L:
  28417.           printf(" value %d", fmt->f_value);
  28418.           break;
  28419.   
  28420. ***************
  28421. *** 258,263 ****
  28422. --- 323,329 ----
  28423.       return(-1);
  28424.   }
  28425.   
  28426. + static void
  28427.   assignlabel(addr)
  28428.       register struct format *addr;
  28429.   {
  28430. ***************
  28431. *** 264,270 ****
  28432.       lvec[lused++] = addr;
  28433.   }
  28434.   
  28435. ! char *
  28436.   f_typestr(t)
  28437.       int t;
  28438.   {
  28439. --- 330,336 ----
  28440.       lvec[lused++] = addr;
  28441.   }
  28442.   
  28443. ! static char *
  28444.   f_typestr(t)
  28445.       int t;
  28446.   {
  28447. ***************
  28448. *** 297,302 ****
  28449. --- 363,369 ----
  28450.       case FT_LV_PLUS_L: return("LV_PLUS_L");
  28451.       case FT_LV_MINUS_L: return("LV_MINUS_L");
  28452.       case FT_LV_DIVIDE_L: return("LV_DIVIDE_L");
  28453. +     case FT_LV_MODULO_L: return("LV_MODULO_L");
  28454.       case FT_LV_CHAR_LEFT: return("LV_CHAR_LEFT");
  28455.       case FT_LS_MONTH: return("LS_MONTH");
  28456.       case FT_LS_LMONTH: return("LS_LMONTH");
  28457. ***************
  28458. *** 372,378 ****
  28459.           strcat(buf, "|"); \
  28460.       strcat(buf, s); }
  28461.   
  28462. ! char *
  28463.   c_typestr(t)
  28464.       int t;
  28465.   {
  28466. --- 439,445 ----
  28467.           strcat(buf, "|"); \
  28468.       strcat(buf, s); }
  28469.   
  28470. ! static char *
  28471.   c_typestr(t)
  28472.       int t;
  28473.   {
  28474. ***************
  28475. *** 393,398 ****
  28476. --- 460,466 ----
  28477.   #undef FNORD
  28478.   }
  28479.   
  28480. + static void
  28481.   litputs(s)
  28482.       register char *s;
  28483.   {
  28484. ***************
  28485. *** 405,410 ****
  28486. --- 473,479 ----
  28487.           fputs("<nil>", stdout);
  28488.   }
  28489.   
  28490. + static void
  28491.   litputc(c)
  28492.       char c;
  28493.   {
  28494. *** ../mh-6.7.2/uip/folder.c    Mon Jan 14 16:49:55 1991
  28495. --- uip/folder.c    Mon Dec 14 16:21:08 1992
  28496. ***************
  28497. *** 1,12 ****
  28498.   /* folder(s).c - report on folders */
  28499.   #ifndef    lint
  28500. ! static char ident[] = "@(#)$Id: folder.c,v 2.4 90/04/05 14:56:54 sources Exp $";
  28501. ! #endif    lint
  28502.   
  28503.   #include "../h/mh.h"
  28504.   #include "../h/local.h"
  28505.   #include <errno.h>
  28506.   #include <stdio.h>
  28507.   
  28508.   static        dodir(), addir(), addfold(), dother();
  28509.   static int    pfold(), sfold(), compare();
  28510. --- 1,15 ----
  28511.   /* folder(s).c - report on folders */
  28512.   #ifndef    lint
  28513. ! static char ident[] = "@(#)$Id: folder.c,v 2.9 1992/12/15 00:20:22 jromine Exp $";
  28514. ! #endif    /* lint */
  28515.   
  28516.   #include "../h/mh.h"
  28517.   #include "../h/local.h"
  28518.   #include <errno.h>
  28519.   #include <stdio.h>
  28520. + #ifdef LOCALE
  28521. + #include    <locale.h>
  28522. + #endif
  28523.   
  28524.   static        dodir(), addir(), addfold(), dother();
  28525.   static int    pfold(), sfold(), compare();
  28526. ***************
  28527. *** 48,54 ****
  28528.   #define    PRNTSW    13
  28529.       "print", 0,
  28530.   #define    NPRNTSW    14
  28531. !     "noprint", 0,
  28532.   #define    LISTSW    15
  28533.       "list", 0,
  28534.   #define    NLISTSW    16
  28535. --- 51,57 ----
  28536.   #define    PRNTSW    13
  28537.       "print", 0,
  28538.   #define    NPRNTSW    14
  28539. !     "noprint", -4,
  28540.   #define    LISTSW    15
  28541.       "list", 0,
  28542.   #define    NLISTSW    16
  28543. ***************
  28544. *** 61,67 ****
  28545.   #define    HELPSW    19
  28546.       "help", 4,
  28547.   
  28548. !     NULL, NULL
  28549.   };
  28550.   
  28551.   /*   */
  28552. --- 64,70 ----
  28553.   #define    HELPSW    19
  28554.       "help", 4,
  28555.   
  28556. !     NULL, 0
  28557.   };
  28558.   
  28559.   /*   */
  28560. ***************
  28561. *** 108,113 ****
  28562. --- 111,119 ----
  28563.              *arguments[MAXARGS];
  28564.       struct stat st;
  28565.   
  28566. + #ifdef LOCALE
  28567. +     setlocale(LC_ALL, "");
  28568. + #endif
  28569.       invo_name = r1bindex (argv[0], '/');
  28570.       if (argv[0][strlen (argv[0]) - 1] == 's')
  28571.       all++;
  28572. ***************
  28573. *** 201,210 ****
  28574. --- 207,218 ----
  28575.   
  28576.           case PUSHSW: 
  28577.               pushsw++;
  28578. +             listsw++;
  28579.               popsw = 0;
  28580.               continue;
  28581.           case POPSW: 
  28582.               popsw++;
  28583. +             listsw++;
  28584.               pushsw = 0;
  28585.               continue;
  28586.           }
  28587. ***************
  28588. *** 267,273 ****
  28589.       m_update ();
  28590.       argfolder = NULL;
  28591.       }
  28592. !     if (pushsw || popsw || listsw) {
  28593.       printf ("%s", argfolder ? argfolder : m_getfolder ());
  28594.       if (cp = m_find (stack)) {
  28595.           for (ap = brkstring (dp = getcpy (cp), " ", "\n"); *ap; ap++)
  28596. --- 275,281 ----
  28597.       m_update ();
  28598.       argfolder = NULL;
  28599.       }
  28600. !     if (listsw) {
  28601.       printf ("%s", argfolder ? argfolder : m_getfolder ());
  28602.       if (cp = m_find (stack)) {
  28603.           for (ap = brkstring (dp = getcpy (cp), " ", "\n"); *ap; ap++)
  28604. ***************
  28605. *** 284,300 ****
  28606.   
  28607.       if (all) {
  28608.       fheader = 0;
  28609. !     if (argfolder || msg) {
  28610. !         (void) strcpy (folder, argfolder ? argfolder : m_getfolder ());
  28611. ! 
  28612. !         if (pfold (argfolder, msg) && argfolder) {
  28613.           m_replace (pfolder, argfolder);
  28614.           m_update ();
  28615.           }
  28616. !         if (!frecurse)    /* counter-intuitive */
  28617. !         dodir (folder);
  28618.       }
  28619.       else {
  28620.           dother ();
  28621.   
  28622.           (void) strcpy (folder, (cp = m_find (pfolder)) ? cp : "");
  28623. --- 292,309 ----
  28624.   
  28625.       if (all) {
  28626.       fheader = 0;
  28627. !     if (argfolder) {
  28628. !         (void) strcpy (folder, argfolder);
  28629. !         if (pfold (argfolder, msg)) {
  28630.           m_replace (pfolder, argfolder);
  28631.           m_update ();
  28632.           }
  28633. !         if (!frecurse)    /* recurse not done in pfold(), */
  28634. !         dodir (folder);    /* so just list all level-1 sub-folders */
  28635.       }
  28636.       else {
  28637. +         if (msg)
  28638. +         admonish (NULLCP, "no folder given for message %s", msg);
  28639.           dother ();
  28640.   
  28641.           (void) strcpy (folder, (cp = m_find (pfolder)) ? cp : "");
  28642. ***************
  28643. *** 511,524 ****
  28644.       struct stat st;
  28645.   #ifdef SYS5DIR
  28646.       register struct dirent *dp;
  28647. ! #else  SYS5DIR
  28648.       register struct direct *dp;
  28649. ! #endif SYS5DIR
  28650.       register    DIR * dd;
  28651.   
  28652.       cp = name + strlen (name);
  28653.       *cp++ = '/';
  28654. !     *cp = NULL;
  28655.   
  28656.       base = strcmp (name, "./") ? name : name + 2;/* hack */
  28657.   
  28658. --- 520,533 ----
  28659.       struct stat st;
  28660.   #ifdef SYS5DIR
  28661.       register struct dirent *dp;
  28662. ! #else /* SYS5DIR */
  28663.       register struct direct *dp;
  28664. ! #endif /* SYS5DIR */
  28665.       register    DIR * dd;
  28666.   
  28667.       cp = name + strlen (name);
  28668.       *cp++ = '/';
  28669. !     *cp = '\0';
  28670.   
  28671.       base = strcmp (name, "./") ? name : name + 2;/* hack */
  28672.   
  28673. ***************
  28674. *** 530,538 ****
  28675.       if (strcmp (dp -> d_name, ".") && strcmp (dp -> d_name, "..")) {
  28676.   #ifdef SYS5DIR
  28677.           if (cp + dp -> d_reclen + 2 >= name + BUFSIZ)
  28678. ! #else  SYS5DIR
  28679.           if (cp + strlen (dp -> d_name) + 2 >= name + BUFSIZ)
  28680. ! #endif SYS5DIR
  28681.           continue;
  28682.           (void) strcpy (cp, dp -> d_name);
  28683.           if (stat (name, &st) != NOTOK && (st.st_mode & S_IFMT) == S_IFDIR)
  28684. --- 539,547 ----
  28685.       if (strcmp (dp -> d_name, ".") && strcmp (dp -> d_name, "..")) {
  28686.   #ifdef SYS5DIR
  28687.           if (cp + dp -> d_reclen + 2 >= name + BUFSIZ)
  28688. ! #else /* SYS5DIR */
  28689.           if (cp + strlen (dp -> d_name) + 2 >= name + BUFSIZ)
  28690. ! #endif /* SYS5DIR */
  28691.           continue;
  28692.           (void) strcpy (cp, dp -> d_name);
  28693.           if (stat (name, &st) != NOTOK && (st.st_mode & S_IFMT) == S_IFDIR)
  28694. ***************
  28695. *** 540,546 ****
  28696.       }
  28697.       closedir (dd);
  28698.   
  28699. !     *--cp = NULL;
  28700.   }
  28701.   
  28702.   /*   */
  28703. --- 549,555 ----
  28704.       }
  28705.       closedir (dd);
  28706.   
  28707. !     *--cp = '\0';
  28708.   }
  28709.   
  28710.   /*   */
  28711. *** ../mh-6.7.2/uip/forw.c    Thu Apr  5 16:03:37 1990
  28712. --- uip/forw.c    Mon Dec 14 16:21:09 1992
  28713. ***************
  28714. *** 1,7 ****
  28715.   /* forw.c - forward messages */
  28716.   #ifndef    lint
  28717. ! static char ident[] = "@(#)$Id: forw.c,v 1.6 90/04/05 14:59:50 sources Exp $";
  28718. ! #endif    lint
  28719.   
  28720.   #include "../h/mh.h"
  28721.   #include "../h/formatsbr.h"
  28722. --- 1,7 ----
  28723.   /* forw.c - forward messages */
  28724.   #ifndef    lint
  28725. ! static char ident[] = "@(#)$Id: forw.c,v 1.13 1992/12/15 00:20:22 jromine Exp $";
  28726. ! #endif    /* lint */
  28727.   
  28728.   #include "../h/mh.h"
  28729.   #include "../h/formatsbr.h"
  28730. ***************
  28731. *** 9,18 ****
  28732.   #include <stdio.h>
  28733.   #include <sys/types.h>
  28734.   #include <sys/stat.h>
  28735.   
  28736.   
  28737. ! #define    IFMT    "digest-issue-%s"
  28738. ! #define    VFMT    "digest-volume-%s"
  28739.   
  28740.   static    mhl_draft(), copy_draft(), build_form();
  28741.   /*   */
  28742. --- 9,26 ----
  28743.   #include <stdio.h>
  28744.   #include <sys/types.h>
  28745.   #include <sys/stat.h>
  28746. + #ifdef LOCALE
  28747. + #include    <locale.h>
  28748. + #endif
  28749.   
  28750. + #ifndef    MIME
  28751. + #define    MIMEminc(a)    (a)
  28752. + #else    /* MIME */
  28753. + #define    MIMEminc(a)    0
  28754. + #endif    /* MIME */
  28755.   
  28756. ! #define    IFORMAT    "digest-issue-%s"
  28757. ! #define    VFORMAT    "digest-volume-%s"
  28758.   
  28759.   static    mhl_draft(), copy_draft(), build_form();
  28760.   /*   */
  28761. ***************
  28762. *** 50,84 ****
  28763.   #define    NINPLSW    12
  28764.       "noinplace", 0,
  28765.   
  28766. ! #define    DGSTSW    13
  28767.       "digest list", 0,
  28768. ! #define    ISSUESW    14
  28769.       "issue number", 0,
  28770. ! #define    VOLUMSW    15
  28771.       "volume number", 0,
  28772.   
  28773. ! #define    WHATSW    16
  28774.       "whatnowproc program", 0,
  28775. ! #define    NWHATSW    17
  28776.       "nowhatnowproc", 0,
  28777.   
  28778. ! #define    HELPSW    18
  28779.       "help", 4,
  28780.   
  28781. ! #define    FILESW    19
  28782.       "file file", -4,        /* interface from msh */
  28783.   
  28784. ! #define    DASHSW    20
  28785.       "dashmunging", -4,        /* interface to mhl */
  28786. ! #define    NDASHSW    21
  28787.       "nodashmunging", -6,
  28788.   
  28789.   #ifdef    MHE
  28790. ! #define    BILDSW    22
  28791.       "build", -5,        /* interface from mhe */
  28792. ! #endif    MHE
  28793.   
  28794. !     NULL, NULL
  28795.   };
  28796.   
  28797.   /*   */
  28798. --- 58,97 ----
  28799.   #define    NINPLSW    12
  28800.       "noinplace", 0,
  28801.   
  28802. ! #define    MIMESW    13
  28803. !     "mime", MIMEminc(-4),
  28804. ! #define    NMIMESW    14
  28805. !     "nomime", MIMEminc(-6),
  28806. ! 
  28807. ! #define    DGSTSW    15
  28808.       "digest list", 0,
  28809. ! #define    ISSUESW    16
  28810.       "issue number", 0,
  28811. ! #define    VOLUMSW    17
  28812.       "volume number", 0,
  28813.   
  28814. ! #define    WHATSW    18
  28815.       "whatnowproc program", 0,
  28816. ! #define    NWHATSW    19
  28817.       "nowhatnowproc", 0,
  28818.   
  28819. ! #define    HELPSW    20
  28820.       "help", 4,
  28821.   
  28822. ! #define    FILESW    21
  28823.       "file file", -4,        /* interface from msh */
  28824.   
  28825. ! #define    DASHSW    22
  28826.       "dashmunging", -4,        /* interface to mhl */
  28827. ! #define    NDASHSW    23
  28828.       "nodashmunging", -6,
  28829.   
  28830.   #ifdef    MHE
  28831. ! #define    BILDSW    24
  28832.       "build", -5,        /* interface from mhe */
  28833. ! #endif    /* MHE */
  28834.   
  28835. !     NULL, 0
  28836.   };
  28837.   
  28838.   /*   */
  28839. ***************
  28840. *** 95,101 ****
  28841.   #define NEWSW    4
  28842.       "new", 0,
  28843.   
  28844. !     NULL, NULL
  28845.   };
  28846.   
  28847.   
  28848. --- 108,114 ----
  28849.   #define NEWSW    4
  28850.       "new", 0,
  28851.   
  28852. !     NULL, 0
  28853.   };
  28854.   
  28855.   
  28856. ***************
  28857. *** 105,111 ****
  28858.       "list", 0,
  28859.       "refile +folder", 0,
  28860.   
  28861. !     NULL, NULL
  28862.   };
  28863.   
  28864.   /*   */
  28865. --- 118,124 ----
  28866.       "list", 0,
  28867.       "refile +folder", 0,
  28868.   
  28869. !     NULL, 0
  28870.   };
  28871.   
  28872.   /*   */
  28873. ***************
  28874. *** 133,144 ****
  28875.       int     msgp = 0,
  28876.               anot = 0,
  28877.               inplace = 0,
  28878.           issue = 0,
  28879.           volume = 0,
  28880.           dashflg = 1,
  28881.   #ifdef    MHE
  28882.           buildsw = 0,
  28883. ! #endif    MHE
  28884.           nedit = 0,
  28885.           nwhat = 0,
  28886.           i,
  28887. --- 146,158 ----
  28888.       int     msgp = 0,
  28889.               anot = 0,
  28890.               inplace = 0,
  28891. +         mime = 0,
  28892.           issue = 0,
  28893.           volume = 0,
  28894.           dashflg = 1,
  28895.   #ifdef    MHE
  28896.           buildsw = 0,
  28897. ! #endif    /* MHE */
  28898.           nedit = 0,
  28899.           nwhat = 0,
  28900.           i,
  28901. ***************
  28902. *** 165,170 ****
  28903. --- 179,187 ----
  28904.              *msgs[MAXARGS];
  28905.       struct stat st;
  28906.   
  28907. + #ifdef LOCALE
  28908. +     setlocale(LC_ALL, "");
  28909. + #endif
  28910.       invo_name = r1bindex (argv[0], '/');
  28911.       if ((cp = m_find (invo_name)) != NULL) {
  28912.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  28913. ***************
  28914. *** 215,221 ****
  28915.   #ifdef    MHE
  28916.           case BILDSW:
  28917.               buildsw++;    /* fall... */
  28918. ! #endif    MHE
  28919.           case NWHATSW: 
  28920.               nwhat++;
  28921.               continue;
  28922. --- 232,238 ----
  28923.   #ifdef    MHE
  28924.           case BILDSW:
  28925.               buildsw++;    /* fall... */
  28926. ! #endif    /* MHE */
  28927.           case NWHATSW: 
  28928.               nwhat++;
  28929.               continue;
  28930. ***************
  28931. *** 231,236 ****
  28932. --- 248,254 ----
  28933.               if (!(cp = *argp++) || *cp == '-')
  28934.               adios (NULLCP, "missing argument to %s", argp[-2]);
  28935.               filter = getcpy (libpath (cp));
  28936. +             mime = 0;
  28937.               continue;
  28938.           case FORMSW: 
  28939.               if (!(form = *argp++) || *form == '-')
  28940. ***************
  28941. *** 251,259 ****
  28942. --- 269,288 ----
  28943.               inplace = 0;
  28944.               continue;
  28945.   
  28946. +         case MIMESW:
  28947. + #ifdef    MIME
  28948. +             mime++;
  28949. +             filter = NULL;
  28950. + #endif
  28951. +             continue;
  28952. +         case NMIMESW: 
  28953. +             mime = 0;
  28954. +             continue;
  28955. + 
  28956.           case DGSTSW: 
  28957.               if (!(digest = *argp++) || *digest == '-')
  28958.               adios (NULLCP, "missing argument to %s", argp[-2]);
  28959. +             mime = 0;
  28960.               continue;
  28961.           case ISSUESW:
  28962.               if (!(cp = *argp++) || *cp == '-')
  28963. ***************
  28964. *** 317,327 ****
  28965.   #ifndef MHE
  28966.       (void) strcpy (drft, m_draft (dfolder, dmsg, NOUSE, &isdf));
  28967.       if (stat (drft, &st) != NOTOK) {
  28968. ! #else    MHE
  28969.       (void) strcpy (drft, buildsw ? m_maildir ("draft")
  28970.                 : m_draft (dfolder, NULLCP, NOUSE, &isdf));
  28971.       if (!buildsw && stat (drft, &st) != NOTOK) {
  28972. ! #endif    MHE
  28973.       printf ("Draft \"%s\" exists (%ld bytes).", drft, st.st_size);
  28974.       for (i = LISTDSW; i != YESW;) {
  28975.           if (!(argp = getans ("\nDisposition? ", isdf ? aqrnl : aqrl)))
  28976. --- 346,356 ----
  28977.   #ifndef MHE
  28978.       (void) strcpy (drft, m_draft (dfolder, dmsg, NOUSE, &isdf));
  28979.       if (stat (drft, &st) != NOTOK) {
  28980. ! #else    /* MHE */
  28981.       (void) strcpy (drft, buildsw ? m_maildir ("draft")
  28982.                 : m_draft (dfolder, NULLCP, NOUSE, &isdf));
  28983.       if (!buildsw && stat (drft, &st) != NOTOK) {
  28984. ! #endif    /* MHE */
  28985.       printf ("Draft \"%s\" exists (%ld bytes).", drft, st.st_size);
  28986.       for (i = LISTDSW; i != YESW;) {
  28987.           if (!(argp = getans ("\nDisposition? ", isdf ? aqrnl : aqrl)))
  28988. ***************
  28989. *** 381,387 ****
  28990.   
  28991.       if (digest) {
  28992.       if (issue == 0) {
  28993. !         (void) sprintf (buf, IFMT, digest);
  28994.           if (volume == 0
  28995.               && (cp = m_find (buf))
  28996.               && ((issue = atoi (cp)) < 0))
  28997. --- 410,416 ----
  28998.   
  28999.       if (digest) {
  29000.       if (issue == 0) {
  29001. !         (void) sprintf (buf, IFORMAT, digest);
  29002.           if (volume == 0
  29003.               && (cp = m_find (buf))
  29004.               && ((issue = atoi (cp)) < 0))
  29005. ***************
  29006. *** 389,395 ****
  29007.           issue++;
  29008.       }
  29009.       if (volume == 0)
  29010. !         (void) sprintf (buf, VFMT, digest);
  29011.           if ((cp = m_find (buf)) == NULL || (volume = atoi (cp)) <= 0)
  29012.           volume = 1;
  29013.       if (!form)
  29014. --- 418,424 ----
  29015.           issue++;
  29016.       }
  29017.       if (volume == 0)
  29018. !         (void) sprintf (buf, VFORMAT, digest);
  29019.           if ((cp = m_find (buf)) == NULL || (volume = atoi (cp)) <= 0)
  29020.           volume = 1;
  29021.       if (!form)
  29022. ***************
  29023. *** 427,440 ****
  29024.       if (filter)
  29025.       mhl_draft (out, digest, volume, issue, drft, filter, dashflg);
  29026.       else
  29027. !     copy_draft (out, digest, drft, volume, issue);
  29028.       (void) close (out);
  29029.   
  29030.       if (digest) {
  29031. !     (void) sprintf (buf, IFMT, digest);
  29032.       (void) sprintf (value, "%d", issue);
  29033.       m_replace (buf, getcpy (value));
  29034. !     (void) sprintf (buf, VFMT, digest);
  29035.       (void) sprintf (value, "%d", volume);
  29036.       m_replace (buf, getcpy (value));
  29037.       }
  29038. --- 456,469 ----
  29039.       if (filter)
  29040.       mhl_draft (out, digest, volume, issue, drft, filter, dashflg);
  29041.       else
  29042. !     copy_draft (out, digest, drft, volume, issue, mime);
  29043.       (void) close (out);
  29044.   
  29045.       if (digest) {
  29046. !     (void) sprintf (buf, IFORMAT, digest);
  29047.       (void) sprintf (value, "%d", issue);
  29048.       m_replace (buf, getcpy (value));
  29049. !     (void) sprintf (buf, VFORMAT, digest);
  29050.       (void) sprintf (value, "%d", volume);
  29051.       m_replace (buf, getcpy (value));
  29052.       }
  29053. ***************
  29054. *** 448,454 ****
  29055.   edit_it: ;
  29056.       if (nwhat)
  29057.       done (0);
  29058. !     (void) m_whatnow (ed, nedit, NOUSE, drft, NULLCP, 0, mp,
  29059.       anot ? "Forwarded" : NULLCP, inplace, cwd);
  29060.       done (1);
  29061.   }
  29062. --- 477,483 ----
  29063.   edit_it: ;
  29064.       if (nwhat)
  29065.       done (0);
  29066. !     (void) what_now (ed, nedit, NOUSE, drft, NULLCP, 0, mp,
  29067.       anot ? "Forwarded" : NULLCP, inplace, cwd);
  29068.       done (1);
  29069.   }
  29070. ***************
  29071. *** 525,534 ****
  29072.   
  29073.   /*   */
  29074.   
  29075. ! static    copy_draft (out, digest, file, volume, issue)
  29076.   int     out,
  29077.           volume,
  29078. !         issue;
  29079.   register char   *digest,
  29080.           *file;
  29081.   {
  29082. --- 554,564 ----
  29083.   
  29084.   /*   */
  29085.   
  29086. ! static    copy_draft (out, digest, file, volume, issue, mime)
  29087.   int     out,
  29088.           volume,
  29089. !         issue,
  29090. !     mime;
  29091.   register char   *digest,
  29092.           *file;
  29093.   {
  29094. ***************
  29095. *** 539,544 ****
  29096. --- 569,589 ----
  29097.                      *msgnam;
  29098.       char    buffer[BUFSIZ];
  29099.   
  29100. + #ifdef MIME
  29101. +     if (mime) {
  29102. +     (void) sprintf (buffer, "#forw [] +%s", mp -> foldpath);
  29103. +     (void) write (out, buffer, strlen (buffer));
  29104. +     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  29105. +         if (mp -> msgstats[msgnum] & SELECTED) {
  29106. +         (void) sprintf (buffer, " %s", m_name (msgnum));
  29107. +         (void) write (out, buffer, strlen (buffer));
  29108. +         }
  29109. +     (void) write (out, "\n", 1);
  29110. + 
  29111. +     return;
  29112. +     }
  29113. + #endif /* MIME */
  29114. + 
  29115.       msgcnt = 1;
  29116.       for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  29117.       if (mp -> msgstats[msgnum] & SELECTED) {
  29118. ***************
  29119. *** 580,586 ****
  29120.       for (bp = buffer + i; i > 1; i--)
  29121.           *bp++ = '*';
  29122.       *bp++ = '\n';
  29123. !     *bp = NULL;
  29124.       (void) write (out, buffer, strlen (buffer));
  29125.       }
  29126.   }
  29127. --- 625,631 ----
  29128.       for (bp = buffer + i; i > 1; i--)
  29129.           *bp++ = '*';
  29130.       *bp++ = '\n';
  29131. !     *bp = 0;
  29132.       (void) write (out, buffer, strlen (buffer));
  29133.       }
  29134.   }
  29135. ***************
  29136. *** 601,607 ****
  29137.       register    FILE *tmp;
  29138.       register struct comp *cptr;
  29139.       struct format *fmt;
  29140. !     int     dat[4];
  29141.   
  29142.       nfs = new_fs (form, NULLCP, NULLCP);
  29143.       fmtsize = strlen (nfs) + 256;
  29144. --- 646,652 ----
  29145.       register    FILE *tmp;
  29146.       register struct comp *cptr;
  29147.       struct format *fmt;
  29148. !     int     dat[5];
  29149.   
  29150.       nfs = new_fs (form, NULLCP, NULLCP);
  29151.       fmtsize = strlen (nfs) + 256;
  29152. ***************
  29153. *** 618,623 ****
  29154. --- 663,669 ----
  29155.       dat[1] = volume;
  29156.       dat[2] = 0;
  29157.       dat[3] = fmtsize;
  29158. +     dat[4] = 0;
  29159.   
  29160.       (void) strcpy (tmpfil, m_tmpfil (invo_name));
  29161.       if ((tmp = fopen (tmpfil, "w+")) == NULL)
  29162. *** /dev/null    Tue Dec 15 08:01:10 1992
  29163. --- uip/ftpsbr.c    Thu Dec  3 08:50:36 1992
  29164. ***************
  29165. *** 0 ****
  29166. --- 1,601 ----
  29167. + /* ftpsbr.c - simple FTP client library (why doesn't BSD have one?!?) */
  29168. + 
  29169. + #ifndef    lint
  29170. + static char ident[] = "@(#)$Id: ftpsbr.c,v 1.10 1992/12/03 16:50:27 jromine Exp $";
  29171. + #endif
  29172. + 
  29173. + #include "../h/mh.h"
  29174. + #include "../h/mhn.h"
  29175. + #ifdef    FTP
  29176. + #include <ctype.h>
  29177. + #ifdef SVR4
  29178. + #undef NULLVP          /* stdio.h */
  29179. + #endif
  29180. + #include <stdio.h>
  29181. + #include <arpa/ftp.h>
  29182. + #ifdef __STDC__
  29183. + #include <stdarg.h>
  29184. + #else
  29185. + #include <varargs.h>
  29186. + #endif
  29187. + 
  29188. + #ifdef __STDC__
  29189. + static int    command(int arg1, ...);
  29190. + #else
  29191. + static int    command();
  29192. + #endif
  29193. + 
  29194. + static int  ftp_quit(), ftp_read(), initconn(),
  29195. +         dataconn(), _command(), getreply();
  29196. + 
  29197. + /*     DATA */
  29198. + 
  29199. + #define    v_debug        debugsw
  29200. + #define    v_verbose    verbosw
  29201. + 
  29202. + 
  29203. + static    int    ftp_fd = NOTOK;
  29204. + static    int    data_fd = NOTOK;
  29205. + 
  29206. + static    int    v_noise;
  29207. + 
  29208. + extern    int    v_debug;
  29209. + extern    int    v_verbose;
  29210. + 
  29211. + /*   */
  29212. + 
  29213. + #if    defined(SYS5) && defined(AUX)
  29214. + #define u_short ushort
  29215. + #define u_long  ulong
  29216. + #endif
  29217. + 
  29218. + 
  29219. + /* taken from ISODE's compat/internet.c */
  29220. + 
  29221. + #include <sys/types.h>
  29222. + #include <sys/socket.h>
  29223. + #include <netinet/in.h>
  29224. + #include <netdb.h>
  29225. + 
  29226. + #if    defined(BIND) && !defined(h_addr)
  29227. + #define    h_addr    h_addr_list[0]
  29228. + #endif
  29229. + 
  29230. + #define    inaddr_copy(hp,sin) \
  29231. +     bcopy ((hp) -> h_addr, (char *) &((sin) -> sin_addr), (hp) -> h_length)
  29232. + 
  29233. + #ifndef    DG
  29234. + u_long    inet_addr ();
  29235. + #else
  29236. + struct in_addr inet_addr ();
  29237. + #endif
  29238. + 
  29239. + 
  29240. + static char *empty = NULL;
  29241. + #ifdef    h_addr
  29242. + static char *addrs[2] = { NULL };
  29243. + #endif
  29244. + 
  29245. + static struct hostent *gethostbystring (s)
  29246. + char   *s;
  29247. + {
  29248. +     register struct hostent *h;
  29249. + #ifndef    DG
  29250. +     static u_long iaddr;
  29251. + #else
  29252. +     static struct in_addr iaddr;
  29253. + #endif
  29254. +     static struct hostent   hs;
  29255. + 
  29256. +     iaddr = inet_addr (s);
  29257. + #ifndef    DG
  29258. +     if (iaddr == NOTOK && strcmp (s, "255.255.255.255"))
  29259. + #else
  29260. +     if (iaddr.s_addr == NOTOK && strcmp (s, "255.255.255.255"))
  29261. + #endif
  29262. +     return gethostbyname (s);
  29263. + 
  29264. +     h = &hs;
  29265. +     h -> h_name = s;
  29266. +     h -> h_aliases = ∅
  29267. +     h -> h_addrtype = AF_INET;
  29268. +     h -> h_length = sizeof (iaddr);
  29269. + #ifdef    h_addr
  29270. +     h -> h_addr_list = addrs;
  29271. +     bzero ((char *) addrs, sizeof addrs);
  29272. + #endif
  29273. +     h -> h_addr = (char *) &iaddr;
  29274. + 
  29275. +     return h;
  29276. + }
  29277. + 
  29278. + /*   */
  29279. + 
  29280. + extern    int    errno;
  29281. + extern    int    sys_nerr;
  29282. + extern    char   *sys_errlist[];
  29283. + 
  29284. + 
  29285. + #define    start_tcp_client(sock,priv) \
  29286. +         socket (AF_INET, SOCK_STREAM, 0)
  29287. + 
  29288. + #define    join_tcp_server(fd, sock) \
  29289. +         connect ((fd), (struct sockaddr *) (sock), sizeof *(sock))
  29290. + 
  29291. + 
  29292. + /* ARGSUSED */
  29293. + 
  29294. + static int  start_tcp_server (sock, backlog, opt1, opt2)
  29295. + struct sockaddr_in *sock;
  29296. + int    backlog,
  29297. +     opt1,
  29298. +     opt2;
  29299. + {
  29300. +     int        eindex,
  29301. +         sd;
  29302. + 
  29303. +     if ((sd = socket (AF_INET, SOCK_STREAM, 0)) == NOTOK)
  29304. +     return NOTOK;
  29305. + 
  29306. +     if (bind (sd, (struct sockaddr *) sock, sizeof *sock) == NOTOK) {
  29307. +     eindex = errno;
  29308. +     (void) close (sd);
  29309. +     errno = eindex;
  29310. +     }
  29311. +     else
  29312. +     (void) listen (sd, backlog);
  29313. + 
  29314. +     return sd;
  29315. + }
  29316. + 
  29317. + static    int    __len__;
  29318. + #define    join_tcp_client(fd,sock) \
  29319. +         accept ((fd), (struct sockaddr *) (sock), \
  29320. +         (__len__ = sizeof *(sock), &__len__))
  29321. + 
  29322. + 
  29323. + #define    read_tcp_socket        read
  29324. + #define    write_tcp_socket    write
  29325. + #define    close_tcp_socket    close
  29326. + 
  29327. + /*   */
  29328. + 
  29329. + static void  _asprintf (bp, what, ap)    /* fmt, args, ... */
  29330. + register char *bp;
  29331. + char   *what;
  29332. + va_list    ap;
  29333. + {
  29334. +     register int    eindex;
  29335. +     char   *fmt;
  29336. + 
  29337. +     eindex = errno;
  29338. + 
  29339. +     *bp = '\0';
  29340. +     fmt = va_arg (ap, char *);
  29341. + 
  29342. +     if (fmt) {
  29343. + #ifndef    VSPRINTF
  29344. +     struct _iobuf iob;
  29345. + #endif
  29346. + 
  29347. + #ifndef    VSPRINTF
  29348. + #ifdef    pyr
  29349. +     bzero ((char *) &iob, sizeof iob);
  29350. +     iob._file = _NFILE;
  29351. + #endif
  29352. +     iob._flag = _IOWRT | _IOSTRG;
  29353. + #if    !defined(vax) && !defined(pyr) && !defined(sequent)
  29354. +     iob._ptr = (unsigned char *) bp;
  29355. + #else
  29356. +     iob._ptr = bp;
  29357. + #endif
  29358. +     iob._cnt = BUFSIZ;
  29359. +     _doprnt (fmt, ap, &iob);
  29360. +     (void) putc ('\0', &iob);
  29361. + #else
  29362. +     (void) vsprintf (bp, fmt, ap);
  29363. + #endif
  29364. +     bp += strlen (bp);
  29365. + 
  29366. +     }
  29367. + 
  29368. +     if (what) {
  29369. +     if (*what) {
  29370. +         (void) sprintf (bp, " %s: ", what);
  29371. +         bp += strlen (bp);
  29372. +     }
  29373. +     if (0 < eindex && eindex < sys_nerr)
  29374. +         (void) strcpy (bp, sys_errlist[eindex]);
  29375. +     else
  29376. +         (void) sprintf (bp, "Error %d", eindex);
  29377. +     bp += strlen (bp);
  29378. +     }
  29379. + 
  29380. +     errno = eindex;
  29381. + }
  29382. + 
  29383. + /*   */
  29384. + 
  29385. + int    ftp_get (host, user, password, cwd, remote, local, ascii, stayopen)
  29386. + char   *host,
  29387. +        *user,
  29388. +        *password,
  29389. +        *cwd,
  29390. +        *remote,
  29391. +        *local;
  29392. + int    ascii,
  29393. +     stayopen;
  29394. + {
  29395. +     int        result;
  29396. + 
  29397. +     if (stayopen <= 0) {
  29398. +     result = ftp_quit ();
  29399. +     if (host == NULL)
  29400. +         return result;
  29401. +     }
  29402. + 
  29403. +     if (ftp_fd == NOTOK) {
  29404. +     struct sockaddr_in in_socket;
  29405. +     register struct hostent *hp;
  29406. +     register struct servent *sp;
  29407. + 
  29408. +     if ((sp = getservbyname ("ftp", "tcp")) == NULL) {
  29409. +         fprintf (stderr, "tcp/ftp: unknown service");
  29410. +         return NOTOK;
  29411. +     }
  29412. +     if ((hp = gethostbystring (host)) == NULL) {
  29413. +         fprintf (stderr, "%s: unknown host\n", host);
  29414. +         return NOTOK;
  29415. +     }
  29416. +     in_socket.sin_family = hp -> h_addrtype;
  29417. +     inaddr_copy (hp, &in_socket);
  29418. +     in_socket.sin_port = sp -> s_port;
  29419. + 
  29420. +     if ((ftp_fd = start_tcp_client ((struct sockaddr_in *) NULL, 0))
  29421. +             == NOTOK) {
  29422. +         perror (host);
  29423. +         return NOTOK;
  29424. +     }
  29425. +     if (join_tcp_server (ftp_fd, &in_socket) == NOTOK) {
  29426. +         perror (host);
  29427. +         (void) close_tcp_socket (ftp_fd), ftp_fd = NOTOK;
  29428. +         return NOTOK;
  29429. +     }
  29430. +     (void) getreply (1, 0);
  29431. + 
  29432. +     if (v_verbose) {
  29433. +         fprintf (stdout, "Connected to %s\n", host);
  29434. +         (void) fflush (stdout);
  29435. +     }
  29436. + 
  29437. +     if (user) {
  29438. +         if ((result = command (0, "USER %s", user)) == CONTINUE)
  29439. +         result = command (1, "PASS %s", password);
  29440. +         if (result != COMPLETE) {
  29441. +         result = NOTOK;
  29442. +         goto out;
  29443. +         }
  29444. +     }
  29445. + 
  29446. +     if (remote == NULL)
  29447. +         return OK;
  29448. +     }
  29449. + 
  29450. +     if (cwd && ((result = command (0, "CWD %s", cwd)) != COMPLETE
  29451. +             && result != CONTINUE)) {
  29452. +     result = NOTOK;
  29453. +     goto out;
  29454. +     }
  29455. + 
  29456. +     if (command (1, ascii ? "TYPE A" : "TYPE I") != COMPLETE) {
  29457. +     result = NOTOK;
  29458. +     goto out;
  29459. +     }
  29460. + 
  29461. +     result = ftp_read (remote, local, ascii);
  29462. + 
  29463. + out: ;
  29464. +     if (result != OK || !stayopen)
  29465. +     (void) ftp_quit ();
  29466. + 
  29467. +     return result;
  29468. + }
  29469. + 
  29470. + /*   */
  29471. + 
  29472. + static int  ftp_quit ()
  29473. + {
  29474. +     int        n;
  29475. + 
  29476. +     if (ftp_fd == NOTOK)
  29477. +     return OK;
  29478. + 
  29479. +     n = command (1, "QUIT");
  29480. + 
  29481. +     (void) close_tcp_socket (ftp_fd), ftp_fd = NOTOK;
  29482. + 
  29483. +     return (n == 0 || n == COMPLETE ? OK : NOTOK);
  29484. + }
  29485. + 
  29486. + /*   */
  29487. + 
  29488. + static int  ftp_read (remote, local, ascii)
  29489. + char    *remote,
  29490. +     *local;
  29491. + int    ascii;
  29492. + {
  29493. +     register int    cc;
  29494. +     int        expectingreply = 0;
  29495. +     char    buffer[BUFSIZ];
  29496. +     FILE   *fp;
  29497. + 
  29498. +     if (initconn () == NOTOK)
  29499. +     goto bad;
  29500. + 
  29501. +     v_noise = v_verbose;
  29502. +     if (command (-1, "RETR %s", remote) != PRELIM)
  29503. +     goto bad;
  29504. + 
  29505. +     expectingreply++;
  29506. +     if (dataconn () == NOTOK) {
  29507. + bad: ;
  29508. +     if (data_fd != NOTOK)
  29509. +         (void) close_tcp_socket (data_fd), data_fd = NOTOK;
  29510. +     if (expectingreply)
  29511. +         (void) getreply (-2, 0);
  29512. + 
  29513. +     return NOTOK;
  29514. +     }
  29515. + 
  29516. +     if ((fp = fopen (local, "w")) == NULL) {
  29517. +     perror (local);
  29518. +     goto bad;
  29519. +     }
  29520. + 
  29521. +     if (ascii) {
  29522. +     int    c;
  29523. +     FILE   *in;
  29524. + 
  29525. +     if (!(in = fdopen (data_fd, "r"))) {
  29526. +         perror ("fdopen");
  29527. +         goto bad;
  29528. +     }
  29529. +     while ((c = getc (in)) != EOF) {
  29530. +         if (c == '\r')
  29531. +         switch (c = getc (in)) {
  29532. +             case EOF:
  29533. +             case '\0':
  29534. +                 c = '\r';
  29535. +             break;
  29536. + 
  29537. +             case '\n':
  29538. +             break;
  29539. + 
  29540. +             default:
  29541. +             (void) putc ('\r', fp);
  29542. +             break;
  29543. +         }
  29544. + 
  29545. +         if (putc (c, fp) == EOF) {
  29546. +         perror ("putc");
  29547. +         (void) fclose (in);
  29548. +         data_fd = NOTOK;
  29549. +         goto bad;
  29550. +         }
  29551. +     }
  29552. + 
  29553. +     (void) fclose (in);
  29554. +     data_fd = NOTOK;
  29555. +     }
  29556. +     else {
  29557. +     while ((cc = read_tcp_socket (data_fd, buffer, sizeof buffer)) > 0)
  29558. +         if (fwrite (buffer, sizeof *buffer, cc, fp) == 0) {
  29559. +         perror ("fwrite");
  29560. +         goto bad;
  29561. +         }
  29562. +     if (cc < 0) {
  29563. +         perror ("read_tcp_socket");
  29564. +         goto bad;
  29565. +     }
  29566. + 
  29567. +     (void) close_tcp_socket (data_fd), data_fd = NOTOK;
  29568. +     }
  29569. + 
  29570. +     (void) fclose (fp);
  29571. + 
  29572. +     v_noise = v_verbose;
  29573. +     return (getreply (1, 0) == COMPLETE ? OK : NOTOK);
  29574. + }
  29575. + 
  29576. + /*   */
  29577. + 
  29578. + static int  initconn ()
  29579. + {
  29580. +     int        len;
  29581. +     register char  *a,
  29582. +            *p;
  29583. +     struct sockaddr_in in_socket;
  29584. + 
  29585. +     if (getsockname (ftp_fd, (struct sockaddr *) &in_socket,
  29586. +              (len = sizeof in_socket, &len)) == NOTOK) {
  29587. +     perror ("getsockname");
  29588. +     return NOTOK;
  29589. +     }
  29590. +     in_socket.sin_port = 0;
  29591. +     if ((data_fd = start_tcp_server (&in_socket, 1, 0, 0)) == NOTOK) {
  29592. +     perror ("start_tcp_server");
  29593. +     return NOTOK;
  29594. +     }
  29595. + 
  29596. +     if (getsockname (data_fd, (struct sockaddr *) &in_socket,
  29597. +              (len = sizeof in_socket, &len)) == NOTOK) {
  29598. +     perror ("getsockname");
  29599. +     return NOTOK;
  29600. +     }
  29601. + 
  29602. +     a = (char *) &in_socket.sin_addr;
  29603. +     p = (char *) &in_socket.sin_port;
  29604. + 
  29605. + #define    UC(b)    (((int) b) & 0xff)
  29606. +     if (command (1, "PORT %d,%d,%d,%d,%d,%d",
  29607. +               UC(a[0]), UC(a[1]), UC(a[2]), UC(a[3]),
  29608. +               UC(p[0]), UC(p[1])) == COMPLETE)
  29609. +     return OK;
  29610. + 
  29611. +     return NOTOK;
  29612. + }
  29613. + 
  29614. + /*   */
  29615. + 
  29616. + static int  dataconn ()
  29617. + {
  29618. +     int        fd;
  29619. +     struct sockaddr_in in_socket;
  29620. +     
  29621. +     if ((fd = join_tcp_client (data_fd, &in_socket)) == NOTOK) {
  29622. +     perror ("join_tcp_client");
  29623. +     return NOTOK;
  29624. +     }
  29625. +     (void) close_tcp_socket (data_fd);
  29626. +     data_fd = fd;
  29627. + 
  29628. +     return OK;
  29629. + }
  29630. + 
  29631. + /*   */
  29632. + 
  29633. + #ifndef    lint
  29634. + #ifdef __STDC__
  29635. + static int  command (int arg1, ...)
  29636. + {
  29637. +     int        val;
  29638. +     va_list ap;
  29639. + 
  29640. +     va_start (ap, arg1);
  29641. + 
  29642. +     val = _command (arg1, ap);
  29643. + 
  29644. +     va_end (ap);
  29645. + 
  29646. +     return val;
  29647. + }
  29648. + #else
  29649. + static int  command (va_alist)
  29650. + va_dcl
  29651. + {
  29652. +     int        val;
  29653. +     va_list ap;
  29654. + 
  29655. +     va_start (ap);
  29656. + 
  29657. +     val = _command (va_arg (ap, int), ap);
  29658. + 
  29659. +     va_end (ap);
  29660. + 
  29661. +     return val;
  29662. + }
  29663. + #endif
  29664. + 
  29665. + static int  _command (complete, ap)
  29666. + int complete;
  29667. + va_list ap;
  29668. + {
  29669. +     int        len;
  29670. +     char    buffer[BUFSIZ];
  29671. + 
  29672. +     if (ftp_fd == NOTOK)
  29673. +     return NOTOK;
  29674. + 
  29675. +     _asprintf (buffer, NULLCP, ap);
  29676. +     if (v_debug)
  29677. +     fprintf (stderr, "<--- %s\n", buffer);
  29678. + 
  29679. +     (void) strcat (buffer, "\r\n");
  29680. +     len = strlen (buffer);
  29681. + 
  29682. +     if (write_tcp_socket (ftp_fd, buffer, len) != len) {
  29683. +     perror ("write_tcp_socket");
  29684. +     return NOTOK;
  29685. +     }
  29686. + 
  29687. +     return (getreply (complete, !strcmp (buffer, "QUIT")));
  29688. + }
  29689. + #else
  29690. + /* VARARGS2 */
  29691. + 
  29692. + static int  command (complete, fmt)
  29693. + int    complete;
  29694. + char   *fmt;
  29695. + {
  29696. +     return command (complete, fmt);
  29697. + }
  29698. + #endif
  29699. + 
  29700. + /*   */
  29701. + 
  29702. + static int  getreply (complete, expecteof)
  29703. + int    complete,
  29704. +     expecteof;
  29705. + {
  29706. +     for (;;) {
  29707. +     register int code,
  29708. +              dig,
  29709. +              n;
  29710. +     int    continuation;
  29711. +     register char *bp;
  29712. +     char    buffer[BUFSIZ];
  29713. + 
  29714. +     code = dig = n = continuation = 0;
  29715. +     bp = buffer;
  29716. + 
  29717. +     for (;;) {
  29718. +         char    c;
  29719. + 
  29720. +         if (read_tcp_socket (ftp_fd, &c, 1) < 1) {
  29721. +         if (expecteof)
  29722. +             return OK;
  29723. + 
  29724. +         perror ("read_tcp_socket");
  29725. +         return DONE;
  29726. +         }
  29727. +         if (c == '\n')
  29728. +         break;
  29729. +         *bp++ = c != '\r' ? c : '\0';
  29730. + 
  29731. +         dig++;
  29732. +         if (dig < 4) {
  29733. +         if (isdigit(c))
  29734. +             code = code * 10 + (c - '0');
  29735. +         else                /* XXX: naughty FTP... */
  29736. +             if (isspace (c))
  29737. +             continuation++;
  29738. +         }
  29739. +         else
  29740. +         if (dig == 4 && c == '-')
  29741. +             continuation++;
  29742. +         if (n == 0)
  29743. +         n = c;
  29744. +     }
  29745. + 
  29746. +     if (v_debug)
  29747. +         fprintf (stderr, "---> %s\n", buffer);
  29748. +     if (continuation)
  29749. +         continue;
  29750. + 
  29751. +     n -= '0';
  29752. + 
  29753. +     if (v_noise) {
  29754. +         fprintf (stdout, "%s\n", buffer);
  29755. +         (void) fflush (stdout);
  29756. +         v_noise = 0;
  29757. +     }
  29758. +     else
  29759. +         if ((complete == -1 && n != PRELIM)
  29760. +             || (complete == 0 && n != CONTINUE && n != COMPLETE)
  29761. +             || (complete == 1 && n != COMPLETE))
  29762. +         fprintf (stderr, "%s\n", buffer);
  29763. + 
  29764. +     return n;
  29765. +     }
  29766. + }
  29767. + #endif
  29768. *** ../mh-6.7.2/uip/inc.c    Thu Apr  5 16:03:29 1990
  29769. --- uip/inc.c    Mon Dec 14 16:21:11 1992
  29770. ***************
  29771. *** 1,12 ****
  29772.   /* inc.c - incorporate messages from a maildrop into a folder */
  29773.   #ifndef    lint
  29774. ! static char ident[] = "@(#)$Id: inc.c,v 1.4 90/04/05 14:57:51 sources Exp $";
  29775. ! #endif    lint
  29776.   
  29777.   #include "../h/mh.h"
  29778.   #ifdef    POP
  29779.   #include "../h/dropsbr.h"
  29780. ! #endif    POP
  29781.   #include "../h/formatsbr.h"
  29782.   #include "../h/scansbr.h"
  29783.   #include "../zotnet/tws.h"
  29784. --- 1,30 ----
  29785.   /* inc.c - incorporate messages from a maildrop into a folder */
  29786.   #ifndef    lint
  29787. ! static char ident[] = "@(#)$Id: inc.c,v 1.20 1992/12/15 00:20:22 jromine Exp $";
  29788. ! #endif    /* lint */
  29789.   
  29790. + #ifdef    MAILGROUP
  29791. + /* Revised: Sat Apr 14 17:08:17 PDT 1990 (marvit@hplabs)
  29792. +  *    Added hpux hacks to set and reset gid to be "mail" as needed. The reset
  29793. +  *    is necessary so inc'ed mail is the group of the inc'er, rather than
  29794. +  *    "mail". We setgid to egid only when [un]locking the mail file. This
  29795. +  *    is also a major security precaution which will not be explained here.
  29796. +  *
  29797. +  * Fri Feb  7 16:04:57 PST 1992        John Romine <bug-mh@ics.uci.edu>
  29798. +  *   NB: I'm not 100% sure that this setgid stuff is secure even now.
  29799. +  */
  29800. + #endif
  29801. + 
  29802.   #include "../h/mh.h"
  29803.   #ifdef    POP
  29804.   #include "../h/dropsbr.h"
  29805. ! #endif
  29806. ! #ifdef KPOP
  29807. ! #include <krb.h>
  29808. ! #endif
  29809. ! #ifdef HESIOD
  29810. ! #include <hesiod.h>
  29811. ! #endif
  29812.   #include "../h/formatsbr.h"
  29813.   #include "../h/scansbr.h"
  29814.   #include "../zotnet/tws.h"
  29815. ***************
  29816. *** 16,47 ****
  29817.   #include <signal.h>
  29818.   #include <sys/types.h>
  29819.   #include <sys/stat.h>
  29820.   
  29821.   /*   */
  29822.   
  29823.   #ifndef    MF
  29824.   #define    MFminc(a)    (a)
  29825. ! #else    MF
  29826.   #define    MFminc(a)    0
  29827. ! #endif    MF
  29828.   
  29829.   #ifndef    POP
  29830.   #define    POPminc(a)    (a)
  29831. ! #else    POP
  29832.   #define    POPminc(a)    0
  29833. ! #endif    POP
  29834.   
  29835.   #ifndef    RPOP
  29836.   #define    RPOPminc(a)    (a)
  29837. ! #else    RPOP
  29838.   #define    RPOPminc(a)    0
  29839. ! #endif    RPOP
  29840.   
  29841.   #ifndef    TMA
  29842.   #define    TMAminc(a)    (a)
  29843. ! #else    TMA
  29844.   #define    TMAminc(a)    0
  29845. ! #endif    TMA
  29846.   
  29847.   static struct swit  switches[] = {
  29848.   #define    AUDSW    0
  29849. --- 34,74 ----
  29850.   #include <signal.h>
  29851.   #include <sys/types.h>
  29852.   #include <sys/stat.h>
  29853. + #ifdef LOCALE
  29854. + #include    <locale.h>
  29855. + #endif
  29856.   
  29857.   /*   */
  29858.   
  29859.   #ifndef    MF
  29860.   #define    MFminc(a)    (a)
  29861. ! #else    /* MF */
  29862.   #define    MFminc(a)    0
  29863. ! #endif    /* MF */
  29864.   
  29865.   #ifndef    POP
  29866.   #define    POPminc(a)    (a)
  29867. ! #else    /* POP */
  29868.   #define    POPminc(a)    0
  29869. ! #endif    /* POP */
  29870.   
  29871.   #ifndef    RPOP
  29872.   #define    RPOPminc(a)    (a)
  29873. ! #else    /* RPOP */
  29874.   #define    RPOPminc(a)    0
  29875. ! #endif    /* RPOP */
  29876.   
  29877. + #ifndef    APOP
  29878. + #define    APOPminc(a)    (a)
  29879. + #else
  29880. + #define    APOPminc(a)    0
  29881. + #endif    /* APOP */
  29882. + 
  29883.   #ifndef    TMA
  29884.   #define    TMAminc(a)    (a)
  29885. ! #else    /* TMA */
  29886.   #define    TMAminc(a)    0
  29887. ! #endif    /* TMA */
  29888.   
  29889.   static struct swit  switches[] = {
  29890.   #define    AUDSW    0
  29891. ***************
  29892. *** 76,108 ****
  29893.   #define    NPACKSW    12
  29894.       "nopack", POPminc (-6),
  29895.   
  29896. ! #define    RPOPSW    13
  29897.       "rpop", RPOPminc (-4),
  29898. ! #define    NRPOPSW    14
  29899.       "norpop", RPOPminc (-6),
  29900.   
  29901. ! #define    SILSW    15
  29902.       "silent", 0,
  29903. ! #define    NSILSW    16
  29904.       "nosilent", 0,
  29905.   
  29906. ! #define    TRNCSW    17
  29907.       "truncate", 0,
  29908. ! #define    NTRNCSW    18
  29909.       "notruncate", 0,
  29910.   
  29911. ! #define    UUCPSW    19
  29912.       "uucp", MFminc (-4),
  29913. ! #define    NUUCPSW    20
  29914.       "nouucp", MFminc (-6),
  29915.   
  29916. ! #define    WIDSW    21
  29917.       "width columns", 0,
  29918.   
  29919. ! #define    HELPSW    22
  29920.       "help", 4,
  29921.   
  29922. !     NULL, NULL
  29923.   };
  29924.   
  29925.   /*   */
  29926. --- 103,140 ----
  29927.   #define    NPACKSW    12
  29928.       "nopack", POPminc (-6),
  29929.   
  29930. ! #define    APOPSW    13
  29931. !     "apop", APOPminc (-4),
  29932. ! #define    NAPOPSW    14
  29933. !     "noapop", APOPminc (-6),
  29934. ! 
  29935. ! #define    RPOPSW    15
  29936.       "rpop", RPOPminc (-4),
  29937. ! #define    NRPOPSW    16
  29938.       "norpop", RPOPminc (-6),
  29939.   
  29940. ! #define    SILSW    17
  29941.       "silent", 0,
  29942. ! #define    NSILSW    18
  29943.       "nosilent", 0,
  29944.   
  29945. ! #define    TRNCSW    19
  29946.       "truncate", 0,
  29947. ! #define    NTRNCSW    20
  29948.       "notruncate", 0,
  29949.   
  29950. ! #define    UUCPSW    21
  29951.       "uucp", MFminc (-4),
  29952. ! #define    NUUCPSW    22
  29953.       "nouucp", MFminc (-6),
  29954.   
  29955. ! #define    WIDSW    23
  29956.       "width columns", 0,
  29957.   
  29958. ! #define    HELPSW    24
  29959.       "help", 4,
  29960.   
  29961. !     NULL, 0
  29962.   };
  29963.   
  29964.   /*   */
  29965. ***************
  29966. *** 124,135 ****
  29967.   
  29968.   static int    pop_action (), pop_pack ();
  29969.   static int    map_count();
  29970. ! #endif    POP
  29971.   
  29972.   /*   * /
  29973.   
  29974.   /* ARGSUSED */
  29975.   
  29976.   main (argc, argv)
  29977.   int    argc;
  29978.   char   *argv[];
  29979. --- 156,171 ----
  29980.   
  29981.   static int    pop_action (), pop_pack ();
  29982.   static int    map_count();
  29983. ! #endif    /* POP */
  29984.   
  29985.   /*   * /
  29986.   
  29987.   /* ARGSUSED */
  29988.   
  29989. + #ifdef MAILGROUP    /* For setting and returning to "mail" gid */
  29990. + static int return_gid;
  29991. + #endif    /* MAILGROUP */
  29992. + 
  29993.   main (argc, argv)
  29994.   int    argc;
  29995.   char   *argv[];
  29996. ***************
  29997. *** 141,153 ****
  29998.           width = 0,
  29999.   #ifdef    MF
  30000.           uucp = 1,
  30001. ! #endif    MF
  30002.           locked = 0,
  30003.   #ifdef    POP
  30004.           nmsgs,
  30005.           nbytes,
  30006. !         p,
  30007. ! #endif    POP
  30008.           rpop = 1,
  30009.               i,
  30010.           hghnum,
  30011. --- 177,189 ----
  30012.           width = 0,
  30013.   #ifdef    MF
  30014.           uucp = 1,
  30015. ! #endif    /* MF */
  30016.           locked = 0,
  30017.   #ifdef    POP
  30018.           nmsgs,
  30019.           nbytes,
  30020. !         p = 0,
  30021. ! #endif    /* POP */
  30022.           rpop = 1,
  30023.               i,
  30024.           hghnum,
  30025. ***************
  30026. *** 160,169 ****
  30027.              *audfile = NULL,
  30028.              *from = NULL,
  30029.          *host = NULL,
  30030. -        *user = NULL,
  30031.   #ifdef    POP
  30032.          *pass = NULL,
  30033. ! #endif    POP
  30034.              *newmail,
  30035.               buf[100],
  30036.             **ap,
  30037. --- 196,204 ----
  30038.              *audfile = NULL,
  30039.              *from = NULL,
  30040.          *host = NULL,
  30041.   #ifdef    POP
  30042.          *pass = NULL,
  30043. ! #endif    /* POP */
  30044.              *newmail,
  30045.               buf[100],
  30046.             **ap,
  30047. ***************
  30048. *** 170,175 ****
  30049. --- 205,211 ----
  30050.             **argp,
  30051.              *nfs,
  30052.              *arguments[MAXARGS];
  30053. +     char *user = NULL;
  30054.       struct msgs *mp;
  30055.       struct stat st,
  30056.                   s1;
  30057. ***************
  30058. *** 176,191 ****
  30059.       FILE *in, *aud = NULL;
  30060.   #ifdef    MHE
  30061.       FILE *mhe = NULL;
  30062. ! #endif    MHE
  30063.   
  30064.       invo_name = r1bindex (argv[0], '/');
  30065.       mts_init (invo_name);
  30066.   #ifdef    POP
  30067. -     if (pophost && *pophost)
  30068. -     host = pophost;
  30069.       if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  30070.       snoop++;
  30071. ! #endif    POP
  30072.       if ((cp = m_find (invo_name)) != NULL) {
  30073.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  30074.       ap = copyip (ap, arguments);
  30075. --- 212,234 ----
  30076.       FILE *in, *aud = NULL;
  30077.   #ifdef    MHE
  30078.       FILE *mhe = NULL;
  30079. ! #endif    /* MHE */
  30080. ! #ifdef HESIOD
  30081. !     struct hes_postoffice *po;
  30082. !     char *tmphost;
  30083. ! #endif
  30084.   
  30085. + #ifdef LOCALE
  30086. +     setlocale(LC_ALL, "");
  30087. + #endif
  30088.       invo_name = r1bindex (argv[0], '/');
  30089.       mts_init (invo_name);
  30090. + 
  30091.   #ifdef    POP
  30092.       if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  30093.       snoop++;
  30094. ! #endif
  30095. ! 
  30096.       if ((cp = m_find (invo_name)) != NULL) {
  30097.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  30098.       ap = copyip (ap, arguments);
  30099. ***************
  30100. *** 271,282 ****
  30101.           case UUCPSW: 
  30102.   #ifdef    MF
  30103.               uucp++;
  30104. ! #endif    MF
  30105.               continue;
  30106.           case NUUCPSW: 
  30107.   #ifdef    MF
  30108.               uucp = 0;
  30109. ! #endif    MF
  30110.               continue;
  30111.   
  30112.           case HOSTSW:
  30113. --- 314,325 ----
  30114.           case UUCPSW: 
  30115.   #ifdef    MF
  30116.               uucp++;
  30117. ! #endif    /* MF */
  30118.               continue;
  30119.           case NUUCPSW: 
  30120.   #ifdef    MF
  30121.               uucp = 0;
  30122. ! #endif    /* MF */
  30123.               continue;
  30124.   
  30125.           case HOSTSW:
  30126. ***************
  30127. *** 291,309 ****
  30128.   #ifndef    POP
  30129.               if (!(cp = *argp++) || *cp == '-')
  30130.               adios (NULLCP, "missing argument to %s", argp[-2]);
  30131. ! #else    POP
  30132.               if (!(file = *argp++) || *file == '-')
  30133.               adios (NULLCP, "missing argument to %s", argp[-2]);
  30134. ! #endif    POP
  30135.               continue;
  30136.           case NPACKSW:
  30137.   #ifdef    POP
  30138.               file = NULLCP;
  30139. ! #endif    POP
  30140.               continue;
  30141.           case RPOPSW:
  30142. !             rpop++;
  30143.               continue;
  30144.           case NRPOPSW:
  30145.               rpop = 0;
  30146.               continue;
  30147. --- 334,356 ----
  30148.   #ifndef    POP
  30149.               if (!(cp = *argp++) || *cp == '-')
  30150.               adios (NULLCP, "missing argument to %s", argp[-2]);
  30151. ! #else    /* POP */
  30152.               if (!(file = *argp++) || *file == '-')
  30153.               adios (NULLCP, "missing argument to %s", argp[-2]);
  30154. ! #endif    /* POP */
  30155.               continue;
  30156.           case NPACKSW:
  30157.   #ifdef    POP
  30158.               file = NULLCP;
  30159. ! #endif    /* POP */
  30160.               continue;
  30161. +         case APOPSW:
  30162. +             rpop = -1;
  30163. +             continue;
  30164.           case RPOPSW:
  30165. !             rpop = 1;
  30166.               continue;
  30167. +         case NAPOPSW:
  30168.           case NRPOPSW:
  30169.               rpop = 0;
  30170.               continue;
  30171. ***************
  30172. *** 320,336 ****
  30173.   
  30174.   /*   */
  30175.   
  30176.   #ifdef    POP
  30177.       if (host && !*host)
  30178.       host = NULL;
  30179. !     if (from || !host || !rpop)
  30180.       (void) setuid (getuid ());
  30181. ! #endif    POP
  30182.       if (from) {
  30183.       newmail = from;
  30184.   #ifdef    POP
  30185.       host = NULL;
  30186. ! #endif    POP
  30187.       if (stat (newmail, &s1) == NOTOK || s1.st_size == 0)
  30188.           adios (NULLCP, "no mail to incorporate");
  30189.       }
  30190. --- 367,408 ----
  30191.   
  30192.   /*   */
  30193.   
  30194. + #ifdef MAILGROUP
  30195. +     return_gid = getegid();    /* Save effective gid, assuming we'll use it */
  30196. +     setgid(getgid());        /* Turn off extraordinary privileges */
  30197. + #endif    /* MAILGROUP */
  30198. + 
  30199.   #ifdef    POP
  30200. + #ifdef HESIOD
  30201. +     /*
  30202. +      * Scheme is:
  30203. +      *        use MAILHOST environment variable if present,
  30204. +      *  else try Hesiod.
  30205. +      *  If that fails, use the default (if any)
  30206. +      *  provided by mtstailor in mts_init()
  30207. +      */
  30208. +     if (pophost == NULL || pophost[0] == '\0')
  30209. +       {
  30210. +     if ((tmphost = getenv("MAILHOST")) != NULL)
  30211. +       pophost = tmphost;
  30212. +     else if ((po = hes_getmailhost(getusr())) != NULL &&
  30213. +          strcmp(po->po_type, "POP") == 0)
  30214. +       pophost = po->po_host;
  30215. +       }
  30216. + #endif /* HESIOD */
  30217. +     if (pophost && *pophost)
  30218. +     host = pophost;
  30219. + 
  30220.       if (host && !*host)
  30221.       host = NULL;
  30222. !     if (from || !host || rpop <= 0)
  30223.       (void) setuid (getuid ());
  30224. ! #endif /* POP */
  30225.       if (from) {
  30226.       newmail = from;
  30227.   #ifdef    POP
  30228.       host = NULL;
  30229. ! #endif    /* POP */
  30230.       if (stat (newmail, &s1) == NOTOK || s1.st_size == 0)
  30231.           adios (NULLCP, "no mail to incorporate");
  30232.       }
  30233. ***************
  30234. *** 354,360 ****
  30235.           adios (NULLCP, "no mail to incorporate");
  30236.       }
  30237.       }
  30238. ! #endif    POP
  30239.       else {
  30240.       if (((newmail = getenv ("MAILDROP")) && *newmail)
  30241.           || ((newmail = m_find ("maildrop")) && *newmail))
  30242. --- 426,432 ----
  30243.           adios (NULLCP, "no mail to incorporate");
  30244.       }
  30245.       }
  30246. ! #endif    /* POP */
  30247.       else {
  30248.       if (((newmail = getenv ("MAILDROP")) && *newmail)
  30249.           || ((newmail = m_find ("maildrop")) && *newmail))
  30250. ***************
  30251. *** 363,369 ****
  30252.   #ifdef    MF
  30253.           if (uucp && umincproc && *umincproc)
  30254.           get_uucp_mail ();
  30255. ! #endif    MF
  30256.           newmail = concat (MAILDIR, "/", MAILFIL, NULLCP);
  30257.       }
  30258.       if (stat (newmail, &s1) == NOTOK || s1.st_size == 0)
  30259. --- 435,441 ----
  30260.   #ifdef    MF
  30261.           if (uucp && umincproc && *umincproc)
  30262.           get_uucp_mail ();
  30263. ! #endif    /* MF */
  30264.           newmail = concat (MAILDIR, "/", MAILFIL, NULLCP);
  30265.       }
  30266.       if (stat (newmail, &s1) == NOTOK || s1.st_size == 0)
  30267. ***************
  30268. *** 373,382 ****
  30269.   #ifdef    POP
  30270.       if (host && file)
  30271.       goto go_to_it;
  30272. ! #endif    POP
  30273.       if (!m_find ("path"))
  30274.       free (path ("./", TFOLDER));
  30275. !     if (!folder)
  30276.       folder = defalt;
  30277.       maildir = m_maildir (folder);
  30278.   
  30279. --- 445,454 ----
  30280.   #ifdef    POP
  30281.       if (host && file)
  30282.       goto go_to_it;
  30283. ! #endif    /* POP */
  30284.       if (!m_find ("path"))
  30285.       free (path ("./", TFOLDER));
  30286. !     if (!folder && !(folder = m_find (inbox)))
  30287.       folder = defalt;
  30288.       maildir = m_maildir (folder);
  30289.   
  30290. ***************
  30291. *** 401,407 ****
  30292.   #ifdef    POP
  30293.   go_to_it: ;
  30294.       if (host == NULL)
  30295. ! #endif    POP
  30296.       if (access (newmail, 02) == NOTOK) {
  30297.       trnflag = 0;
  30298.       if ((in = fopen (newmail, "r")) == NULL)
  30299. --- 473,479 ----
  30300.   #ifdef    POP
  30301.   go_to_it: ;
  30302.       if (host == NULL)
  30303. ! #endif    /* POP */
  30304.       if (access (newmail, 02) == NOTOK) {
  30305.       trnflag = 0;
  30306.       if ((in = fopen (newmail, "r")) == NULL)
  30307. ***************
  30308. *** 415,425 ****
  30309. --- 487,508 ----
  30310.           (void) signal (SIGQUIT, SIG_IGN);
  30311.           (void) signal (SIGTERM, SIG_IGN);
  30312.       }
  30313. + 
  30314. + #ifdef MAILGROUP
  30315. +     setgid(return_gid);    /* Reset gid to lock mail file */
  30316. + #endif    /* MAILGROUP */
  30317.       if ((in = lkfopen (newmail, "r")) == NULL)
  30318.           adios (NULLCP, "unable to lock and fopen %s", newmail);
  30319. + #ifdef MAILGROUP
  30320. +     setgid(getgid());    /* Return us to normal privileges */
  30321. + #endif    /* MAILGROUP */
  30322.       (void) fstat (fileno(in), &s1);
  30323.       }
  30324.   
  30325. + #ifdef MAILGROUP
  30326. +     setgid(getgid());    /* Return us to normal privileges */
  30327. + #endif    /* MAILGROUP */
  30328. + 
  30329.       if (audfile) {
  30330.       if ((i = stat (audfile, &st)) == NOTOK)
  30331.           advise (NULLCP, "Creating Receive-Audit: %s", audfile);
  30332. ***************
  30333. *** 431,442 ****
  30334.   #ifndef    POP
  30335.       fprintf (aud, from ? "<<inc>> %s  -ms %s\n" : "<<inc>> %s\n",
  30336.           dtimenow (), from);
  30337. ! #else    POP
  30338.       fprintf (aud, from ? "<<inc>> %s -ms %s\n"
  30339.               : host ? "<<inc>> %s -host %s -user %s%s\n"
  30340.               : "<<inc>> %s\n",
  30341. !         dtimenow (), from ? from : host, user, rpop ? " -rpop" : "");
  30342. ! #endif    POP
  30343.       }
  30344.   
  30345.   #ifdef    MHE
  30346. --- 514,526 ----
  30347.   #ifndef    POP
  30348.       fprintf (aud, from ? "<<inc>> %s  -ms %s\n" : "<<inc>> %s\n",
  30349.           dtimenow (), from);
  30350. ! #else    /* POP */
  30351.       fprintf (aud, from ? "<<inc>> %s -ms %s\n"
  30352.               : host ? "<<inc>> %s -host %s -user %s%s\n"
  30353.               : "<<inc>> %s\n",
  30354. !          dtimenow (), from ? from : host, user,
  30355. !          rpop < 0 ? " -apop" : rpop > 0 ? " -rpop" : "");
  30356. ! #endif    /* POP */
  30357.       }
  30358.   
  30359.   #ifdef    MHE
  30360. ***************
  30361. *** 450,456 ****
  30362.           (void) chmod (cp, m_gmprot ());
  30363.       free (cp);
  30364.       }
  30365. ! #endif    MHE
  30366.   
  30367.       nfs = new_fs (form, format, FORMAT);
  30368.   
  30369. --- 534,540 ----
  30370.           (void) chmod (cp, m_gmprot ());
  30371.       free (cp);
  30372.       }
  30373. ! #endif    /* MHE */
  30374.   
  30375.       nfs = new_fs (form, format, FORMAT);
  30376.   
  30377. ***************
  30378. *** 520,531 ****
  30379.           }
  30380.           switch (p = scan (pf, msgnum, 0, nfs, width,
  30381.               file ? 0 : msgnum == mp -> hghmsg + 1 && chgflag,
  30382.               0, stop - start, noisy)) {
  30383.           case SCNEOF: 
  30384.               printf ("%*d  empty\n", DMAXFOLDER, msgnum);
  30385.               break;
  30386.   
  30387. !         case SCNERR: 
  30388.           case SCNNUM: 
  30389.               break;
  30390.   
  30391. --- 604,622 ----
  30392.           }
  30393.           switch (p = scan (pf, msgnum, 0, nfs, width,
  30394.               file ? 0 : msgnum == mp -> hghmsg + 1 && chgflag,
  30395. +             1,    /* check UNSEEN? */
  30396.               0, stop - start, noisy)) {
  30397.           case SCNEOF: 
  30398.               printf ("%*d  empty\n", DMAXFOLDER, msgnum);
  30399.               break;
  30400.   
  30401. !         case SCNFAT:
  30402. !             trnflag = 0;
  30403. !             noisy++;
  30404. !             /* advise (cp, "unable to read"); already advised */
  30405. !             /* fall thru */
  30406. ! 
  30407. !         case SCNERR:
  30408.           case SCNNUM: 
  30409.               break;
  30410.   
  30411. ***************
  30412. *** 537,543 ****
  30413.   #ifdef    MHE
  30414.               if (mhe)
  30415.               fputs (scanl, mhe);
  30416. ! #endif    MHE
  30417.               if (noisy)
  30418.               (void) fflush (stdout);
  30419.               if (!file) {
  30420. --- 628,634 ----
  30421.   #ifdef    MHE
  30422.               if (mhe)
  30423.               fputs (scanl, mhe);
  30424. ! #endif    /* MHE */
  30425.               if (noisy)
  30426.               (void) fflush (stdout);
  30427.               if (!file) {
  30428. ***************
  30429. *** 551,557 ****
  30430.                   mp -> numsel++;
  30431.                   mp -> msgstats[msgnum] |= SELECTED;
  30432.               }
  30433. ! #endif    TMA
  30434.               mp -> msgstats[msgnum] |= UNSEEN;
  30435.               mp -> msgflags |= SEQMOD;
  30436.               }
  30437. --- 642,648 ----
  30438.                   mp -> numsel++;
  30439.                   mp -> msgstats[msgnum] |= SELECTED;
  30440.               }
  30441. ! #endif    /* TMA */
  30442.               mp -> msgstats[msgnum] |= UNSEEN;
  30443.               mp -> msgflags |= SEQMOD;
  30444.               }
  30445. ***************
  30446. *** 560,573 ****
  30447.           if (file) {
  30448.           (void) fseek (pf, stop, 0);
  30449.           (void) fwrite (mmdlm2, 1, strlen (mmdlm2), pf);
  30450. !         if (fflush (pf))
  30451.               adios (file, "write error on");
  30452.           (void) map_write (file, pd, 0, 0L, start, stop, pos, size,
  30453.                   noisy);
  30454.           }
  30455.           else {
  30456. !         if (ferror(pf) || fclose (pf))
  30457. !             adios (file, "write error on");
  30458.           free (cp);
  30459.           }
  30460.   
  30461. --- 651,673 ----
  30462.           if (file) {
  30463.           (void) fseek (pf, stop, 0);
  30464.           (void) fwrite (mmdlm2, 1, strlen (mmdlm2), pf);
  30465. !         if (fflush (pf) || ferror (pf)) {
  30466. !             int e = errno;
  30467. !             (void) pop_quit ();
  30468. !             errno = e;
  30469.               adios (file, "write error on");
  30470. +         }
  30471.           (void) map_write (file, pd, 0, 0L, start, stop, pos, size,
  30472.                   noisy);
  30473.           }
  30474.           else {
  30475. !         if (ferror(pf) || fclose (pf)) {
  30476. !             int e = errno;
  30477. !             (void) unlink (cp);
  30478. !             (void) pop_quit ();
  30479. !             errno = e;
  30480. !             adios (cp, "write error on");
  30481. !         }
  30482.           free (cp);
  30483.           }
  30484.   
  30485. ***************
  30486. *** 582,617 ****
  30487.       }
  30488.       }
  30489.       else {
  30490. ! #endif    POP
  30491.   
  30492.   /*   */
  30493.   
  30494.       m_unknown (in);        /* the MAGIC invocation... */
  30495.       hghnum = msgnum = mp -> hghmsg;
  30496. !     for (;;) {
  30497.       if (msgnum >= mp -> hghoff)
  30498. !         if ((mp = m_remsg (mp, 0, mp -> hghoff + MAXFOLDER)) == NULL)
  30499. !         adios (NULLCP, "unable to allocate folder storage");
  30500.   
  30501.       switch (i = scan (in, msgnum + 1, msgnum + 1, nfs, width,
  30502.               msgnum == hghnum && chgflag,
  30503.               0,
  30504.               0L,
  30505.               noisy)) {
  30506.           case SCNEOF: 
  30507.           break;
  30508.   
  30509. !         case SCNERR: 
  30510.           if (aud)
  30511.               fputs ("inc aborted!\n", aud);
  30512. !         adios (NULLCP, "aborted!");
  30513.   
  30514.           case SCNNUM: 
  30515. !         adios (NULLCP, "more than %d messages in folder %s, %s not zero'd",
  30516.               MAXFOLDER, folder, newmail);
  30517.   
  30518.           default: 
  30519. !         adios (NULLCP, "scan() botch (%d)", i);
  30520.   
  30521.           case SCNMSG:
  30522.           case SCNENC:
  30523. --- 682,726 ----
  30524.       }
  30525.       }
  30526.       else {
  30527. ! #endif    /* POP */
  30528.   
  30529.   /*   */
  30530.   
  30531.       m_unknown (in);        /* the MAGIC invocation... */
  30532.       hghnum = msgnum = mp -> hghmsg;
  30533. !     for (i = 0;;) {
  30534.       if (msgnum >= mp -> hghoff)
  30535. !         if ((mp = m_remsg (mp, 0, mp -> hghoff + MAXFOLDER)) == NULL) {
  30536. !         advise (NULLCP, "unable to allocate folder storage");
  30537. !         i = NOTOK;
  30538. !         break;
  30539. !         }
  30540.   
  30541.       switch (i = scan (in, msgnum + 1, msgnum + 1, nfs, width,
  30542.               msgnum == hghnum && chgflag,
  30543. +             1,    /* check UNSEEN? */
  30544.               0,
  30545.               0L,
  30546.               noisy)) {
  30547. +         case SCNFAT:
  30548.           case SCNEOF: 
  30549.           break;
  30550.   
  30551. !         case SCNERR:
  30552.           if (aud)
  30553.               fputs ("inc aborted!\n", aud);
  30554. !         advise (NULLCP, "aborted!");    /* doesn't clean up locks! */
  30555. !         break;
  30556.   
  30557.           case SCNNUM: 
  30558. !         advise (NULLCP,
  30559. !             "more than %d messages in folder %s, %s not zero'd",
  30560.               MAXFOLDER, folder, newmail);
  30561. +         break;
  30562.   
  30563.           default: 
  30564. !         advise (NULLCP, "scan() botch (%d)", i);
  30565. !         break;
  30566.   
  30567.           case SCNMSG:
  30568.           case SCNENC:
  30569. ***************
  30570. *** 620,626 ****
  30571.   #ifdef    MHE
  30572.           if (mhe)
  30573.               fputs (scanl, mhe);
  30574. ! #endif    MHE
  30575.           if (noisy)
  30576.               (void) fflush (stdout);
  30577.   
  30578. --- 729,735 ----
  30579.   #ifdef    MHE
  30580.           if (mhe)
  30581.               fputs (scanl, mhe);
  30582. ! #endif    /* MHE */
  30583.           if (noisy)
  30584.               (void) fflush (stdout);
  30585.   
  30586. ***************
  30587. *** 635,641 ****
  30588.               mp -> numsel++;
  30589.               mp -> msgstats[msgnum] |= SELECTED;
  30590.           }
  30591. ! #endif    TMA
  30592.           mp -> msgstats[msgnum] |= UNSEEN;
  30593.           mp -> msgflags |= SEQMOD;
  30594.           continue;
  30595. --- 744,750 ----
  30596.               mp -> numsel++;
  30597.               mp -> msgstats[msgnum] |= SELECTED;
  30598.           }
  30599. ! #endif    /* TMA */
  30600.           mp -> msgstats[msgnum] |= UNSEEN;
  30601.           mp -> msgflags |= SEQMOD;
  30602.           continue;
  30603. ***************
  30604. *** 644,669 ****
  30605.       }
  30606.   #ifdef    POP
  30607.       }
  30608. ! #endif    POP
  30609.   
  30610.       if (aud)
  30611.       (void) fclose (aud);
  30612.   #ifdef    MHE
  30613.       if (mhe)
  30614.       (void) fclose (mhe);
  30615. ! #endif    MHE
  30616.       if (noisy)
  30617.       (void) fflush (stdout);
  30618.   #ifdef    POP
  30619.       if (host && file)
  30620.       done (0);
  30621. ! #endif    POP
  30622.   
  30623.   /*   */
  30624.   
  30625.   #ifdef    POP
  30626.       if (host == NULL)
  30627. ! #endif    POP
  30628.       if (trnflag) {
  30629.       if (stat (newmail, &st) != NOTOK && s1.st_mtime != st.st_mtime)
  30630.           advise (NULLCP, "new messages have arrived!\007");
  30631. --- 753,798 ----
  30632.       }
  30633.   #ifdef    POP
  30634.       }
  30635. ! #endif    /* POP */
  30636. ! #ifndef    POP
  30637. !     if (i < 0) {        /* error } */
  30638. ! #else
  30639. !     if (p < 0) {        /* error */
  30640. ! #endif
  30641. !     if (locked)
  30642. ! #ifdef MAILGROUP
  30643. !     {
  30644. !       setgid(return_gid);    /* Be sure we can unlock mail file */
  30645. ! #endif    /* MAILGROUP */
  30646.   
  30647. +         (void) lkfclose (in, newmail);
  30648. + #ifdef MAILGROUP
  30649. +         setgid(getgid());    /* And then return us to normal privileges */
  30650. +      }
  30651. + #endif    /* MAILGROUP */
  30652. +     else
  30653. +         (void) fclose (in);
  30654. +     adios (NULLCP, "failed");
  30655. +     }
  30656. + 
  30657.       if (aud)
  30658.       (void) fclose (aud);
  30659.   #ifdef    MHE
  30660.       if (mhe)
  30661.       (void) fclose (mhe);
  30662. ! #endif    /* MHE */
  30663.       if (noisy)
  30664.       (void) fflush (stdout);
  30665.   #ifdef    POP
  30666.       if (host && file)
  30667.       done (0);
  30668. ! #endif    /* POP */
  30669.   
  30670.   /*   */
  30671.   
  30672.   #ifdef    POP
  30673.       if (host == NULL)
  30674. ! #endif    /* POP */
  30675.       if (trnflag) {
  30676.       if (stat (newmail, &st) != NOTOK && s1.st_mtime != st.st_mtime)
  30677.           advise (NULLCP, "new messages have arrived!\007");
  30678. ***************
  30679. *** 694,702 ****
  30680.   
  30681.   #ifdef    POP
  30682.       if (host == NULL)
  30683. ! #endif    POP
  30684.       if (locked)
  30685. !     (void) lkfclose (in, newmail);
  30686.       else
  30687.       (void) fclose (in);
  30688.   
  30689. --- 823,840 ----
  30690.   
  30691.   #ifdef    POP
  30692.       if (host == NULL)
  30693. ! #endif    /* POP */
  30694.       if (locked)
  30695. ! #ifdef MAILGROUP
  30696. !     {
  30697. !       setgid(return_gid);    /* Be sure we can unlock mail file */
  30698. ! #endif    /* MAILGROUP */
  30699. ! 
  30700. !         (void) lkfclose (in, newmail);
  30701. ! #ifdef MAILGROUP
  30702. !         setgid(getgid());    /* And then return us to normal privileges */
  30703. !      }
  30704. ! #endif    /* MAILGROUP */
  30705.       else
  30706.       (void) fclose (in);
  30707.   
  30708. ***************
  30709. *** 721,726 ****
  30710. --- 859,865 ----
  30711.           }
  30712.           switch (scan (in, msgnum, 0, nfs, width,
  30713.               msgnum == mp -> curmsg,
  30714. +             1,    /* check UNSEEN? */
  30715.               0,
  30716.               fstat (fileno (in), &st) != NOTOK ? (long) st.st_size
  30717.                   : 0L,
  30718. ***************
  30719. *** 740,746 ****
  30720.       if (noisy)
  30721.           (void) fflush (stdout);
  30722.       }
  30723. ! #endif    TMA
  30724.   
  30725.       done (0);
  30726.   }
  30727. --- 879,885 ----
  30728.       if (noisy)
  30729.           (void) fflush (stdout);
  30730.       }
  30731. ! #endif    /* TMA */
  30732.   
  30733.       done (0);
  30734.   }
  30735. ***************
  30736. *** 756,762 ****
  30737.   
  30738.       exit (status);
  30739.   }
  30740. ! #endif    POP
  30741.   /*   */
  30742.   
  30743.   #ifdef MF
  30744. --- 895,901 ----
  30745.   
  30746.       exit (status);
  30747.   }
  30748. ! #endif    /* POP */
  30749.   /*   */
  30750.   
  30751.   #ifdef MF
  30752. ***************
  30753. *** 785,791 ****
  30754.           break;
  30755.       }
  30756.   }
  30757. ! #endif    MF
  30758.   
  30759.   /*   */
  30760.   
  30761. --- 924,930 ----
  30762.           break;
  30763.       }
  30764.   }
  30765. ! #endif    /* MF */
  30766.   
  30767.   /*   */
  30768.   
  30769. ***************
  30770. *** 830,833 ****
  30771.       (void) close (md);
  30772.       return (d.d_id);
  30773.   }
  30774. ! #endif    POP
  30775. --- 969,972 ----
  30776.       (void) close (md);
  30777.       return (d.d_id);
  30778.   }
  30779. ! #endif    /* POP */
  30780. *** ../mh-6.7.2/uip/install-mh.c    Thu Apr  5 16:03:43 1990
  30781. --- uip/install-mh.c    Mon Dec 14 16:21:11 1992
  30782. ***************
  30783. *** 1,7 ****
  30784.   /* install-mh.c - initialize the MH environment */
  30785.   #ifndef    lint
  30786. ! static char ident[] = "@(#)$Id: install-mh.c,v 1.3 90/04/05 15:01:19 sources Exp $";
  30787. ! #endif    lint
  30788.   
  30789.   #include "../h/mh.h"
  30790.   #include <pwd.h>
  30791. --- 1,7 ----
  30792.   /* install-mh.c - initialize the MH environment */
  30793.   #ifndef    lint
  30794. ! static char ident[] = "@(#)$Id: install-mh.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  30795. ! #endif    /* lint */
  30796.   
  30797.   #include "../h/mh.h"
  30798.   #include <pwd.h>
  30799. ***************
  30800. *** 8,13 ****
  30801. --- 8,16 ----
  30802.   #include <stdio.h>
  30803.   #include <sys/types.h>
  30804.   #include <sys/stat.h>
  30805. + #ifdef LOCALE
  30806. + #include    <locale.h>
  30807. + #endif
  30808.   
  30809.   /*   */
  30810.   
  30811. ***************
  30812. *** 23,29 ****
  30813. --- 26,36 ----
  30814.   
  30815.   static char   *geta ();
  30816.   
  30817. + #ifndef __STDC__
  30818. + #ifdef    SYS5
  30819.   struct passwd  *getpwuid ();
  30820. + #endif
  30821. + #endif /* !__STDC__ */
  30822.   
  30823.   /*   */
  30824.   
  30825. ***************
  30826. *** 43,48 ****
  30827. --- 50,58 ----
  30828.       FILE   *in,
  30829.          *out;
  30830.   
  30831. + #ifdef LOCALE
  30832. +     setlocale(LC_ALL, "");
  30833. + #endif
  30834.       invo_name = r1bindex (argv[0], '/');
  30835.   
  30836.   #ifdef    COMPAT
  30837. ***************
  30838. *** 69,75 ****
  30839.   
  30840.       done (0);
  30841.       }
  30842. ! #endif    COMPAT
  30843.   
  30844.       autof = (argc == 2 && strcmp (argv[1], "-auto") == 0);
  30845.       if (mypath == NULL) {    /* straight from m_getdefs... */
  30846. --- 79,85 ----
  30847.   
  30848.       done (0);
  30849.       }
  30850. ! #endif    /* COMPAT */
  30851.   
  30852.       autof = (argc == 2 && strcmp (argv[1], "-auto") == 0);
  30853.       if (mypath == NULL) {    /* straight from m_getdefs... */
  30854. ***************
  30855. *** 78,89 ****
  30856.       else
  30857.           if ((pw = getpwuid (getuid ())) == NULL
  30858.               || pw -> pw_dir == NULL
  30859. !             || *pw -> pw_dir == NULL)
  30860.           adios (NULLCP, "no HOME envariable");
  30861.           else
  30862.           mypath = getcpy (pw -> pw_dir);
  30863.       if ((cp = mypath + strlen (mypath) - 1) > mypath && *cp == '/')
  30864. !         *cp = NULL;
  30865.       }
  30866.       defpath = concat (mypath, "/", mh_profile, NULLCP);
  30867.   
  30868. --- 88,99 ----
  30869.       else
  30870.           if ((pw = getpwuid (getuid ())) == NULL
  30871.               || pw -> pw_dir == NULL
  30872. !             || *pw -> pw_dir == 0)
  30873.           adios (NULLCP, "no HOME envariable");
  30874.           else
  30875.           mypath = getcpy (pw -> pw_dir);
  30876.       if ((cp = mypath + strlen (mypath) - 1) > mypath && *cp == '/')
  30877. !         *cp = 0;
  30878.       }
  30879.       defpath = concat (mypath, "/", mh_profile, NULLCP);
  30880.   
  30881. ***************
  30882. *** 189,194 ****
  30883.       if (fgets (line, sizeof line, stdin) == NULL)
  30884.       done (1);
  30885.       if (cp = index (line, '\n'))
  30886. !     *cp = NULL;
  30887.       return line;
  30888.   }
  30889. --- 199,204 ----
  30890.       if (fgets (line, sizeof line, stdin) == NULL)
  30891.       done (1);
  30892.       if (cp = index (line, '\n'))
  30893. !     *cp = 0;
  30894.       return line;
  30895.   }
  30896. *** ../mh-6.7.2/uip/mark.c    Thu Oct 29 15:02:26 1987
  30897. --- uip/mark.c    Mon Dec 14 16:21:12 1992
  30898. ***************
  30899. *** 1,7 ****
  30900. --- 1,13 ----
  30901.   /* mark.c - mark messages */
  30902. + #ifndef    lint
  30903. + static char ident[] = "@(#)$Id: mark.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  30904. + #endif    /* lint */
  30905.   
  30906.   #include "../h/mh.h"
  30907.   #include <stdio.h>
  30908. + #ifdef LOCALE
  30909. + #include    <locale.h>
  30910. + #endif
  30911.   
  30912.   /*   */
  30913.   
  30914. ***************
  30915. *** 32,38 ****
  30916.   #define    DEBUGSW    9
  30917.       "debug", -5,
  30918.   
  30919. !     NULL, NULL
  30920.   };
  30921.   
  30922.   /*   */
  30923. --- 38,44 ----
  30924.   #define    DEBUGSW    9
  30925.       "debug", -5,
  30926.   
  30927. !     NULL, 0
  30928.   };
  30929.   
  30930.   /*   */
  30931. ***************
  30932. *** 64,69 ****
  30933. --- 70,78 ----
  30934.              *msgs[MAXARGS];
  30935.       struct msgs *mp;
  30936.   
  30937. + #ifdef LOCALE
  30938. +     setlocale(LC_ALL, "");
  30939. + #endif
  30940.       invo_name = r1bindex (argv[0], '/');
  30941.       if ((cp = m_find (invo_name)) != NULL) {
  30942.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  30943. ***************
  30944. *** 190,199 ****
  30945.   #ifndef    MTR
  30946.       printf ("lowoff=%d hghoff=%d\n",
  30947.           mp -> lowoff, mp -> hghoff);
  30948. ! #else    MTR
  30949.       printf ("lowoff=%d hghoff=%d msgbase=0x%x msgstats=0x%x\n",
  30950.           mp -> lowoff, mp -> hghoff, mp -> msgbase, mp -> msgstats);
  30951. ! #endif    MTR
  30952.       }
  30953.   
  30954.       if (seqp == 0 && (addsw || deletesw))
  30955. --- 199,208 ----
  30956.   #ifndef    MTR
  30957.       printf ("lowoff=%d hghoff=%d\n",
  30958.           mp -> lowoff, mp -> hghoff);
  30959. ! #else    /* MTR */
  30960.       printf ("lowoff=%d hghoff=%d msgbase=0x%x msgstats=0x%x\n",
  30961.           mp -> lowoff, mp -> hghoff, mp -> msgbase, mp -> msgstats);
  30962. ! #endif    /* MTR */
  30963.       }
  30964.   
  30965.       if (seqp == 0 && (addsw || deletesw))
  30966. *** /dev/null    Tue Dec 15 08:01:10 1992
  30967. --- uip/md5.c    Mon Oct 26 08:48:09 1992
  30968. ***************
  30969. *** 0 ****
  30970. --- 1,338 ----
  30971. + #ifndef    lint
  30972. + static char md5ident[]="@(#)$Id: md5.c,v 1.4 1992/10/26 16:48:02 jromine Exp $";
  30973. + #endif
  30974. + /* taken from RFC-1321/Appendix A.3 */
  30975. + 
  30976. + /* MD5C.C - RSA Data Security, Inc., MD5 message-digest algorithm
  30977. +  */
  30978. + 
  30979. + /* Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All
  30980. + rights reserved.
  30981. + 
  30982. + License to copy and use this software is granted provided that it
  30983. + is identified as the "RSA Data Security, Inc. MD5 Message-Digest
  30984. + Algorithm" in all material mentioning or referencing this software
  30985. + or this function.
  30986. + 
  30987. + License is also granted to make and use derivative works provided
  30988. + that such works are identified as "derived from the RSA Data
  30989. + Security, Inc. MD5 Message-Digest Algorithm" in all material
  30990. + mentioning or referencing the derived work.
  30991. + 
  30992. + RSA Data Security, Inc. makes no representations concerning either
  30993. + the merchantability of this software or the suitability of this
  30994. + software for any particular purpose. It is provided "as is"
  30995. + without express or implied warranty of any kind.
  30996. + 
  30997. + These notices must be retained in any copies of any part of this
  30998. + documentation and/or software.
  30999. +  */
  31000. + 
  31001. + /* #include "global.h" */
  31002. + #include "../h/md5.h"
  31003. + 
  31004. + /* Constants for MD5Transform routine.
  31005. +  */
  31006. + #define S11 7
  31007. + #define S12 12
  31008. + #define S13 17
  31009. + #define S14 22
  31010. + #define S21 5
  31011. + #define S22 9
  31012. + #define S23 14
  31013. + #define S24 20
  31014. + #define S31 4
  31015. + #define S32 11
  31016. + #define S33 16
  31017. + #define S34 23
  31018. + #define S41 6
  31019. + #define S42 10
  31020. + #define S43 15
  31021. + #define S44 21
  31022. + 
  31023. + static void MD5Transform PROTO_LIST ((UINT4 [4], unsigned char [64]));
  31024. + static void Encode PROTO_LIST
  31025. +   ((unsigned char *, UINT4 *, unsigned int));
  31026. + static void Decode PROTO_LIST
  31027. +   ((UINT4 *, unsigned char *, unsigned int));
  31028. + static void MD5_memcpy PROTO_LIST ((POINTER, POINTER, unsigned int));
  31029. + static void MD5_memset PROTO_LIST ((POINTER, int, unsigned int));
  31030. + 
  31031. + static unsigned char PADDING[64] = {
  31032. +   0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  31033. +   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  31034. +   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
  31035. + };
  31036. + 
  31037. + /* F, G, H and I are basic MD5 functions.
  31038. +  */
  31039. + #define F(x, y, z) (((x) & (y)) | ((~x) & (z)))
  31040. + #define G(x, y, z) (((x) & (z)) | ((y) & (~z)))
  31041. + #define H(x, y, z) ((x) ^ (y) ^ (z))
  31042. + #define I(x, y, z) ((y) ^ ((x) | (~z)))
  31043. + 
  31044. + /* ROTATE_LEFT rotates x left n bits.
  31045. +  */
  31046. + #define ROTATE_LEFT(x, n) (((x) << (n)) | ((x) >> (32-(n))))
  31047. + 
  31048. + /* FF, GG, HH, and II transformations for rounds 1, 2, 3, and 4.
  31049. + Rotation is separate from addition to prevent recomputation.
  31050. +  */
  31051. + #define FF(a, b, c, d, x, s, ac) { \
  31052. +  (a) += F ((b), (c), (d)) + (x) + (UINT4)(ac); \
  31053. +  (a) = ROTATE_LEFT ((a), (s)); \
  31054. +  (a) += (b); \
  31055. +   }
  31056. + #define GG(a, b, c, d, x, s, ac) { \
  31057. +  (a) += G ((b), (c), (d)) + (x) + (UINT4)(ac); \
  31058. +  (a) = ROTATE_LEFT ((a), (s)); \
  31059. +  (a) += (b); \
  31060. +   }
  31061. + #define HH(a, b, c, d, x, s, ac) { \
  31062. +  (a) += H ((b), (c), (d)) + (x) + (UINT4)(ac); \
  31063. +  (a) = ROTATE_LEFT ((a), (s)); \
  31064. +  (a) += (b); \
  31065. +   }
  31066. + #define II(a, b, c, d, x, s, ac) { \
  31067. +  (a) += I ((b), (c), (d)) + (x) + (UINT4)(ac); \
  31068. +  (a) = ROTATE_LEFT ((a), (s)); \
  31069. +  (a) += (b); \
  31070. +   }
  31071. + 
  31072. + /* MD5 initialization. Begins an MD5 operation, writing a new context.
  31073. +  */
  31074. + void MD5Init (context)
  31075. + MD5_CTX *context;                                        /* context */
  31076. + {
  31077. +   context->count[0] = context->count[1] = 0;
  31078. +   /* Load magic initialization constants.
  31079. + */
  31080. +   context->state[0] = 0x67452301;
  31081. +   context->state[1] = 0xefcdab89;
  31082. +   context->state[2] = 0x98badcfe;
  31083. +   context->state[3] = 0x10325476;
  31084. + }
  31085. + 
  31086. + /* MD5 block update operation. Continues an MD5 message-digest
  31087. +   operation, processing another message block, and updating the
  31088. +   context.
  31089. +  */
  31090. + void MD5Update (context, input, inputLen)
  31091. + MD5_CTX *context;                                        /* context */
  31092. + unsigned char *input;                                /* input block */
  31093. + unsigned int inputLen;                     /* length of input block */
  31094. + {
  31095. +   unsigned int i, index, partLen;
  31096. + 
  31097. +   /* Compute number of bytes mod 64 */
  31098. +   index = (unsigned int)((context->count[0] >> 3) & 0x3F);
  31099. + 
  31100. +   /* Update number of bits */
  31101. +   if ((context->count[0] += ((UINT4)inputLen << 3))
  31102. +    < ((UINT4)inputLen << 3))
  31103. +  context->count[1]++;
  31104. +   context->count[1] += ((UINT4)inputLen >> 29);
  31105. + 
  31106. +   partLen = 64 - index;
  31107. + 
  31108. +   /* Transform as many times as possible.
  31109. + */
  31110. +   if (inputLen >= partLen) {
  31111. +  MD5_memcpy
  31112. +    ((POINTER)&context->buffer[index], (POINTER)input, partLen);
  31113. +  MD5Transform (context->state, context->buffer);
  31114. + 
  31115. +  for (i = partLen; i + 63 < inputLen; i += 64)
  31116. +    MD5Transform (context->state, &input[i]);
  31117. + 
  31118. +  index = 0;
  31119. +   }
  31120. +   else
  31121. +  i = 0;
  31122. + 
  31123. +   /* Buffer remaining input */
  31124. +   MD5_memcpy
  31125. +  ((POINTER)&context->buffer[index], (POINTER)&input[i],
  31126. +   inputLen-i);
  31127. + }
  31128. + 
  31129. + /* MD5 finalization. Ends an MD5 message-digest operation, writing the
  31130. +   the message digest and zeroizing the context.
  31131. +  */
  31132. + void MD5Final (digest, context)
  31133. + unsigned char digest[16];                         /* message digest */
  31134. + MD5_CTX *context;                                       /* context */
  31135. + {
  31136. +   unsigned char bits[8];
  31137. +   unsigned int index, padLen;
  31138. + 
  31139. +   /* Save number of bits */
  31140. +   Encode (bits, context->count, 8);
  31141. + 
  31142. +   /* Pad out to 56 mod 64.
  31143. + */
  31144. +   index = (unsigned int)((context->count[0] >> 3) & 0x3f);
  31145. +   padLen = (index < 56) ? (56 - index) : (120 - index);
  31146. +   MD5Update (context, PADDING, padLen);
  31147. + 
  31148. +   /* Append length (before padding) */
  31149. +   MD5Update (context, bits, 8);
  31150. +   /* Store state in digest */
  31151. +   Encode (digest, context->state, 16);
  31152. + 
  31153. +   /* Zeroize sensitive information.
  31154. + */
  31155. +   MD5_memset ((POINTER)context, 0, sizeof (*context));
  31156. + }
  31157. + 
  31158. + /* MD5 basic transformation. Transforms state based on block.
  31159. +  */
  31160. + static void MD5Transform (state, block)
  31161. + UINT4 state[4];
  31162. + unsigned char block[64];
  31163. + {
  31164. +   UINT4 a = state[0], b = state[1], c = state[2], d = state[3], x[16];
  31165. + 
  31166. +   Decode (x, block, 64);
  31167. + 
  31168. +   /* Round 1 */
  31169. +   FF (a, b, c, d, x[ 0], S11, 0xd76aa478); /* 1 */
  31170. +   FF (d, a, b, c, x[ 1], S12, 0xe8c7b756); /* 2 */
  31171. +   FF (c, d, a, b, x[ 2], S13, 0x242070db); /* 3 */
  31172. +   FF (b, c, d, a, x[ 3], S14, 0xc1bdceee); /* 4 */
  31173. +   FF (a, b, c, d, x[ 4], S11, 0xf57c0faf); /* 5 */
  31174. +   FF (d, a, b, c, x[ 5], S12, 0x4787c62a); /* 6 */
  31175. +   FF (c, d, a, b, x[ 6], S13, 0xa8304613); /* 7 */
  31176. +   FF (b, c, d, a, x[ 7], S14, 0xfd469501); /* 8 */
  31177. +   FF (a, b, c, d, x[ 8], S11, 0x698098d8); /* 9 */
  31178. +   FF (d, a, b, c, x[ 9], S12, 0x8b44f7af); /* 10 */
  31179. +   FF (c, d, a, b, x[10], S13, 0xffff5bb1); /* 11 */
  31180. +   FF (b, c, d, a, x[11], S14, 0x895cd7be); /* 12 */
  31181. +   FF (a, b, c, d, x[12], S11, 0x6b901122); /* 13 */
  31182. +   FF (d, a, b, c, x[13], S12, 0xfd987193); /* 14 */
  31183. +   FF (c, d, a, b, x[14], S13, 0xa679438e); /* 15 */
  31184. +   FF (b, c, d, a, x[15], S14, 0x49b40821); /* 16 */
  31185. + 
  31186. +  /* Round 2 */
  31187. +   GG (a, b, c, d, x[ 1], S21, 0xf61e2562); /* 17 */
  31188. +   GG (d, a, b, c, x[ 6], S22, 0xc040b340); /* 18 */
  31189. +   GG (c, d, a, b, x[11], S23, 0x265e5a51); /* 19 */
  31190. +   GG (b, c, d, a, x[ 0], S24, 0xe9b6c7aa); /* 20 */
  31191. +   GG (a, b, c, d, x[ 5], S21, 0xd62f105d); /* 21 */
  31192. +   GG (d, a, b, c, x[10], S22,  0x2441453); /* 22 */
  31193. +   GG (c, d, a, b, x[15], S23, 0xd8a1e681); /* 23 */
  31194. +   GG (b, c, d, a, x[ 4], S24, 0xe7d3fbc8); /* 24 */
  31195. +   GG (a, b, c, d, x[ 9], S21, 0x21e1cde6); /* 25 */
  31196. +   GG (d, a, b, c, x[14], S22, 0xc33707d6); /* 26 */
  31197. +   GG (c, d, a, b, x[ 3], S23, 0xf4d50d87); /* 27 */
  31198. +   GG (b, c, d, a, x[ 8], S24, 0x455a14ed); /* 28 */
  31199. +   GG (a, b, c, d, x[13], S21, 0xa9e3e905); /* 29 */
  31200. +   GG (d, a, b, c, x[ 2], S22, 0xfcefa3f8); /* 30 */
  31201. +   GG (c, d, a, b, x[ 7], S23, 0x676f02d9); /* 31 */
  31202. +   GG (b, c, d, a, x[12], S24, 0x8d2a4c8a); /* 32 */
  31203. + 
  31204. +   /* Round 3 */
  31205. +   HH (a, b, c, d, x[ 5], S31, 0xfffa3942); /* 33 */
  31206. +   HH (d, a, b, c, x[ 8], S32, 0x8771f681); /* 34 */
  31207. +   HH (c, d, a, b, x[11], S33, 0x6d9d6122); /* 35 */
  31208. +   HH (b, c, d, a, x[14], S34, 0xfde5380c); /* 36 */
  31209. +   HH (a, b, c, d, x[ 1], S31, 0xa4beea44); /* 37 */
  31210. +   HH (d, a, b, c, x[ 4], S32, 0x4bdecfa9); /* 38 */
  31211. +   HH (c, d, a, b, x[ 7], S33, 0xf6bb4b60); /* 39 */
  31212. +   HH (b, c, d, a, x[10], S34, 0xbebfbc70); /* 40 */
  31213. +   HH (a, b, c, d, x[13], S31, 0x289b7ec6); /* 41 */
  31214. +   HH (d, a, b, c, x[ 0], S32, 0xeaa127fa); /* 42 */
  31215. +   HH (c, d, a, b, x[ 3], S33, 0xd4ef3085); /* 43 */
  31216. +   HH (b, c, d, a, x[ 6], S34,  0x4881d05); /* 44 */
  31217. +   HH (a, b, c, d, x[ 9], S31, 0xd9d4d039); /* 45 */
  31218. +   HH (d, a, b, c, x[12], S32, 0xe6db99e5); /* 46 */
  31219. +   HH (c, d, a, b, x[15], S33, 0x1fa27cf8); /* 47 */
  31220. +   HH (b, c, d, a, x[ 2], S34, 0xc4ac5665); /* 48 */
  31221. + 
  31222. +   /* Round 4 */
  31223. +   II (a, b, c, d, x[ 0], S41, 0xf4292244); /* 49 */
  31224. +   II (d, a, b, c, x[ 7], S42, 0x432aff97); /* 50 */
  31225. +   II (c, d, a, b, x[14], S43, 0xab9423a7); /* 51 */
  31226. +   II (b, c, d, a, x[ 5], S44, 0xfc93a039); /* 52 */
  31227. +   II (a, b, c, d, x[12], S41, 0x655b59c3); /* 53 */
  31228. +   II (d, a, b, c, x[ 3], S42, 0x8f0ccc92); /* 54 */
  31229. +   II (c, d, a, b, x[10], S43, 0xffeff47d); /* 55 */
  31230. +   II (b, c, d, a, x[ 1], S44, 0x85845dd1); /* 56 */
  31231. +   II (a, b, c, d, x[ 8], S41, 0x6fa87e4f); /* 57 */
  31232. +   II (d, a, b, c, x[15], S42, 0xfe2ce6e0); /* 58 */
  31233. +   II (c, d, a, b, x[ 6], S43, 0xa3014314); /* 59 */
  31234. +   II (b, c, d, a, x[13], S44, 0x4e0811a1); /* 60 */
  31235. +   II (a, b, c, d, x[ 4], S41, 0xf7537e82); /* 61 */
  31236. +   II (d, a, b, c, x[11], S42, 0xbd3af235); /* 62 */
  31237. +   II (c, d, a, b, x[ 2], S43, 0x2ad7d2bb); /* 63 */
  31238. +   II (b, c, d, a, x[ 9], S44, 0xeb86d391); /* 64 */
  31239. + 
  31240. +   state[0] += a;
  31241. +   state[1] += b;
  31242. +   state[2] += c;
  31243. +   state[3] += d;
  31244. + 
  31245. +   /* Zeroize sensitive information.
  31246. + */
  31247. +   MD5_memset ((POINTER)x, 0, sizeof (x));
  31248. + }
  31249. + 
  31250. + /* Encodes input (UINT4) into output (unsigned char). Assumes len is
  31251. +   a multiple of 4.
  31252. +  */
  31253. + static void Encode (output, input, len)
  31254. + unsigned char *output;
  31255. + UINT4 *input;
  31256. + unsigned int len;
  31257. + {
  31258. +   unsigned int i, j;
  31259. + 
  31260. +   for (i = 0, j = 0; j < len; i++, j += 4) {
  31261. +  output[j] = (unsigned char)(input[i] & 0xff);
  31262. +  output[j+1] = (unsigned char)((input[i] >> 8) & 0xff);
  31263. +  output[j+2] = (unsigned char)((input[i] >> 16) & 0xff);
  31264. +  output[j+3] = (unsigned char)((input[i] >> 24) & 0xff);
  31265. +   }
  31266. + }
  31267. + 
  31268. + /* Decodes input (unsigned char) into output (UINT4). Assumes len is
  31269. +   a multiple of 4.
  31270. +  */
  31271. + static void Decode (output, input, len)
  31272. + UINT4 *output;
  31273. + unsigned char *input;
  31274. + unsigned int len;
  31275. + {
  31276. +   unsigned int i, j;
  31277. + 
  31278. +   for (i = 0, j = 0; j < len; i++, j += 4)
  31279. +  output[i] = ((UINT4)input[j]) | (((UINT4)input[j+1]) << 8) |
  31280. +    (((UINT4)input[j+2]) << 16) | (((UINT4)input[j+3]) << 24);
  31281. + }
  31282. + 
  31283. + /* Note: Replace "for loop" with standard memcpy if possible.
  31284. +  */
  31285. + 
  31286. + static void MD5_memcpy (output, input, len)
  31287. + POINTER output;
  31288. + POINTER input;
  31289. + unsigned int len;
  31290. + {
  31291. +   unsigned int i;
  31292. + 
  31293. +   for (i = 0; i < len; i++)
  31294. +  output[i] = input[i];
  31295. + }
  31296. + 
  31297. + /* Note: Replace "for loop" with standard memset if possible.
  31298. +  */
  31299. + static void MD5_memset (output, value, len)
  31300. + POINTER output;
  31301. + int value;
  31302. + unsigned int len;
  31303. + {
  31304. +   unsigned int i;
  31305. + 
  31306. +   for (i = 0; i < len; i++)
  31307. +  ((char *)output)[i] = (char)value;
  31308. + }
  31309. *** ../mh-6.7.2/uip/mhl.c    Thu Oct 29 15:02:26 1987
  31310. --- uip/mhl.c    Mon Dec 14 16:21:13 1992
  31311. ***************
  31312. *** 1,10 ****
  31313.   /* mhl.c - the MH message listing program */
  31314.   
  31315. - 
  31316.   main (argc, argv)
  31317.   int     argc;
  31318.   char  **argv;
  31319.   {
  31320.       done (mhl (argc, argv));
  31321.   }
  31322.   
  31323. --- 1,18 ----
  31324.   /* mhl.c - the MH message listing program */
  31325. + #ifndef    lint
  31326. + static char ident[] = "@(#)$Id: mhl.c,v 1.3 1992/12/15 00:20:22 jromine Exp $";
  31327. + #endif    /* lint */
  31328. + #ifdef LOCALE
  31329. + #include    <locale.h>
  31330. + #endif
  31331.   
  31332.   main (argc, argv)
  31333.   int     argc;
  31334.   char  **argv;
  31335.   {
  31336. + #ifdef LOCALE
  31337. +     setlocale(LC_ALL, "");
  31338. + #endif
  31339.       done (mhl (argc, argv));
  31340.   }
  31341.   
  31342. *** ../mh-6.7.2/uip/mhlsbr.c    Fri Jan 25 14:49:56 1991
  31343. --- uip/mhlsbr.c    Mon Dec 14 16:21:14 1992
  31344. ***************
  31345. *** 1,12 ****
  31346.   /* mhlsbr.c - implement the "nifty" message lister */
  31347.   #ifndef    lint
  31348. ! static char ident[] = "@(#)$Id: mhlsbr.c,v 1.16 91/01/25 14:49:46 mh Exp $";
  31349. ! #endif    lint
  31350.   
  31351.   #include "../h/mh.h"
  31352.   #include "../h/addrsbr.h"
  31353.   #include "../h/formatsbr.h"
  31354.   #include "../zotnet/tws.h"
  31355.   #include <ctype.h>
  31356.   #include <setjmp.h>
  31357.   #include <signal.h>
  31358. --- 1,19 ----
  31359.   /* mhlsbr.c - implement the "nifty" message lister */
  31360.   #ifndef    lint
  31361. ! static char ident[] = "@(#)$Id: mhlsbr.c,v 1.28 1992/12/15 00:20:22 jromine Exp $";
  31362. ! #endif    /* lint */
  31363.   
  31364.   #include "../h/mh.h"
  31365.   #include "../h/addrsbr.h"
  31366.   #include "../h/formatsbr.h"
  31367.   #include "../zotnet/tws.h"
  31368. + #ifdef SVR4
  31369. + #undef    NULLVP        /* XXX  */
  31370. + #endif
  31371. + #if    defined(SYS5) && defined(AUX)
  31372. + #define u_short ushort
  31373. + #define u_long  ulong
  31374. + #endif
  31375.   #include <ctype.h>
  31376.   #include <setjmp.h>
  31377.   #include <signal.h>
  31378. ***************
  31379. *** 36,42 ****
  31380.   
  31381.   #ifdef    SYS5
  31382.   #define    u_short    ushort
  31383. ! #endif    SYS5
  31384.   
  31385.   #define ONECOMP        0
  31386.   #define TWOCOMP        1
  31387. --- 43,49 ----
  31388.   
  31389.   #ifdef    SYS5
  31390.   #define    u_short    ushort
  31391. ! #endif    /* SYS5 */
  31392.   
  31393.   #define ONECOMP        0
  31394.   #define TWOCOMP        1
  31395. ***************
  31396. *** 101,108 ****
  31397.       "volume number", -6,
  31398.   #define ISSUESW 20
  31399.       "issue number", -5,
  31400.   
  31401. !     NULL, NULL
  31402.   };
  31403.   
  31404.   /*   */
  31405. --- 108,117 ----
  31406.       "volume number", -6,
  31407.   #define ISSUESW 20
  31408.       "issue number", -5,
  31409. + #define NBODYSW 21
  31410. +     "nobody", -6,
  31411.   
  31412. !     NULL, 0
  31413.   };
  31414.   
  31415.   /*   */
  31416. ***************
  31417. *** 139,145 ****
  31418.   #define    FACEFMT        0x004000/* contains face            */
  31419.   #define    FACEDFLT    0x008000/* default for face            */
  31420.   #define    SPLIT        0x010000/* split headers (don't concatenate)    */
  31421. ! #define    LBITS    "\020\01NOCOMPONENT\02UPPERCASE\03CENTER\04CLEARTEXT\05EXTRA\06HDROUTPUT\07CLEARSCR\010LEFTADJUST\011COMPRESS\012ADDRFMT\013BELL\014DATEFMT\015FORMAT\016INIT\017FACEFMT\020FACEDFLT\021SPLIT"
  31422.   #define    GFLAGS    (NOCOMPONENT | UPPERCASE | CENTER | LEFTADJUST | COMPRESS \
  31423.               | SPLIT)
  31424.   
  31425. --- 148,155 ----
  31426.   #define    FACEFMT        0x004000/* contains face            */
  31427.   #define    FACEDFLT    0x008000/* default for face            */
  31428.   #define    SPLIT        0x010000/* split headers (don't concatenate)    */
  31429. ! #define    NONEWLINE    0x020000/* don't write trailing newline        */
  31430. ! #define    LBITS    "\020\01NOCOMPONENT\02UPPERCASE\03CENTER\04CLEARTEXT\05EXTRA\06HDROUTPUT\07CLEARSCR\010LEFTADJUST\011COMPRESS\012ADDRFMT\013BELL\014DATEFMT\015FORMAT\016INIT\017FACEFMT\020FACEDFLT\021SPLIT\022NONEWLINE"
  31431.   #define    GFLAGS    (NOCOMPONENT | UPPERCASE | CENTER | LEFTADJUST | COMPRESS \
  31432.               | SPLIT)
  31433.   
  31434. ***************
  31435. *** 152,162 ****
  31436.   static struct mcomp *fmttl = NULL;
  31437.   
  31438.   static struct mcomp global = {
  31439. !     NULL, NULL, "", NULL, NULL, 0, -1, 80, -1, 40, BELL, NULL
  31440.   };
  31441.   static struct mcomp  holder =
  31442.   {
  31443. !     NULL, NULL, NULL, NULL, NULL, 0, 0, 0, 0, 0, NOCOMPONENT, NULL
  31444.   };
  31445.   
  31446.   
  31447. --- 162,172 ----
  31448.   static struct mcomp *fmttl = NULL;
  31449.   
  31450.   static struct mcomp global = {
  31451. !     NULL, NULL, "", NULL, NULL, 0, -1, 80, -1, 40, BELL, 0
  31452.   };
  31453.   static struct mcomp  holder =
  31454.   {
  31455. !     NULL, NULL, NULL, NULL, NULL, 0, 0, 0, 0, 0, NOCOMPONENT, 0
  31456.   };
  31457.   
  31458.   
  31459. ***************
  31460. *** 206,211 ****
  31461. --- 216,223 ----
  31462.                               "bell", BELL, 0,
  31463.                               "nobell", 0, BELL,
  31464.                               "datefield", DATEFMT, ADDRFMT,
  31465. +                 "newline", 0, NONEWLINE,
  31466. +                 "nonewline", NONEWLINE, 0,
  31467.   
  31468.                               NULL
  31469.   };
  31470. ***************
  31471. *** 215,220 ****
  31472. --- 227,233 ----
  31473.   static int  bellflg = 0;
  31474.   static int  clearflg = 0;
  31475.   static int  dashflg = 1;
  31476. + static int  dobody = 1;
  31477.   static int  forwflg = 0;
  31478.   static int  forwall = 0;
  31479.   
  31480. ***************
  31481. *** 256,262 ****
  31482.   
  31483.   
  31484.   static char delim3[] =        /* from forw.c */
  31485. !     "\n------------------------------------------------------------\n\n";
  31486.   static char delim4[] = "\n------------------------------\n\n";
  31487.   
  31488.   
  31489. --- 269,275 ----
  31490.   
  31491.   
  31492.   static char delim3[] =        /* from forw.c */
  31493. !     "\n----------------------------------------------------------------------\n\n";
  31494.   static char delim4[] = "\n------------------------------\n\n";
  31495.   
  31496.   
  31497. ***************
  31498. *** 264,270 ****
  31499.   
  31500.   
  31501.   static void    mhladios (), mhldone ();
  31502. ! static int    intrser (), pipeser (), quitser ();
  31503.   static char   *mcomp_add (), *oneline (), *parse ();
  31504.   static struct mcomp *add_queue ();
  31505.   
  31506. --- 277,283 ----
  31507.   
  31508.   
  31509.   static void    mhladios (), mhldone ();
  31510. ! static TYPESIG    intrser (), pipeser (), quitser ();
  31511.   static char   *mcomp_add (), *oneline (), *parse ();
  31512.   static struct mcomp *add_queue ();
  31513.   
  31514. ***************
  31515. *** 415,420 ****
  31516. --- 428,437 ----
  31517.           case NDASHSW: 
  31518.               dashflg = 0;
  31519.               continue;
  31520. + 
  31521. +         case NBODYSW: 
  31522. +             dobody = 0;
  31523. +             continue;
  31524.           }
  31525.       files[vecp++] = cp;
  31526.       }
  31527. ***************
  31528. *** 461,467 ****
  31529.           for (cp = buf + i; i > 1; i--)
  31530.           *cp++ = '*';
  31531.           *cp++ = '\n';
  31532. !         *cp = NULL;
  31533.           printf ("%s", buf);
  31534.       }
  31535.       else
  31536. --- 478,484 ----
  31537.           for (cp = buf + i; i > 1; i--)
  31538.           *cp++ = '*';
  31539.           *cp++ = '\n';
  31540. !         *cp = 0;
  31541.           printf ("%s", buf);
  31542.       }
  31543.       else
  31544. ***************
  31545. *** 532,538 ****
  31546.           continue;
  31547.   
  31548.       if (cp = index (bp, '\n'))
  31549. !         *cp = NULL;
  31550.   
  31551.       if (*bp == ':') {
  31552.           c1 = add_queue (&fmthd, &fmttl, NULLCP, bp + 1, CLEARTEXT);
  31553. --- 549,555 ----
  31554.           continue;
  31555.   
  31556.       if (cp = index (bp, '\n'))
  31557. !         *cp = 0;
  31558.   
  31559.       if (*bp == ':') {
  31560.           c1 = add_queue (&fmthd, &fmttl, NULLCP, bp + 1, CLEARTEXT);
  31561. ***************
  31562. *** 715,721 ****
  31563.           if (!*++parptr)
  31564.               parptr--;
  31565.       c = *parptr;
  31566. !     *parptr = NULL;
  31567.       *s = getcpy (cp);
  31568.       if ((*parptr = c) == '"')
  31569.       parptr++;
  31570. --- 732,738 ----
  31571.           if (!*++parptr)
  31572.               parptr--;
  31573.       c = *parptr;
  31574. !     *parptr = 0;
  31575.       *s = getcpy (cp);
  31576.       if ((*parptr = c) == '"')
  31577.       parptr++;
  31578. ***************
  31579. *** 739,745 ****
  31580.           *cp++ = c;
  31581.       else
  31582.           break;
  31583. !     *cp = NULL;
  31584.   
  31585.       return result;
  31586.   }
  31587. --- 756,762 ----
  31588.           *cp++ = c;
  31589.       else
  31590.           break;
  31591. !     *cp = 0;
  31592.   
  31593.       return result;
  31594.   }
  31595. ***************
  31596. *** 843,849 ****
  31597.               printf ("Press <return> to list \"%s\"...", mname);
  31598.               }
  31599.               (void) fflush (stdout);
  31600. !             buf[0] = NULL;
  31601.               (void) read (fileno (stdout), buf, sizeof buf);
  31602.           }
  31603.           if (index (buf, '\n')) {
  31604. --- 860,866 ----
  31605.               printf ("Press <return> to list \"%s\"...", mname);
  31606.               }
  31607.               (void) fflush (stdout);
  31608. !             buf[0] = 0;
  31609.               (void) read (fileno (stdout), buf, sizeof buf);
  31610.           }
  31611.           if (index (buf, '\n')) {
  31612. ***************
  31613. *** 924,930 ****
  31614.                   putcomp (c1, c2, TWOCOMP);
  31615.               continue;
  31616.               }
  31617. !             if (uleq (c1 -> c_name, "body")) {
  31618.               if ((holder.c_text = malloc (sizeof buf)) == NULL)
  31619.                   adios (NULLCP, "unable to allocate buffer memory");
  31620.               (void) strcpy (holder.c_text, buf);
  31621. --- 941,947 ----
  31622.                   putcomp (c1, c2, TWOCOMP);
  31623.               continue;
  31624.               }
  31625. !             if (dobody && uleq (c1 -> c_name, "body")) {
  31626.               if ((holder.c_text = malloc (sizeof buf)) == NULL)
  31627.                   adios (NULLCP, "unable to allocate buffer memory");
  31628.               (void) strcpy (holder.c_text, buf);
  31629. ***************
  31630. *** 979,985 ****
  31631.       if (uleq (ap -> p_name, name))
  31632.           return (ap -> p_flags);
  31633.   
  31634. !     return NULL;
  31635.   }
  31636.   
  31637.   
  31638. --- 996,1002 ----
  31639.       if (uleq (ap -> p_name, name))
  31640.           return (ap -> p_flags);
  31641.   
  31642. !     return 0;
  31643.   }
  31644.   
  31645.   
  31646. ***************
  31647. *** 994,1000 ****
  31648.       return add (s1, s2);
  31649.   
  31650.       if (s2 && *(dp = s2 + strlen (s2) - 1) == '\n')
  31651. !     *dp = NULL;
  31652.   
  31653.       return add (s1, add (",\n", s2));
  31654.   }
  31655. --- 1011,1017 ----
  31656.       return add (s1, s2);
  31657.   
  31658.       if (s2 && *(dp = s2 + strlen (s2) - 1) == '\n')
  31659. !     *dp = 0;
  31660.   
  31661.       return add (s1, add (",\n", s2));
  31662.   }
  31663. ***************
  31664. *** 1012,1018 ****
  31665.   register struct mcomp *c1,
  31666.                 *c2;
  31667.   {
  31668. !     int     dat[4];
  31669.       register char  *ap,
  31670.                      *cp;
  31671.       char    buffer[BUFSIZ],
  31672. --- 1029,1035 ----
  31673.   register struct mcomp *c1,
  31674.                 *c2;
  31675.   {
  31676. !     int     dat[5];
  31677.       register char  *ap,
  31678.                      *cp;
  31679.       char    buffer[BUFSIZ],
  31680. ***************
  31681. *** 1025,1031 ****
  31682.   
  31683.       ap = c2 -> c_text;
  31684.       c2 -> c_text = NULL;
  31685. !     dat[0] = dat[1] = dat[2] = 0;
  31686.       dat[3] = sizeof buffer - 1;
  31687.       (void) fmt_compile (c1 -> c_nfs, &c1 -> c_fmt);
  31688.   
  31689. --- 1042,1048 ----
  31690.   
  31691.       ap = c2 -> c_text;
  31692.       c2 -> c_text = NULL;
  31693. !     dat[0] = dat[1] = dat[2] = dat[4] = 0;
  31694.       dat[3] = sizeof buffer - 1;
  31695.       (void) fmt_compile (c1 -> c_nfs, &c1 -> c_fmt);
  31696.   
  31697. ***************
  31698. *** 1033,1038 ****
  31699. --- 1050,1058 ----
  31700.       FINDCOMP (cptr, "text");
  31701.       if (cptr)
  31702.           cptr -> c_text = ap;
  31703. +     if (cp = rindex(ap, '\n'))    /* drop ending newline */
  31704. +         if (!cp[1])
  31705. +         *cp = 0;
  31706.   
  31707.       (void) fmtscan (c1 -> c_fmt, buffer, sizeof buffer - 1, dat);
  31708.       /* Don't need to append a newline, dctime() already did */
  31709. ***************
  31710. *** 1080,1086 ****
  31711.           if (c2 -> c_text)
  31712.           c2 -> c_text = add (",\n", c2 -> c_text);
  31713.           if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  31714. !         *cp = NULL;
  31715.           c2 -> c_text = add (buffer, c2 -> c_text);
  31716.       }
  31717.   
  31718. --- 1100,1106 ----
  31719.           if (c2 -> c_text)
  31720.           c2 -> c_text = add (",\n", c2 -> c_text);
  31721.           if (*(cp = buffer + strlen (buffer) - 1) == '\n')
  31722. !         *cp = 0;
  31723.           c2 -> c_text = add (buffer, c2 -> c_text);
  31724.       }
  31725.   
  31726. ***************
  31727. *** 1266,1272 ****
  31728.               : strlen (c1->c_text ? c1->c_text : c1->c_name) + 2;
  31729.       count += c1 -> c_offset;
  31730.   
  31731. !     putstr (oneline (c2 -> c_text, c1 -> c_flags));
  31732.       if (term == '\n')
  31733.       putstr ("\n");
  31734.       while (cp = oneline (c2 -> c_text, c1 -> c_flags)) {
  31735. --- 1286,1293 ----
  31736.               : strlen (c1->c_text ? c1->c_text : c1->c_name) + 2;
  31737.       count += c1 -> c_offset;
  31738.   
  31739. !     if (cp = oneline (c2 -> c_text, c1 -> c_flags))
  31740. !        putstr(cp);
  31741.       if (term == '\n')
  31742.       putstr ("\n");
  31743.       while (cp = oneline (c2 -> c_text, c1 -> c_flags)) {
  31744. ***************
  31745. *** 1293,1299 ****
  31746.   
  31747.       if (onelp == NULL)
  31748.       onelp = stuff;
  31749. !     if (*onelp == NULL)
  31750.       return (onelp = NULL);
  31751.   
  31752.       ret = onelp;
  31753. --- 1314,1320 ----
  31754.   
  31755.       if (onelp == NULL)
  31756.       onelp = stuff;
  31757. !     if (*onelp == 0)
  31758.       return (onelp = NULL);
  31759.   
  31760.       ret = onelp;
  31761. ***************
  31762. *** 1303,1309 ****
  31763.           if (isspace (*onelp)) {
  31764.           if (*onelp == '\n' && (!onelp[1] || (flags & ADDRFMT))) {
  31765.               term = '\n';
  31766. !             *onelp++ = NULL;
  31767.               break;
  31768.           }
  31769.           else
  31770. --- 1324,1330 ----
  31771.           if (isspace (*onelp)) {
  31772.           if (*onelp == '\n' && (!onelp[1] || (flags & ADDRFMT))) {
  31773.               term = '\n';
  31774. !             *onelp++ = 0;
  31775.               break;
  31776.           }
  31777.           else
  31778. ***************
  31779. *** 1317,1323 ****
  31780.           spc = 0;
  31781.           }
  31782.   
  31783. !     *cp = NULL;
  31784.       }
  31785.       else {
  31786.       while (*onelp && *onelp != '\n')
  31787. --- 1338,1344 ----
  31788.           spc = 0;
  31789.           }
  31790.   
  31791. !     *cp = 0;
  31792.       }
  31793.       else {
  31794.       while (*onelp && *onelp != '\n')
  31795. ***************
  31796. *** 1324,1335 ****
  31797.           onelp++;
  31798.       if (*onelp == '\n') {
  31799.           term = '\n';
  31800. !         *onelp++ = NULL;
  31801.       }
  31802.       if (flags & LEFTADJUST)
  31803.           while (*ret == ' ' || *ret == '\t')
  31804.           ret++;
  31805.       }
  31806.   
  31807.       return ret;
  31808.   }
  31809. --- 1345,1358 ----
  31810.           onelp++;
  31811.       if (*onelp == '\n') {
  31812.           term = '\n';
  31813. !         *onelp++ = 0;
  31814.       }
  31815.       if (flags & LEFTADJUST)
  31816.           while (*ret == ' ' || *ret == '\t')
  31817.           ret++;
  31818.       }
  31819. +     if (*onelp == 0 && term == '\n' && (flags & NONEWLINE))
  31820. +     term = 0;
  31821.   
  31822.       return ret;
  31823.   }
  31824. ***************
  31825. *** 1375,1381 ****
  31826.           if (global.c_flags & BELL)
  31827.           (void) putchar ('\007');
  31828.           (void) fflush (stdout);
  31829. !         buf[0] = NULL;
  31830.           (void) read (fileno (stdout), buf, sizeof buf);
  31831.           if (index (buf, '\n')) {
  31832.           if (global.c_flags & CLEARSCR)
  31833. --- 1398,1404 ----
  31834.           if (global.c_flags & BELL)
  31835.           (void) putchar ('\007');
  31836.           (void) fflush (stdout);
  31837. !         buf[0] = 0;
  31838.           (void) read (fileno (stdout), buf, sizeof buf);
  31839.           if (index (buf, '\n')) {
  31840.           if (global.c_flags & CLEARSCR)
  31841. ***************
  31842. *** 1425,1436 ****
  31843.   
  31844.   /* ARGSUSED */
  31845.   
  31846. ! static    int intrser (i)
  31847.   int     i;
  31848.   {
  31849.   #ifndef    BSD42
  31850.       (void) signal (SIGINT, intrser);
  31851. ! #endif    BSD42
  31852.   
  31853.       discard (stdout);
  31854.       (void) putchar ('\n');
  31855. --- 1448,1459 ----
  31856.   
  31857.   /* ARGSUSED */
  31858.   
  31859. ! static    TYPESIG intrser (i)
  31860.   int     i;
  31861.   {
  31862.   #ifndef    BSD42
  31863.       (void) signal (SIGINT, intrser);
  31864. ! #endif    /* BSD42 */
  31865.   
  31866.       discard (stdout);
  31867.       (void) putchar ('\n');
  31868. ***************
  31869. *** 1441,1452 ****
  31870.   
  31871.   /* ARGSUSED */
  31872.   
  31873. ! static    int pipeser (i)
  31874.   int     i;
  31875.   {
  31876.   #ifndef    BSD42
  31877.       (void) signal (SIGPIPE, pipeser);
  31878. ! #endif    BSD42
  31879.   
  31880.       done (NOTOK);
  31881.   }
  31882. --- 1464,1475 ----
  31883.   
  31884.   /* ARGSUSED */
  31885.   
  31886. ! static    TYPESIG pipeser (i)
  31887.   int     i;
  31888.   {
  31889.   #ifndef    BSD42
  31890.       (void) signal (SIGPIPE, pipeser);
  31891. ! #endif    /* BSD42 */
  31892.   
  31893.       done (NOTOK);
  31894.   }
  31895. ***************
  31896. *** 1454,1465 ****
  31897.   
  31898.   /* ARGSUSED */
  31899.   
  31900. ! static    int quitser (i)
  31901.   int     i;
  31902.   {
  31903.   #ifndef    BSD42
  31904.       (void) signal (SIGQUIT, quitser);
  31905. ! #endif    BSD42
  31906.   
  31907.       (void) putchar ('\n');
  31908.       (void) fflush (stdout);
  31909. --- 1477,1488 ----
  31910.   
  31911.   /* ARGSUSED */
  31912.   
  31913. ! static    TYPESIG quitser (i)
  31914.   int     i;
  31915.   {
  31916.   #ifndef    BSD42
  31917.       (void) signal (SIGQUIT, quitser);
  31918. ! #endif    /* BSD42 */
  31919.   
  31920.       (void) putchar ('\n');
  31921.       (void) fflush (stdout);
  31922. ***************
  31923. *** 1566,1572 ****
  31924.       return (result != NOTOK ? OK : NOTOK);
  31925.   }
  31926.   
  31927. ! #else    not BSD42 and not SOCKETS
  31928.   
  31929.   static int  doface (c1)
  31930.   register struct mcomp *c1;
  31931. --- 1589,1595 ----
  31932.       return (result != NOTOK ? OK : NOTOK);
  31933.   }
  31934.   
  31935. ! #else    /* not BSD42 and not SOCKETS */
  31936.   
  31937.   static int  doface (c1)
  31938.   register struct mcomp *c1;
  31939. ***************
  31940. *** 1675,1681 ****
  31941.   
  31942.       return result;
  31943.   }
  31944. ! #endif    not BSD42 and not SOCKETS
  31945.   
  31946.   /*   */
  31947.   
  31948. --- 1698,1704 ----
  31949.   
  31950.       return result;
  31951.   }
  31952. ! #endif    /* not BSD42 and not SOCKETS */
  31953.   
  31954.   /*   */
  31955.   
  31956. *** ../mh-6.7.2/uip/mhmail.c    Thu Apr  5 16:03:43 1990
  31957. --- uip/mhmail.c    Mon Dec 14 16:21:15 1992
  31958. ***************
  31959. *** 1,11 ****
  31960.   /* mhmail.c - simple mail program */
  31961.   #ifndef    lint
  31962. ! static char ident[] = "@(#)$Id: mhmail.c,v 1.3 90/04/05 15:01:25 sources Exp $";
  31963. ! #endif    lint
  31964.   
  31965.   #include "../h/mh.h"
  31966.   #include <stdio.h>
  31967.   #include <signal.h>
  31968.   
  31969.   /*   */
  31970.   
  31971. --- 1,14 ----
  31972.   /* mhmail.c - simple mail program */
  31973.   #ifndef    lint
  31974. ! static char ident[] = "@(#)$Id: mhmail.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  31975. ! #endif    /* lint */
  31976.   
  31977.   #include "../h/mh.h"
  31978.   #include <stdio.h>
  31979.   #include <signal.h>
  31980. + #ifdef LOCALE
  31981. + #include    <locale.h>
  31982. + #endif
  31983.   
  31984.   /*   */
  31985.   
  31986. ***************
  31987. *** 20,36 ****
  31988.       "from addr", 0,
  31989.   
  31990.   #define    SUBJSW    3
  31991. !     "subject", 0,
  31992.   
  31993.   #define    HELPSW    4
  31994.       "help", 4,
  31995.   
  31996. !     NULL, NULL
  31997.   };
  31998.   
  31999.   /*   */
  32000.   
  32001. ! static int    intrser ();
  32002.   
  32003.   
  32004.   static char tmpfil[BUFSIZ];
  32005. --- 23,42 ----
  32006.       "from addr", 0,
  32007.   
  32008.   #define    SUBJSW    3
  32009. !     "subject text", 0,
  32010.   
  32011.   #define    HELPSW    4
  32012.       "help", 4,
  32013.   
  32014. ! #define    RESNDSW    5
  32015. !     "resent", -6,
  32016. ! 
  32017. !     NULL, 0
  32018.   };
  32019.   
  32020.   /*   */
  32021.   
  32022. ! static TYPESIG    intrser ();
  32023.   
  32024.   
  32025.   static char tmpfil[BUFSIZ];
  32026. ***************
  32027. *** 47,52 ****
  32028. --- 53,59 ----
  32029.           status,
  32030.               i,
  32031.               iscc = 0,
  32032. +         resent = 0,
  32033.               somebody;
  32034.       char   *cp,
  32035.              *tolist = NULL,
  32036. ***************
  32037. *** 58,63 ****
  32038. --- 65,73 ----
  32039.               buf[100];
  32040.       FILE * out;
  32041.   
  32042. + #ifdef LOCALE
  32043. +     setlocale(LC_ALL, "");
  32044. + #endif
  32045.       invo_name = r1bindex (argv[0], '/');
  32046.       m_foil (NULLCP);
  32047.   
  32048. ***************
  32049. *** 102,107 ****
  32050. --- 112,121 ----
  32051.               if (!(subject = *argp++) || *subject == '-')
  32052.               adios (NULLCP, "missing argument to %s", argp[-2]);
  32053.               continue;
  32054. + 
  32055. +         case RESNDSW: 
  32056. +             resent++;
  32057. +             continue;
  32058.           }
  32059.       if (iscc)
  32060.           cclist = cclist ? add (cp, add (", ", cclist)) : getcpy (cp);
  32061. ***************
  32062. *** 120,133 ****
  32063.   
  32064.       setsig (SIGINT, intrser);
  32065.   
  32066. !     fprintf (out, "To: %s\n", tolist);
  32067.       if (cclist)
  32068. !     fprintf (out, "cc: %s\n", cclist);
  32069.       if (subject)
  32070. !     fprintf (out, "Subject: %s\n", subject);
  32071.       if (from)
  32072. !     fprintf (out, "From: %s\n", from);
  32073. !     (void) fputs ("\n", out);
  32074.   
  32075.       if (body) {
  32076.       fprintf (out, "%s", body);
  32077. --- 134,148 ----
  32078.   
  32079.       setsig (SIGINT, intrser);
  32080.   
  32081. !     fprintf (out, "%sTo: %s\n", resent ? "Resent-" : "", tolist);
  32082.       if (cclist)
  32083. !     fprintf (out, "%scc: %s\n", resent ? "Resent-" : "", cclist);
  32084.       if (subject)
  32085. !     fprintf (out, "%sSubject: %s\n", resent ? "Resent-" : "", subject);
  32086.       if (from)
  32087. !     fprintf (out, "%sFrom: %s\n", resent ? "Resent-" : "", from);
  32088. !     if (!resent)
  32089. !     (void) fputs ("\n", out);
  32090.   
  32091.       if (body) {
  32092.       fprintf (out, "%s", body);
  32093. ***************
  32094. *** 156,162 ****
  32095.           admonish (NULLCP, "unable to fork");
  32096.   
  32097.       case OK: 
  32098. !         execlp (postproc, r1bindex (postproc, '/'), tmpfil, NULLCP);
  32099.           fprintf (stderr, "unable to exec ");
  32100.           perror (postproc);
  32101.           _exit (-1);
  32102. --- 171,178 ----
  32103.           admonish (NULLCP, "unable to fork");
  32104.   
  32105.       case OK: 
  32106. !         execlp (postproc, r1bindex (postproc, '/'), tmpfil,
  32107. !             resent ? "-dist" : NULLCP, NULLCP);
  32108.           fprintf (stderr, "unable to exec ");
  32109.           perror (postproc);
  32110.           _exit (-1);
  32111. ***************
  32112. *** 179,191 ****
  32113.   
  32114.   /* ARGSUSED */
  32115.   
  32116. ! static int  intrser (i)
  32117.   int     i;
  32118.   {
  32119.   #ifndef    BSD42
  32120.       if (i)
  32121.       (void) signal (i, SIG_IGN);
  32122. ! #endif    BSD42
  32123.   
  32124.       (void) unlink (tmpfil);
  32125.       done (i != 0 ? 1 : 0);
  32126. --- 195,207 ----
  32127.   
  32128.   /* ARGSUSED */
  32129.   
  32130. ! static TYPESIG  intrser (i)
  32131.   int     i;
  32132.   {
  32133.   #ifndef    BSD42
  32134.       if (i)
  32135.       (void) signal (i, SIG_IGN);
  32136. ! #endif    /* BSD42 */
  32137.   
  32138.       (void) unlink (tmpfil);
  32139.       done (i != 0 ? 1 : 0);
  32140. *** /dev/null    Tue Dec 15 08:01:10 1992
  32141. --- uip/mhn.c    Mon Dec 14 16:21:19 1992
  32142. ***************
  32143. *** 0 ****
  32144. --- 1,6054 ----
  32145. + /* mhn.c - multi-media MH */
  32146. + #ifndef    lint
  32147. + static char ident[] = "@(#)$Id: mhn.c,v 2.21 1992/12/15 00:20:22 jromine Exp $";
  32148. + #endif    /* lint */
  32149. + 
  32150. + #include "../h/mh.h"
  32151. + #include <ctype.h>
  32152. + #include <errno.h>
  32153. + #include <setjmp.h>
  32154. + #include <signal.h>
  32155. + #include <stdio.h>
  32156. + #include <sys/types.h>
  32157. + #include <sys/stat.h>
  32158. + #ifdef    BSD42
  32159. + #include <sys/wait.h>
  32160. + #endif
  32161. + #ifdef LOCALE
  32162. + #include    <locale.h>
  32163. + #endif
  32164. + 
  32165. + /*   */
  32166. + 
  32167. + static struct swit switches[] = {
  32168. + #define    AUTOSW      0
  32169. +     "auto", 0,
  32170. + #define    NAUTOSW      1
  32171. +     "noauto", 0,
  32172. + 
  32173. + #define    DEBUGSW      2
  32174. +     "debug", -5,
  32175. +     
  32176. + #define    EBCDICSW  3
  32177. +     "ebcdicsafe", 0,
  32178. + #define    NEBCDICSW 4
  32179. +     "noebcdicsafe", 0,
  32180. + 
  32181. + #define    FORMSW      5
  32182. +     "form formfile", 4,
  32183. + 
  32184. + #define    HEADSW      6
  32185. +     "headers", 0,
  32186. + #define    NHEADSW      7
  32187. +     "noheaders", 0,
  32188. + 
  32189. + #define    LISTSW      8
  32190. +     "list", 0,
  32191. + #define    NLISTSW      9
  32192. +     "nolist", 0,
  32193. + 
  32194. + #define    PARTSW     10
  32195. +     "part number", 0,
  32196. + 
  32197. + #define    SIZESW     11
  32198. +     "realsize", 0,
  32199. + #define    NSIZESW     12
  32200. +     "norealsize", 0,
  32201. + 
  32202. + #define    RFC934SW 13
  32203. +     "rfc934mode", 0,
  32204. + #define    NRFC934SW 14
  32205. +     "norfc934mode", 0,
  32206. + 
  32207. + #define    SERIALSW 15
  32208. +     "serialonly", 0,
  32209. + #define    NSERIALSW 16
  32210. +     "noserialonly", 0,
  32211. + 
  32212. + #define    SHOWSW     17
  32213. +     "show", 0,
  32214. + #define    NSHOWSW     18
  32215. +     "noshow", 0,
  32216. + 
  32217. + #define    STORESW     19
  32218. +     "store", 0,
  32219. + #define    NSTORESW 20
  32220. +     "nostore", 0,
  32221. + 
  32222. + #define    TYPESW     21
  32223. +     "type content", 0,
  32224. + 
  32225. + #define    VERBSW     22
  32226. +     "verbose", 0,
  32227. + #define    NVERBSW     23
  32228. +     "noverbose", 0,
  32229. +     
  32230. + #define    HELPSW     24
  32231. +     "help", 4,
  32232. + 
  32233. + #define    PROGSW   25
  32234. +     "moreproc program", -4,
  32235. + #define    NPROGSW     26
  32236. +     "nomoreproc", -3,
  32237. + 
  32238. + #define    LENSW     27
  32239. +     "length lines", -4,
  32240. + #define    WIDSW     28
  32241. +     "width columns", -4,
  32242. + 
  32243. + #define    FILESW     29        /* interface from show */
  32244. +     "file file", -4,
  32245. + 
  32246. + #define    VIAMSW     30
  32247. +     "viamail mailpath", -7,
  32248. + #define    VIASSW     31
  32249. +     "viasubj subject", -7,
  32250. + #define    VIAPSW     32
  32251. +     "viaparm arguments", -7,
  32252. + #define    VIADSW     33
  32253. +     "viadesc text", -7,
  32254. + #define    VIACSW     34
  32255. +     "viacmnt text", -7,
  32256. + #define    VIAZSW     35
  32257. +     "viadelay seconds", -8,
  32258. + #define    VIAFSW     36
  32259. +     "viafrom mailpath", -7,
  32260. + 
  32261. +     NULL, 0
  32262. + };
  32263. + 
  32264. + /*   */
  32265. + 
  32266. + #define    NPARTS    50
  32267. + #define    NTYPES    20
  32268. + 
  32269. + static    int    autosw = 0;
  32270. +     int    debugsw = 0;
  32271. + static    int    ebcdicsw = 0;
  32272. + static    char   *formsw = NULLCP;
  32273. + static    int    headsw = 1;
  32274. + static    int    listsw = 0;
  32275. + static    int    nomore = 0;
  32276. + static    int    npart = 0;
  32277. + static    char   *parts[NPARTS + 1];
  32278. + static    char   *progsw = NULLCP;
  32279. + static    int    rfc934sw = 1;
  32280. + static    int    serialsw = 0;
  32281. + static    int    showsw = 0;
  32282. + static    int    sizesw = 1;
  32283. + static    int    storesw = 0;
  32284. + static    int    ntype = 0;
  32285. + static    char   *types[NTYPES + 1];
  32286. +     int    verbosw = 0;
  32287. + 
  32288. + static    int    endian = 0;
  32289. + static  char   *mm_charset = NULL;
  32290. + 
  32291. + static    int    xpid = 0;
  32292. + static    int    userrs = 0;
  32293. + 
  32294. + static    char   *cache;
  32295. + static    int    cwdlen;
  32296. + static    char   *cwd;
  32297. + static    char   *dir;
  32298. + static    char   *errs = NULL;
  32299. + static    char   *tmp;
  32300. + 
  32301. + 
  32302. + extern    int    errno;
  32303. + extern    int    sys_nerr;
  32304. + extern    char   *sys_errlist[];
  32305. + 
  32306. + off_t    lseek ();
  32307. + time_t    time ();
  32308. + 
  32309. + /*   */
  32310. + 
  32311. + #define    LSTFMT1        "%4s %-5s %-24s %5s %-36s\n"
  32312. + 
  32313. + #define    LSTFMT2a    "%4d "
  32314. + #define    LSTFMT2b    "%-5s %-24.24s "
  32315. + #define    LSTFMT2c1    "%5lu"
  32316. + #define    LSTFMT2c2    "%4lu%c"
  32317. + #define    LSTFMT2c3    "huge "
  32318. + #define    LSTFMT2c4    "     "
  32319. + #define    LSTFMT2d1    " %-36.36s"
  32320. + #define    LSTFMT2d2    "\t     %-65.65s\n"
  32321. + 
  32322. + static void  build_comp ();
  32323. + 
  32324. + typedef struct CTinfo {
  32325. +     char   *ci_type;
  32326. +     char   *ci_subtype;
  32327. + 
  32328. + #define    NPARMS    10
  32329. +     char   *ci_attrs[NPARMS + 2];
  32330. +     char   *ci_values[NPARMS];
  32331. + 
  32332. +     char   *ci_comment;
  32333. + 
  32334. +     char   *ci_magic;
  32335. + }    CTInfo, *CI;
  32336. + #define    NULLCI    ((CI) 0)
  32337. + 
  32338. + static int get_ctinfo ();
  32339. + static int get_comment ();
  32340. + 
  32341. + 
  32342. + typedef struct Content {
  32343. +     char   *c_partno;        /* within multipart content */
  32344. + 
  32345. +     char   *c_vrsn;        /* Body-Version: */
  32346. + 
  32347. +     char   *c_ctline;        /* Content-Type: */
  32348. +     CTInfo  c_ctinfo;
  32349. + 
  32350. +     int        c_type;        /* internal form */
  32351. + #define    CT_UNKNOWN    0x00
  32352. + #define    CT_APPLICATION    0x01
  32353. + #define    CT_AUDIO    0x02
  32354. + #define    CT_IMAGE    0x03
  32355. + #define    CT_MESSAGE    0x04
  32356. + #define    CT_MULTIPART    0x05
  32357. + #define    CT_TEXT        0x06
  32358. + #define    CT_VIDEO    0x07
  32359. + #define    CT_EXTENSION    0x08
  32360. + 
  32361. +     int        c_subtype;        /* filled-in by c_ctinitfnx */
  32362. +     caddr_t c_ctparams;        /*   .. */
  32363. +     caddr_t c_ctextern;        /*   .. */
  32364. +     char   *c_showproc;        /* default, if not in profile */
  32365. +     char   *c_termproc;        /* for charset madness... */
  32366. +     char   *c_storeproc;    /* default, if not in profile */
  32367. + 
  32368. +     int      (*c_ctinitfnx) ();    /* parse content */
  32369. +     int      (*c_ctlistfnx) ();    /* list content */
  32370. +     int      (*c_ctshowfnx) ();    /* show content */
  32371. +     int      (*c_ctstorefnx) ();    /* store content */
  32372. +     int      (*c_ctfreefnx) ();    /* free content-specific structures */
  32373. + 
  32374. + 
  32375. +     char   *c_celine;        /* Content-Transfer-Encoding: */
  32376. + 
  32377. +     int        c_encoding;        /* internal form */
  32378. + #define    CE_UNKNOWN    0x00
  32379. + #define    CE_BASE64    0x01
  32380. + #define    CE_QUOTED    0x02
  32381. + #define    CE_8BIT        0x03
  32382. + #define    CE_7BIT        0x04
  32383. + #define    CE_BINARY    0x05
  32384. + #define    CE_EXTENSION    0x06
  32385. + #define    CE_EXTERNAL    0x07    /* for external-body */
  32386. + 
  32387. +     caddr_t c_ceparams;        /* filled-in by encoding initfnx */
  32388. + 
  32389. +     int      (*c_ceopenfnx) ();    /* get a stream to decoded contents */
  32390. +     int      (*c_ceclosefnx) ();    /* release stream */
  32391. +     int      (*c_celistfnx) ();    /* list decoding info */
  32392. +     unsigned long
  32393. +       (*c_cesizefnx) ();    /* size of decoded contents */
  32394. +     int      (*c_cefreefnx) ();    /* free encoding-specific structures */
  32395. + 
  32396. + 
  32397. +     char   *c_id;        /* Content-ID: */
  32398. +     char   *c_descr;        /* Content-Description: */
  32399. + 
  32400. + 
  32401. +     FILE   *c_fp;        /* read contents (stream) */
  32402. +     char   *c_file;        /* read contents (file) */
  32403. +     int        c_unlink;        /* remove file when done? */
  32404. +     int        c_umask;        /* associated umask */
  32405. +     long    c_begin;        /* where content starts in file */
  32406. +     long    c_end;        /*   ..         ends           */
  32407. + 
  32408. +     int        c_pid;        /* process doing display */
  32409. +     char   *c_storage;        /* write contents (file) */
  32410. + 
  32411. +     int        c_rfc934;        /* rfc934 compatibility */
  32412. + }    Content, *CT;
  32413. + #define    NULLCT    ((CT) 0)
  32414. + 
  32415. + static CT get_content ();
  32416. + static int list_content (), show_content (), store_content ();
  32417. + static int user_content(), compose_content(), output_content();
  32418. + static void free_content (), flush_errors ();
  32419. + 
  32420. + #if    defined(__STDC__) && defined(VSPRINTF)
  32421. + static void content_error (char *, register CT, char *, ...);
  32422. + #else
  32423. + static void content_error ();
  32424. + #endif
  32425. + 
  32426. + static int   init_encoding(), type_ok(), copy_some_headers(), set_endian();
  32427. + static int   write7Bit(), writeQuoted(), writeBase64(), writeBase64aux();
  32428. + static int   via_mail(), via_post(), pidcheck();
  32429. + 
  32430. + static    CT    *cts = NULL;
  32431. + 
  32432. + 
  32433. + #define    quitser    pipeser
  32434. + static    TYPESIG    pipeser ();
  32435. + static    char   *fgetstr ();
  32436. + 
  32437. + /*   */
  32438. + 
  32439. + /* ARGSUSED */
  32440. + 
  32441. + main (argc, argv)
  32442. + int     argc;
  32443. + char  **argv;
  32444. + {
  32445. +     int     f6 = 0,
  32446. +         msgp = 0,
  32447. +             msgnum;
  32448. +     char   *cp,
  32449. +        *f1 = NULL,
  32450. +        *f2 = NULL,
  32451. +        *f3 = NULL,
  32452. +        *f4 = NULL,
  32453. +        *f5 = NULL,
  32454. +        *f7 = NULL,
  32455. +        *file = NULL,
  32456. +            *folder = NULL,
  32457. +            *maildir,
  32458. +             buf[100],
  32459. +           **ap,
  32460. +           **argp,
  32461. +            *arguments[MAXARGS],
  32462. +            *msgs[MAXARGS];
  32463. +     struct msgs *mp;
  32464. +     register CT     ct,
  32465. +         *ctp;
  32466. +     FILE    *fp;
  32467. + 
  32468. + #ifdef LOCALE
  32469. +     setlocale(LC_ALL, "");
  32470. + #endif
  32471. +     invo_name = r1bindex (argv[0], '/');
  32472. +     if (argv[1] && uprf (argv[1], "-via"))
  32473. +     m_foil (NULLCP);
  32474. +     if ((cp = m_find (invo_name)) != NULL) {
  32475. +     ap = brkstring (cp = getcpy (cp), " ", "\n");
  32476. +     ap = copyip (ap, arguments);
  32477. +     }
  32478. +     else
  32479. +     ap = arguments;
  32480. +     (void) copyip (argv + 1, ap);
  32481. +     argp = arguments;
  32482. + 
  32483. + /*   */
  32484. + 
  32485. +     while (cp = *argp++) {
  32486. +     if (*cp == '-')
  32487. +         switch (smatch (++cp, switches)) {
  32488. +         case AMBIGSW: 
  32489. +             ambigsw (cp, switches);
  32490. +             done (1);
  32491. +         case UNKWNSW: 
  32492. +             adios (NULLCP, "-%s unknown", cp);
  32493. +         case HELPSW: 
  32494. +             (void) sprintf (buf, "%s [+folder] [msgs] [switches]",
  32495. +                 invo_name);
  32496. +             help (buf, switches);
  32497. +             done (1);
  32498. + 
  32499. +         case AUTOSW:
  32500. +             autosw++;
  32501. +             continue;
  32502. +         case NAUTOSW:
  32503. +             autosw = 0;
  32504. +             continue;
  32505. + 
  32506. +         case DEBUGSW:
  32507. +             debugsw++;
  32508. +             continue;
  32509. +     
  32510. +         case EBCDICSW:
  32511. +             ebcdicsw++;
  32512. +             continue;
  32513. +         case NEBCDICSW:
  32514. +             ebcdicsw = 0;
  32515. +             continue;
  32516. + 
  32517. +         case FORMSW:
  32518. +             if (!(cp = *argp++) || *cp == '-')
  32519. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32520. +             if (formsw)
  32521. +             free (formsw);
  32522. +             formsw = getcpy (libpath (cp));
  32523. +             continue;
  32524. + 
  32525. +         case HEADSW:
  32526. +             headsw++;
  32527. +             continue;
  32528. +         case NHEADSW:
  32529. +             headsw = 0;
  32530. +             continue;
  32531. + 
  32532. +         case LISTSW:
  32533. +             listsw++;
  32534. +             continue;
  32535. +         case NLISTSW:
  32536. +             listsw = 0;
  32537. +             continue;
  32538. + 
  32539. +         case PARTSW:
  32540. +             if (!(cp = *argp++) || *cp == '-')
  32541. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32542. +             if (npart >= NPARTS)
  32543. +             adios (NULLCP,
  32544. +                    "too many parts (starting with %s), %d max",
  32545. +                    cp, NPARTS);
  32546. +             parts[npart++] = cp;
  32547. +             continue;
  32548. + 
  32549. +         case RFC934SW:
  32550. +             rfc934sw++;
  32551. +             continue;
  32552. +         case NRFC934SW:
  32553. +             rfc934sw = 0;
  32554. +             continue;
  32555. + 
  32556. +         case SERIALSW:
  32557. +             serialsw++;
  32558. +             continue;
  32559. +         case NSERIALSW:
  32560. +             serialsw = 0;
  32561. +             continue;
  32562. + 
  32563. +         case SHOWSW:
  32564. +             showsw++;
  32565. +             continue;
  32566. +         case NSHOWSW:
  32567. +             showsw = 0;
  32568. +             continue;
  32569. + 
  32570. +         case SIZESW:
  32571. +             sizesw++;
  32572. +             continue;
  32573. +         case NSIZESW:
  32574. +             sizesw = 0;
  32575. +             continue;
  32576. + 
  32577. +         case STORESW:
  32578. +             storesw++;
  32579. +             continue;
  32580. +         case NSTORESW:
  32581. +             storesw = 0;
  32582. +             continue;
  32583. + 
  32584. +         case TYPESW:
  32585. +             if (!(cp = *argp++) || *cp == '-')
  32586. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32587. +             if (ntype >= NTYPES)
  32588. +             adios (NULLCP,
  32589. +                    "too many types (starting with %s), %d max",
  32590. +                    cp, NTYPES);
  32591. +             types[ntype++] = cp;
  32592. +             continue;
  32593. + 
  32594. +         case VERBSW: 
  32595. +             verbosw++;
  32596. +             continue;
  32597. +         case NVERBSW: 
  32598. +             verbosw = 0;
  32599. +             continue;
  32600. + 
  32601. +         case PROGSW:
  32602. +             if (!(progsw = *argp++) || *progsw == '-')
  32603. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32604. +             continue;
  32605. +         case NPROGSW:
  32606. +             nomore++;
  32607. +             continue;
  32608. + 
  32609. +         case LENSW:
  32610. +         case WIDSW:
  32611. +             if (!(cp = *argp++) || *cp == '-')
  32612. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32613. +             continue;
  32614. + 
  32615. +         case FILESW:
  32616. +             if (!(cp = *argp++) || (*cp == '-' && cp[1]))
  32617. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32618. +             file = *cp == '-' ? cp : path (cp, TFILE);
  32619. +             continue;
  32620. + 
  32621. +            case VIAMSW:
  32622. +             if (!(f1 = *argp++))
  32623. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32624. +             continue;
  32625. +            case VIASSW:
  32626. +             if (!(f2 = *argp++))
  32627. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32628. +             continue;
  32629. +            case VIAPSW:
  32630. +             if (!(f3 = *argp++))
  32631. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32632. +             continue;
  32633. +            case VIADSW:
  32634. +             if (!(f4 = *argp++))
  32635. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32636. +             continue;
  32637. +            case VIACSW:
  32638. +             if (!(f5 = *argp++))
  32639. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32640. +             continue;
  32641. +            case VIAZSW:
  32642. +             if (!(cp = *argp++) || *cp == '-')
  32643. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32644. +             if (sscanf (cp, "%d", &f6) != 1 || f6 < 0)
  32645. +             f6 = 300;
  32646. +             continue;
  32647. +            case VIAFSW:
  32648. +             if (!(f7 = *argp++))
  32649. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  32650. +             continue;
  32651. +         }
  32652. +     if (*cp == '+' || *cp == '@') {
  32653. +         if (folder)
  32654. +         adios (NULLCP, "only one folder at a time!");
  32655. +         else
  32656. +         folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF);
  32657. +     }
  32658. +     else
  32659. +         msgs[msgp++] = cp;
  32660. +     }
  32661. +     parts[npart] = NULL, types[ntype] = NULL;
  32662. +     if (!formsw)
  32663. +     formsw = getcpy (libpath ("mhl.headers"));
  32664. + 
  32665. +     set_endian ();
  32666. + 
  32667. + /*   */
  32668. + 
  32669. +     if (f1) {
  32670. +     via_mail (f1, f2, f3, f4, f5, f6, f7);
  32671. +     /* NOTREACHED */
  32672. +     }
  32673. +     else
  32674. +     if (f2 || f3 || f4 || f5 || f6)
  32675. +         adios (NULLCP, "missing -viamail \"mailpath\" switch");
  32676. + 
  32677. +     if (cp = getenv ("MHN")) {
  32678. +     if (fp = fopen (cp, "r")) {
  32679. +         m_readefs ((struct node **) 0, fp, cp, 0);
  32680. + 
  32681. +         (void) fclose (fp);
  32682. +     }
  32683. +     else
  32684. +         admonish ("", "unable to read $MHN profile (%s)", cp);
  32685. +     }
  32686. +     if (fp = fopen (cp = libpath ("mhn_defaults"), "r")) {
  32687. +     m_readefs ((struct node **) 0, fp, cp, 0);
  32688. + 
  32689. +     (void) fclose (fp);
  32690. +     }
  32691. + 
  32692. +     (void) sprintf (buf, "%s-cache", invo_name);
  32693. +     cache = m_find (buf);
  32694. + 
  32695. +     cwdlen = strlen (cwd = getcpy (pwd ()));
  32696. +     (void) sprintf (buf, "%s-storage", invo_name);
  32697. +     dir = getcpy ((cp = m_find (buf)) && *cp ? cp : cwd);
  32698. +     tmp = cp && *cp ? concat (cp, "/", invo_name, NULLCP)
  32699. +             : add (m_maildir (invo_name), NULLCP);
  32700. + 
  32701. +     if (!m_find ("path"))
  32702. +     free (path ("./", TFOLDER));
  32703. + 
  32704. +     if (msgp == 1
  32705. +         && !folder
  32706. +         && !npart
  32707. +         && !showsw
  32708. +         && !storesw
  32709. +         && !ntype
  32710. +         && !file
  32711. +         && (cp = getenv ("mhdraft"))
  32712. +         && strcmp (cp, msgs[0]) == 0) {
  32713. +     build_comp (cp);
  32714. +     /* NOTREACHED */
  32715. +     }
  32716. + 
  32717. +     if (file) {
  32718. +     int    stdinP;
  32719. + 
  32720. +     if (msgp)
  32721. +         adios (NULLCP, "only one file at a time!");
  32722. + 
  32723. +     if ((cts = (CT *) calloc ((unsigned) 2, sizeof *cts)) == NULL)
  32724. +         adios (NULLCP, "out of memory");
  32725. + 
  32726. +     ctp = cts;
  32727. +     if (stdinP = (strcmp (file, "-") == 0)) {
  32728. +         char    buffer[BUFSIZ];
  32729. + 
  32730. +         file = add (m_tmpfil (invo_name), NULLCP);
  32731. + 
  32732. +         if ((fp = fopen (file, "w+")) == NULL)
  32733. +         adios (file, "unable to fopen for writing and reading");
  32734. +         (void) chmod (file, 0600);
  32735. +         while (fgets (buffer, sizeof buffer, stdin))
  32736. +         (void) fputs (buffer, fp);
  32737. +         (void) fflush (fp);
  32738. + 
  32739. +         if (ferror (stdin)) {
  32740. +         (void) unlink (file);
  32741. +         adios ("stdin", "error reading");
  32742. +         }
  32743. + 
  32744. +         if (ferror (fp)) {
  32745. +         (void) unlink (file);
  32746. +         adios (file, "error writing");
  32747. +         }
  32748. + 
  32749. +         (void) fseek (fp, 0L, 0);
  32750. +     }
  32751. +     else
  32752. +         if ((fp = fopen (file, "r")) == NULL)
  32753. +         adios (file, "unable to read");
  32754. + 
  32755. +     if (ct = get_content (fp, file, 1)) {
  32756. +         if (stdinP)
  32757. +         ct -> c_unlink = 1;
  32758. + 
  32759. +         ct -> c_fp = NULL;
  32760. +         if (ct -> c_end == 0L) {
  32761. +         (void) fseek (fp, 0L, 2);
  32762. +         ct -> c_end = ftell (fp);
  32763. +         }
  32764. +         if (ct -> c_ctinitfnx && (*ct -> c_ctinitfnx) (ct) == NOTOK)
  32765. +         free_content (ct);
  32766. +         else
  32767. +         *ctp++ = ct;
  32768. +     }
  32769. +     else
  32770. +         advise (NULLCP, "unable to decode %s", file);
  32771. + 
  32772. +     (void) fclose (fp);
  32773. + 
  32774. +     mp = NULL;
  32775. +     goto go_to_it;
  32776. +     }
  32777. + 
  32778. +     if (!msgp)
  32779. +     msgs[msgp++] = "cur";
  32780. +     if (!folder)
  32781. +     folder = m_getfolder ();
  32782. +     maildir = m_maildir (folder);
  32783. + 
  32784. +     if (chdir (maildir) == NOTOK)
  32785. +     adios (maildir, "unable to change directory to");
  32786. +     if (!(mp = m_gmsg (folder)))
  32787. +     adios (NULLCP, "unable to read folder %s", folder);
  32788. +     if (mp -> hghmsg == 0)
  32789. +     adios (NULLCP, "no messages in %s", folder);
  32790. + 
  32791. +     for (msgnum = 0; msgnum < msgp; msgnum++)
  32792. +     if (!m_convert (mp, msgs[msgnum]))
  32793. +         done (1);
  32794. +     m_setseq (mp);
  32795. + 
  32796. +     if ((cts = (CT *) calloc ((unsigned) (mp -> numsel + 1), sizeof *cts))
  32797. +         == NULL)
  32798. +     adios (NULLCP, "out of memory");
  32799. + 
  32800. +     ctp = cts;
  32801. +     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  32802. +     if (mp -> msgstats[msgnum] & SELECTED) {
  32803. +         char   *msgnam;
  32804. + 
  32805. +         if ((fp = fopen (msgnam = m_name (msgnum), "r")) == NULL)
  32806. +         adios (msgnam, "unable to read message");
  32807. + 
  32808. +         if (ct = get_content (fp, msgnam, 1)) {
  32809. +         ct -> c_fp = NULL;
  32810. +         if (ct -> c_end == 0L) {
  32811. +             (void) fseek (fp, 0L, 2);
  32812. +             ct -> c_end = ftell (fp);
  32813. +         }
  32814. +         if (ct -> c_ctinitfnx && (*ct -> c_ctinitfnx) (ct) == NOTOK)
  32815. +             free_content (ct);
  32816. +         else
  32817. +             *ctp++ = ct;
  32818. +         }
  32819. +         else
  32820. +         advise (NULLCP, "unable to decode message %s", msgnam);
  32821. + 
  32822. +         (void) fclose (fp);
  32823. +     }
  32824. + 
  32825. + go_to_it: ;
  32826. +     if (!*cts)
  32827. +     done (1);
  32828. + 
  32829. +     if (!listsw && !showsw && !storesw)
  32830. +     showsw++;
  32831. + 
  32832. + /* listsw && showsw        -> user wants per-message listing,
  32833. +                    so delay until showsw processing
  32834. + 
  32835. +       && storesw && sizesw    -> evaluating size will cause more work,
  32836. +                    so delay until after storesw processing
  32837. +  */
  32838. +     userrs = 1;
  32839. +     (void) signal (SIGQUIT, quitser);
  32840. +     (void) signal (SIGPIPE, pipeser);
  32841. + 
  32842. +     for (ctp = cts; ct = *ctp; ctp++)
  32843. +     if (type_ok (ct)
  32844. +             && (ct -> c_ctlistfnx
  32845. +                 || ct -> c_ctstorefnx
  32846. +                 || ct -> c_ctshowfnx)) {
  32847. +         struct    stat st;
  32848. + 
  32849. +         if (!ct -> c_umask)
  32850. +         ct -> c_umask = ~(stat (ct -> c_file, &st) != NOTOK
  32851. +                     ? (st.st_mode & 0777) : m_gmprot ());
  32852. +     }
  32853. + 
  32854. +     if (listsw && !showsw && (!storesw || !sizesw)) {
  32855. +     if (headsw)
  32856. +         printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  32857. +             "description");
  32858. + 
  32859. +     for (ctp = cts; ct = *ctp; ctp++)
  32860. +         if (type_ok (ct) && ct -> c_ctlistfnx) {
  32861. +         (void) umask (ct -> c_umask);
  32862. +         (void) (*ct -> c_ctlistfnx) (ct, 1);
  32863. +         if (ct -> c_fp)
  32864. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  32865. +         }
  32866. + 
  32867. +     flush_errors ();
  32868. +     }
  32869. + 
  32870. +     if (storesw) {
  32871. +     for (ctp = cts; ct = *ctp; ctp++)
  32872. +         if (type_ok (ct) && ct -> c_ctstorefnx) {
  32873. +         (void) umask (ct -> c_umask);
  32874. +         (void) (*ct -> c_ctstorefnx) (ct, NULLCP);
  32875. +         if (ct -> c_fp)
  32876. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  32877. +         }
  32878. + 
  32879. +     flush_errors ();
  32880. +     }
  32881. + 
  32882. +     if (listsw && !showsw && storesw && sizesw) {
  32883. +     if (headsw)
  32884. +         printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  32885. +             "description");
  32886. + 
  32887. +     for (ctp = cts; ct = *ctp; ctp++)
  32888. +         if (type_ok (ct) && ct -> c_ctlistfnx) {
  32889. +         (void) umask (ct -> c_umask);
  32890. +         (void) (*ct -> c_ctlistfnx) (ct, 1);
  32891. +         if (ct -> c_fp)
  32892. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  32893. +         }
  32894. + 
  32895. +     flush_errors ();
  32896. +     listsw = 0;
  32897. +     }
  32898. + 
  32899. +     if (showsw)
  32900. +     for (ctp = cts; ct = *ctp; ctp++) {
  32901. +         int        child_id,
  32902. +             i,
  32903. +             vecp;
  32904. +         char   *vec[8];
  32905. + #if defined(BSD42) && !defined(WAITINT)
  32906. +         union wait status;
  32907. + #else
  32908. +         int     status;
  32909. + #endif
  32910. +         TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  32911. + 
  32912. +         if (!type_ok (ct))
  32913. +         continue;
  32914. + 
  32915. +         (void) umask (ct -> c_umask);
  32916. + 
  32917. +         if (listsw) {
  32918. +         if (headsw)
  32919. +             printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  32920. +                 "description");
  32921. + 
  32922. +         if (ct -> c_ctlistfnx)
  32923. +             (void) (*ct -> c_ctlistfnx) (ct, 1);
  32924. +         }
  32925. + 
  32926. +         if (!ct -> c_ctshowfnx) {
  32927. +         if (ct -> c_fp)
  32928. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  32929. +         continue;
  32930. +         }
  32931. + 
  32932. +         vecp = 0;
  32933. +         vec[vecp++] = r1bindex (mhlproc, '/');
  32934. +         vec[vecp++] = "-form";
  32935. +         vec[vecp++] = formsw;
  32936. +         vec[vecp++] = "-nobody";
  32937. +         vec[vecp++] = ct -> c_file;
  32938. +         if (nomore)
  32939. +         vec[vecp++] = "-nomoreproc";
  32940. +         else
  32941. +         if (progsw) {
  32942. +             vec[vecp++] = "-moreproc";
  32943. +             vec[vecp++] = progsw;
  32944. +         }
  32945. +         vec[vecp] = NULL;
  32946. + 
  32947. +         (void) fflush (stdout);
  32948. + 
  32949. +         for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  32950. +         sleep (5);
  32951. +         switch (child_id) {
  32952. +             case NOTOK:
  32953. +             adios ("fork", "unable to");
  32954. +             /* NOTREACHED */
  32955. + 
  32956. +         case OK:
  32957. +             (void) execvp (mhlproc, vec);
  32958. +             fprintf (stderr, "unable to exec ");
  32959. +             perror (mhlproc);
  32960. +             _exit (-1);
  32961. +             /* NOTREACHED */
  32962. + 
  32963. +         default:
  32964. +             xpid = child_id;
  32965. +             break;
  32966. +         }
  32967. + 
  32968. +         (void) (*ct -> c_ctshowfnx) (ct, 1, 0);
  32969. +         if (ct -> c_fp)
  32970. +         (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  32971. + 
  32972. +         hstat = signal (SIGHUP, SIG_IGN);
  32973. +         istat = signal (SIGINT, SIG_IGN);
  32974. +         qstat = signal (SIGQUIT, SIG_IGN);
  32975. +         tstat = signal (SIGTERM, SIG_IGN);
  32976. + 
  32977. +         while (wait (&status) != NOTOK) {
  32978. + #if defined(BSD42) && !defined(WAITINT)
  32979. +         (void) pidcheck (status.w_status);
  32980. + #else
  32981. +         (void) pidcheck (status);
  32982. + #endif
  32983. +         continue;
  32984. +         }
  32985. + 
  32986. +         (void) signal (SIGHUP, hstat);
  32987. +         (void) signal (SIGINT, istat);
  32988. +         (void) signal (SIGQUIT, qstat);
  32989. +         (void) signal (SIGTERM, tstat);
  32990. + 
  32991. +         xpid = 0;
  32992. + 
  32993. +         flush_errors ();
  32994. +     }
  32995. + 
  32996. +     for (ctp = cts; *ctp; ctp++)
  32997. +     free_content (*ctp);
  32998. +     free ((char *) cts);
  32999. +     cts = NULL;
  33000. + 
  33001. +     if (mp) {
  33002. +     m_replace (pfolder, folder);
  33003. +     if (mp -> hghsel != mp -> curmsg)
  33004. +         m_setcur (mp, mp -> hghsel);
  33005. +     m_sync (mp);
  33006. +     m_update ();
  33007. +     }
  33008. + 
  33009. +     done (0);
  33010. +     /* NOTREACHED */
  33011. + }
  33012. + 
  33013. + /*   */
  33014. + 
  33015. + static TYPESIG  pipeser (i)
  33016. + int    i;
  33017. + {
  33018. +     if (i == SIGQUIT) {
  33019. +     (void) unlink ("core");
  33020. + 
  33021. +     (void) fflush (stdout);
  33022. + 
  33023. +     fprintf (stderr, "\n");
  33024. +     (void) fflush (stderr);
  33025. +     }
  33026. + 
  33027. +     done (1);
  33028. +     /* NOTREACHED */
  33029. + }
  33030. + 
  33031. + /*   */
  33032. + 
  33033. + #include "../h/mhn.h"
  33034. + 
  33035. + 
  33036. + struct str2init {
  33037. +     char   *si_key;
  33038. +     int        si_value;
  33039. +     int   (*si_init) ();
  33040. + };
  33041. + 
  33042. + 
  33043. + static int InitApplication (), InitMessage (), InitMultiPart (), InitText ();
  33044. +         
  33045. + 
  33046. + static struct str2init str2cts[] = {
  33047. +     "application",  CT_APPLICATION, InitApplication,
  33048. +     "audio",        CT_AUDIO,        NULL,
  33049. +     "image",        CT_IMAGE,        NULL,
  33050. +     "message",        CT_MESSAGE,        InitMessage,
  33051. +     "multipart",    CT_MULTIPART,   InitMultiPart,
  33052. +     "text",        CT_TEXT,        InitText,
  33053. +     "video",        CT_VIDEO,        NULL,
  33054. + 
  33055. +     NULL,        CT_EXTENSION,   NULL,    /* these two must be last! */
  33056. +     NULL,        CT_UNKNOWN,        NULL,
  33057. + };
  33058. + 
  33059. + 
  33060. + static int InitBase64 (), InitQuoted (), Init7Bit ();
  33061. + 
  33062. + static struct str2init str2ces[] = {
  33063. +     "base64",        CE_BASE64,    InitBase64,
  33064. +     "quoted-printable", CE_QUOTED,    InitQuoted,
  33065. +     "8bit",        CE_8BIT,    Init7Bit,
  33066. +     "7bit",        CE_7BIT,    Init7Bit,
  33067. +     "binary",        CE_BINARY,    NULL,
  33068. + 
  33069. +     NULL,        CE_EXTENSION,    NULL,    /* these two must be last! */
  33070. +     NULL,        CE_UNKNOWN,    NULL,
  33071. + };
  33072. + 
  33073. + /*   */
  33074. + 
  33075. + static    CT    get_content (in, file, toplevel)
  33076. + FILE   *in;
  33077. + char   *file;
  33078. + int    toplevel;
  33079. + {
  33080. +     int     compnum,
  33081. +         state;
  33082. +     char    buf[BUFSIZ],
  33083. +         name[NAMESZ];
  33084. +     register CT    ct;
  33085. + 
  33086. +     if ((ct = (CT) calloc (1, sizeof *ct)) == NULL)
  33087. +     adios (NULLCP, "out of memory");
  33088. + 
  33089. +     ct -> c_begin = ftell (ct -> c_fp = in) + 1;
  33090. +     ct -> c_file = add (file, NULLCP);
  33091. +     for (compnum = 1, state = FLD;;) {
  33092. +     switch (state = m_getfld (state, name, buf, sizeof buf, in)) {
  33093. +         case FLD:
  33094. +         case FLDPLUS:
  33095. +         case FLDEOF:
  33096. +             compnum++;
  33097. + 
  33098. +         if (uleq (name, VRSN_FIELD)) {
  33099. +             register char  *cp;
  33100. + 
  33101. +             cp = add (buf, NULLCP);
  33102. +             while (state == FLDPLUS) {
  33103. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33104. +             cp = add (buf, cp);
  33105. +             }
  33106. + 
  33107. +             if (ct -> c_vrsn) {
  33108. +             char   *dp = trimcpy (cp);
  33109. + 
  33110. +             advise (NULLCP,
  33111. +                 "message %s has multiple %s: fields (%s)",
  33112. +                 ct -> c_file, VRSN_FIELD, dp);
  33113. +             free (dp);
  33114. +             free (cp);
  33115. +             goto out;
  33116. +             }
  33117. + 
  33118. +             ct -> c_vrsn = cp;
  33119. + #ifdef    whocares
  33120. +             while (isspace (*cp))
  33121. +             cp++;
  33122. +             for (dp = cp; istoken (*dp); dp++)
  33123. +             continue;
  33124. +             c = *dp, *dp = NULL;
  33125. +             if (!uleq (cp, VRSN_VALUE)) {
  33126. +             if (!isspace (c))
  33127. +                 *dp = c;
  33128. +             advise (NULLCP,
  33129. +                 "message %s has unsupported value for %s: field (%s)",
  33130. +                 ct -> c_file, VRSN_FIELD, cp);
  33131. +             goto out;
  33132. +             }
  33133. +             *dp = c;
  33134. + #endif
  33135. +             goto got_header;
  33136. +         }
  33137. + 
  33138. +         if (uleq (name, TYPE_FIELD)) {
  33139. +             register char  *cp;
  33140. +             register struct str2init *s2i;
  33141. +             register CI        ci = &ct -> c_ctinfo;
  33142. + 
  33143. +             cp = add (buf, NULLCP);
  33144. +             while (state == FLDPLUS) {
  33145. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33146. +             cp = add (buf, cp);
  33147. +             }
  33148. + 
  33149. +             if (ct -> c_ctline) {
  33150. +             char   *dp = trimcpy (cp);
  33151. + 
  33152. +             advise (NULLCP,
  33153. +                 "message %s has multiple %s: fields (%s)",
  33154. +                 ct -> c_file, TYPE_FIELD, dp);
  33155. +             free (dp);
  33156. +             free (cp);
  33157. +             goto out;
  33158. +             }
  33159. + 
  33160. +             if (get_ctinfo (cp, ct, 0) == NOTOK)
  33161. +             goto out;
  33162. +             for (s2i = str2cts; s2i -> si_key; s2i++)
  33163. +             if (uleq (ci -> ci_type, s2i -> si_key))
  33164. +                 break;
  33165. +             if (!s2i -> si_key && !uprf (ci -> ci_type, "X-"))
  33166. +             s2i++;
  33167. +             ct -> c_type = s2i -> si_value;
  33168. +             ct -> c_ctinitfnx = s2i -> si_init;
  33169. +             goto got_header;
  33170. +         }
  33171. + 
  33172. +         if (uleq (name, ENCODING_FIELD)) {
  33173. +             register char *cp,
  33174. +                   *dp;
  33175. +             char    c;
  33176. +             register struct str2init *s2i;
  33177. + 
  33178. +             cp = add (buf, NULLCP);
  33179. +             while (state == FLDPLUS) {
  33180. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33181. +             cp = add (buf, cp);
  33182. +             }
  33183. + 
  33184. +             if (ct -> c_celine) {
  33185. +             advise (NULLCP,
  33186. +                 "message %s has multiple %s: fields (%s)",
  33187. +                 ct -> c_file, ENCODING_FIELD,
  33188. +                 dp = trimcpy (cp));
  33189. +             free (dp);
  33190. +             free (cp);
  33191. +             goto out;
  33192. +             }
  33193. + 
  33194. +             ct -> c_celine = cp;
  33195. +             while (isspace (*cp))
  33196. +             cp++;
  33197. +             for (dp = cp; istoken (*dp); dp++)
  33198. +             continue;
  33199. +             c = *dp, *dp = '\0';
  33200. +             for (s2i = str2ces; s2i -> si_key; s2i++)
  33201. +             if (uleq (cp, s2i -> si_key))
  33202. +                 break;
  33203. +             if (!s2i -> si_key && !uprf (cp, "X-"))
  33204. +             s2i++;
  33205. +             *dp = c;
  33206. +             ct -> c_encoding = s2i -> si_value;
  33207. +             if (s2i -> si_init && (*s2i -> si_init) (ct) == NOTOK)
  33208. +             goto out;
  33209. +             goto got_header;
  33210. +         }
  33211. + 
  33212. +         if (uleq (name, ID_FIELD)) {
  33213. +             ct -> c_id = add (buf, ct -> c_id);
  33214. +             while (state == FLDPLUS) {
  33215. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33216. +             ct -> c_id = add (buf, ct -> c_id);
  33217. +             }
  33218. +             goto got_header;
  33219. +         }
  33220. + 
  33221. +         if (uleq (name, DESCR_FIELD)) {
  33222. +             ct -> c_descr = add (buf, ct -> c_descr);
  33223. +             while (state == FLDPLUS) {
  33224. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33225. +             ct -> c_descr = add (buf, ct -> c_descr);
  33226. +             }
  33227. +             goto got_header;
  33228. +         }
  33229. + 
  33230. + #ifdef    notdef
  33231. +         if (uprf (name, XXX_FIELD_PRF))
  33232. +             advise (NULLCP, "unknown field (%s) in message %s",
  33233. +                 name, ct -> c_file);
  33234. +         /* and fall... */
  33235. + #endif
  33236. + 
  33237. +         while (state == FLDPLUS)
  33238. +             state = m_getfld (state, name, buf, sizeof buf, in);
  33239. + got_header: ;
  33240. +         if (state != FLDEOF) {
  33241. +             ct -> c_begin = ftell (in) + 1;
  33242. +             continue;
  33243. +         }
  33244. +         /* else fall... */
  33245. + 
  33246. +         case BODY:
  33247. +         case BODYEOF:
  33248. +         break;
  33249. + 
  33250. +         case FILEEOF:
  33251. +         ct -> c_begin = ftell (in);
  33252. +         break;
  33253. + 
  33254. +         case LENERR:
  33255. +         case FMTERR:
  33256. +         adios (NULLCP, "message format error in component #%d",
  33257. +                compnum);
  33258. + 
  33259. +         default:
  33260. +         adios (NULLCP, "getfld() returned %d", state);
  33261. +     }
  33262. +     break;
  33263. +     }
  33264. + 
  33265. +     if (!ct -> c_ctline) {
  33266. +     if (toplevel < 0) {
  33267. +         if (get_ctinfo ("message/rfc822", ct, 0) == NOTOK)
  33268. +         goto out;
  33269. +         ct -> c_type = CT_MESSAGE;
  33270. +         ct -> c_ctinitfnx = InitMessage;
  33271. +     }
  33272. +     else {
  33273. +         if (get_ctinfo ("text/plain", ct, 0) == NOTOK)
  33274. +         goto out;
  33275. +         ct -> c_type = CT_TEXT;
  33276. +         ct -> c_ctinitfnx = InitText;
  33277. +     }
  33278. +     }
  33279. +     if (!ct -> c_ctlistfnx)
  33280. +     ct -> c_ctlistfnx = list_content;
  33281. +     if (!ct -> c_ctshowfnx)
  33282. +     ct -> c_ctshowfnx = show_content;
  33283. +     if (!ct -> c_ctstorefnx)
  33284. +     ct -> c_ctstorefnx = store_content;
  33285. + 
  33286. +     if (!ct -> c_celine) {
  33287. +     ct -> c_encoding = CE_7BIT;
  33288. +     (void) Init7Bit (ct);
  33289. +     }
  33290. + 
  33291. +     return ct;
  33292. + 
  33293. + out:
  33294. +     free_content (ct);
  33295. +     return NULLCT;
  33296. + }
  33297. + 
  33298. + /*   */
  33299. + 
  33300. + static int  get_ctinfo (cp, ct, magic)
  33301. + char  *cp;
  33302. + register CT    ct;
  33303. + int    magic;
  33304. + {
  33305. +     int        i = strlen (invo_name) + 2;
  33306. +     register char  *dp,
  33307. +           **ap,
  33308. +           **ep;
  33309. +     char    c;
  33310. +     register CI        ci = &ct -> c_ctinfo;
  33311. + 
  33312. +     cp = ct -> c_ctline = add (cp, NULLCP);
  33313. +     while (isspace (*cp))
  33314. +     cp++;
  33315. +     for (dp = index (cp, '\n'); dp; dp = index (dp, '\n'))
  33316. +     *dp++ = ' ';
  33317. +     for (dp = cp + strlen (cp) - 1; dp >= cp; dp--)
  33318. +     if (!isspace (*dp))
  33319. +         break;
  33320. +     *++dp = '\0';
  33321. +     if (debugsw)
  33322. +     fprintf (stderr, "%s: %s\n", TYPE_FIELD, cp);
  33323. + 
  33324. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33325. +     return NOTOK;
  33326. + 
  33327. +     for (dp = cp; istoken (*dp); dp++)
  33328. +     continue;
  33329. +     c = *dp, *dp = '\0';
  33330. +     ci -> ci_type = add (cp, NULLCP);
  33331. +     *dp = c, cp = dp;
  33332. + 
  33333. +     if (!*ci -> ci_type) {
  33334. +     advise (NULLCP, "invalid %s: field in message %s (empty type)", 
  33335. +         TYPE_FIELD, ct -> c_file);
  33336. +     return NOTOK;
  33337. +     }
  33338. + 
  33339. +     for (dp = ci -> ci_type; *dp; dp++)
  33340. +     if (isalpha(*dp) && isupper (*dp))
  33341. +         *dp = tolower (*dp);
  33342. + 
  33343. +     while (isspace (*cp))
  33344. +     cp++;
  33345. + 
  33346. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33347. +     return NOTOK;
  33348. + 
  33349. +     if (*cp != '/') {
  33350. +     if (!magic)
  33351. +         ci -> ci_subtype = add ("", NULLCP);
  33352. +     goto magic_skip;
  33353. +     }
  33354. + 
  33355. +     cp++;
  33356. +     while (isspace (*cp))
  33357. +     cp++;
  33358. + 
  33359. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33360. +     return NOTOK;
  33361. + 
  33362. +     for (dp = cp; istoken (*dp); dp++)
  33363. +     continue;
  33364. +     c = *dp, *dp = '\0';
  33365. +     ci -> ci_subtype = add (cp, NULLCP);
  33366. +     *dp = c, cp = dp;
  33367. + 
  33368. +     if (!*ci -> ci_subtype) {
  33369. +     advise (NULLCP,
  33370. +         "invalid %s: field in message %s (empty subtype for \"%s\")",
  33371. +         TYPE_FIELD, ct -> c_file, ci -> ci_type);
  33372. +     return NOTOK;
  33373. +     }
  33374. + 
  33375. +     for (dp = ci -> ci_subtype; *dp; dp++)
  33376. +     if (isalpha(*dp) && isupper (*dp))
  33377. +         *dp = tolower (*dp);
  33378. + 
  33379. + magic_skip: ;
  33380. +     while (isspace (*cp))
  33381. +     cp++;
  33382. + 
  33383. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33384. +     return NOTOK;
  33385. + 
  33386. +     ep = (ap = ci -> ci_attrs) + NPARMS;
  33387. +     while (*cp == ';') {
  33388. +     char   *vp,
  33389. +            *up;
  33390. + 
  33391. +     if (ap >= ep) {
  33392. +         advise (NULLCP,
  33393. +             "too many parameters in message %s's %s: field (%d max)",
  33394. +             ct -> c_file, TYPE_FIELD, NPARMS);
  33395. +         return NOTOK;
  33396. +     }
  33397. + 
  33398. +     cp++;
  33399. +     while (isspace (*cp))
  33400. +         cp++;
  33401. + 
  33402. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33403. +         return NOTOK;
  33404. + 
  33405. +     if (*cp == 0) {
  33406. +         advise (NULLCP,
  33407. +             "extraneous trailing ';' in message %s's %s: parameter list",
  33408. +             ct -> c_file, TYPE_FIELD);
  33409. +         return OK;
  33410. +     }
  33411. + 
  33412. +     for (dp = cp; istoken (*dp); dp++)
  33413. +         if (isalpha(*dp) && isupper (*dp))
  33414. +         *dp = tolower (*dp);
  33415. +     for (up = dp; isspace (*dp); )
  33416. +         dp++;
  33417. +     if (dp == cp || *dp != '=') {
  33418. +         advise (NULLCP,
  33419. +             "invalid parameter in message %s's %s: field\n%*.*sparameter %s (error detected at offset %d)",
  33420. +             ct -> c_file, TYPE_FIELD, i, i, "", cp, dp - cp);
  33421. +         return NOTOK;
  33422. +     }
  33423. + 
  33424. +     vp = (*ap = add (cp, NULLCP)) + (up - cp);
  33425. +     *vp = '\0';
  33426. +     for (dp++; isspace (*dp); )
  33427. +         dp++;
  33428. +     ci -> ci_values[ap - ci -> ci_attrs] = vp = *ap + (dp - cp);
  33429. +     if (*dp == '"') {
  33430. +         for (cp = ++dp, dp = vp;;) {
  33431. +         switch (c = *cp++) {
  33432. +             case '\0':
  33433. + bad_quote: ;
  33434. +                 advise (NULLCP,
  33435. +                 "invalid quoted-string in message %s's %s: field\n%*.*s(parameter %s)",
  33436. +                 ct -> c_file, TYPE_FIELD, i, i, "", *ap);
  33437. +             return NOTOK;
  33438. + 
  33439. +             case '\\':
  33440. +             *dp++ = c;
  33441. +             if ((c = *cp++) == '\0')
  33442. +                 goto bad_quote;
  33443. +             /* else fall... */
  33444. + 
  33445. +             default:
  33446. +                 *dp++ = c;
  33447. +                 continue;
  33448. + 
  33449. +             case '"':
  33450. +             *dp = '\0';
  33451. +             break;
  33452. +         }
  33453. +         break;
  33454. +         }
  33455. +     }
  33456. +     else {
  33457. +         for (cp = dp, dp = vp; istoken (*cp); cp++, dp++)
  33458. +         continue;
  33459. +         *dp = '\0';
  33460. +     }
  33461. +     if (!*vp) {
  33462. +         advise (NULLCP,
  33463. +             "invalid parameter in message %s's %s: field\n%*.*s(parameter %s)",
  33464. +             ct -> c_file, TYPE_FIELD, i, i, "", *ap);
  33465. +         return NOTOK;
  33466. +     }
  33467. +     ap++;
  33468. + 
  33469. +     while (isspace (*cp))
  33470. +         cp++;
  33471. + 
  33472. +     if (*cp == '(' && get_comment (ct, &cp) == NOTOK)
  33473. +         return NOTOK;
  33474. +     }
  33475. + 
  33476. +     if (magic && *cp == '[') {
  33477. +     ct -> c_descr = ++cp;
  33478. +     for (dp = cp + strlen (cp) - 1; dp >= cp; dp--)
  33479. +         if (*dp == ']')
  33480. +         break;
  33481. +     if (dp < cp) {
  33482. +         advise (NULLCP, "invalid description in message %s", ct -> c_file);
  33483. +         ct -> c_descr = NULL;
  33484. +         return NOTOK;
  33485. +     }
  33486. +     
  33487. +     c = *dp, *dp = '\0';
  33488. +     if (*ct -> c_descr)
  33489. +         ct -> c_descr = concat (ct -> c_descr, "\n", NULLCP);
  33490. +     else
  33491. +         ct -> c_descr = NULL;
  33492. +     *dp++ = c, cp = dp;
  33493. + 
  33494. +     while (isspace (*cp))
  33495. +         cp++;
  33496. +     }
  33497. + 
  33498. +     if (*cp) {
  33499. +     if (magic)
  33500. +         ci -> ci_magic = add (cp, NULLCP);
  33501. +     else
  33502. +         advise (NULLCP,
  33503. +             "extraneous information in message %s's %s: field\n%*.*s(%s)",
  33504. +         ct -> c_file, TYPE_FIELD, i, i, "", cp);
  33505. +     }
  33506. + 
  33507. +     return OK;
  33508. + }
  33509. + 
  33510. + /*   */
  33511. + 
  33512. + static int  get_comment (ct, ap)
  33513. + CT    ct;
  33514. + char  **ap;
  33515. + {
  33516. +     register int    i;
  33517. +     register char  *bp,
  33518. +            *cp;
  33519. +     char    c,
  33520. +         buffer[BUFSIZ],
  33521. +        *dp;
  33522. +     register CI        ci = &ct -> c_ctinfo;
  33523. + 
  33524. +     cp = *ap;
  33525. + 
  33526. +     bp = buffer;
  33527. +     cp++;
  33528. +     for (i = 0;;) {
  33529. +     switch (c = *cp++) {
  33530. +         case '\0':
  33531. + invalid: ;
  33532. +             advise (NULLCP, "invalid comment in message %s's %s: field",
  33533. +             ct -> c_file, TYPE_FIELD);
  33534. +         return NOTOK;
  33535. + 
  33536. +         case '\\':
  33537. +         *bp++ = c;
  33538. +         if ((c = *cp++) == '\0')
  33539. +             goto invalid;
  33540. +         *bp++ = c;
  33541. +         continue;
  33542. + 
  33543. +         case '(':
  33544. +         i++;
  33545. +         /* and fall... */
  33546. +             default:
  33547. +         *bp++ = c;
  33548. +         continue;
  33549. + 
  33550. +         case ')':
  33551. +         if (--i < 0)
  33552. +             break;
  33553. +         *bp++ = c;
  33554. +         continue;
  33555. +     }
  33556. +     break;
  33557. +     }
  33558. +     *bp = '\0';
  33559. + 
  33560. +     if (dp = ci -> ci_comment) {
  33561. +     ci -> ci_comment = concat (dp, " ", buffer, NULLCP);
  33562. +     free (dp);
  33563. +     }
  33564. +     else
  33565. +     ci -> ci_comment = add (buffer, NULLCP);
  33566. + 
  33567. +     while (isspace (*cp))
  33568. +     cp++;
  33569. + 
  33570. +     *ap = cp;
  33571. + 
  33572. +     return OK;
  33573. + }
  33574. + 
  33575. + /*   */
  33576. + 
  33577. + #define    empty(s)    ((s) ? (s) : "")
  33578. + 
  33579. + 
  33580. + static int  list_content (ct, toplevel)
  33581. + register CT    ct;
  33582. + int    toplevel;
  33583. + {
  33584. +     unsigned long size;
  33585. +     register char **ap,
  33586. +           **ep;
  33587. +     char   *cp,
  33588. +         buffer[BUFSIZ];
  33589. +     register CI        ci = &ct -> c_ctinfo;
  33590. + 
  33591. +     printf (toplevel > 0 ? LSTFMT2a : toplevel < 0 ? "part " : "     ",
  33592. +         atoi (r1bindex (empty (ct -> c_file), '/')));
  33593. +     (void) sprintf (buffer, "%s/%s", empty (ci -> ci_type),
  33594. +             empty (ci -> ci_subtype));
  33595. +     printf (LSTFMT2b, empty (ct -> c_partno), buffer);
  33596. + 
  33597. +     size = ct -> c_cesizefnx && sizesw ? (*ct -> c_cesizefnx) (ct)
  33598. +                        : ct -> c_end - ct -> c_begin;
  33599. + 
  33600. +     for (cp = " KMGT"; size > 9999; size >>= 10)
  33601. +     if (!*++cp)
  33602. +         break;
  33603. +     switch (*cp) {
  33604. +         case ' ':
  33605. +         if (size > 0 || ct -> c_encoding != CE_EXTERNAL)
  33606. +         printf (LSTFMT2c1, size);
  33607. +         else
  33608. +         printf (LSTFMT2c4);
  33609. +         break;
  33610. + 
  33611. +     default:
  33612. +         printf (LSTFMT2c2, size, *cp);
  33613. +         break;
  33614. + 
  33615. +     case '\0':
  33616. +         printf (LSTFMT2c3);
  33617. +     }
  33618. + 
  33619. +     if (ct -> c_descr) {
  33620. +     char   *dp;
  33621. + 
  33622. +     dp = trimcpy (cp = add (ct -> c_descr, NULLCP));
  33623. +     free (cp);
  33624. +     printf (LSTFMT2d1, dp);
  33625. +     free (dp);
  33626. +     }
  33627. + 
  33628. +     printf ("\n");
  33629. + 
  33630. +     if (verbosw && ci -> ci_comment) {
  33631. +     char   *dp;
  33632. + 
  33633. +     dp = trimcpy (cp = add (ci -> ci_comment, NULLCP));
  33634. +     free (cp);
  33635. +     (void) sprintf (buffer, "(%s)", dp);
  33636. +     free (dp);
  33637. +     printf (LSTFMT2d2, buffer);
  33638. +     }
  33639. + 
  33640. +     if (!debugsw)
  33641. +     return OK;
  33642. + 
  33643. +     (void) fflush (stdout);
  33644. + 
  33645. +     fprintf (stderr, "  partno \"%s\"\n", empty (ct -> c_partno));
  33646. + 
  33647. +     if (ct -> c_vrsn)
  33648. +     fprintf (stderr, "  %s:%s", VRSN_FIELD, ct -> c_vrsn);
  33649. + 
  33650. +     if (ct -> c_ctline)
  33651. +     fprintf (stderr, "  %s:%s", TYPE_FIELD, ct -> c_ctline);
  33652. +     fprintf (stderr,
  33653. +          "    type \"%s\"  subtype \"%s\"  comment \"%s\"  magic \"%s\"\n",
  33654. +          empty (ci -> ci_type), empty (ci -> ci_subtype),
  33655. +          empty (ci -> ci_comment), empty (ci -> ci_magic));
  33656. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++)
  33657. +     fprintf (stderr, "      parameter %s=\"%s\"\n", *ap, *ep);
  33658. +     fprintf (stderr,
  33659. +          "    type 0x%x subtype 0x%x params 0x%x\n",
  33660. +          ct -> c_type, ct -> c_subtype, ct -> c_ctparams);
  33661. + 
  33662. +     fprintf (stderr, "     showproc \"%s\"\n", empty (ct -> c_showproc));
  33663. +     fprintf (stderr, "     termproc \"%s\"\n", empty (ct -> c_termproc));
  33664. +     fprintf (stderr, "    storeproc \"%s\"\n", empty (ct -> c_storeproc));
  33665. + 
  33666. +     if (ct -> c_celine)
  33667. +     fprintf (stderr, "  %s:%s", ENCODING_FIELD, ct -> c_celine);
  33668. +     fprintf (stderr, "    encoding 0x%x params 0x%x\n",
  33669. +          ct -> c_encoding, ct -> c_ceparams);
  33670. + 
  33671. +     if (ct -> c_id)
  33672. +     fprintf (stderr, "  %s:%s", ID_FIELD, ct -> c_id);
  33673. +     if (ct -> c_descr)
  33674. +     fprintf (stderr, "  %s:%s", DESCR_FIELD, ct -> c_descr);
  33675. + 
  33676. +     fprintf (stderr, "  fp 0x%x file \"%s\" begin %d end %d\n",
  33677. +          ct -> c_fp, empty (ct -> c_file), ct -> c_begin, ct -> c_end);
  33678. + 
  33679. +     if (ct -> c_celistfnx)
  33680. +     (void) (*ct -> c_celistfnx) (ct);
  33681. + 
  33682. +     return OK;
  33683. + }
  33684. + #undef    empty
  33685. + 
  33686. + /*   */
  33687. + 
  33688. + #ifdef VSPRINTF
  33689. + #ifdef __STDC__
  33690. + #include <stdarg.h>
  33691. + #else
  33692. + #include <varargs.h>
  33693. + #endif
  33694. + #endif
  33695. + 
  33696. + #ifdef VSPRINTF
  33697. + #ifdef __STDC__
  33698. + static void content_error (char *what, register CT ct, char *fmt, ...)
  33699. + #else
  33700. + static void  content_error (va_alist)
  33701. + va_dcl
  33702. + #endif
  33703. + #else    /* !VSPRINTF */
  33704. + /* VARARGS3 */
  33705. + static void  content_error (what, ct, fmt, a, b, c, d, e, f)
  33706. + char   *what,
  33707. +        *fmt,
  33708. +        *a,
  33709. +        *b,
  33710. +        *c,
  33711. +        *d,
  33712. +        *e,
  33713. +        *f;
  33714. + register CT    ct;
  33715. + #endif
  33716. + {
  33717. + #ifdef VSPRINTF
  33718. +     va_list arglist;
  33719. + #endif
  33720. + #if defined(VSPRINTF) && !defined(__STDC__)
  33721. +     char *what, *fmt;
  33722. +     register CT ct;
  33723. + #endif
  33724. +     int        i;
  33725. +     register char *bp;
  33726. +     char   buffer[BUFSIZ];
  33727. +     register CI       ci;
  33728. + 
  33729. +     bp = buffer;
  33730. + 
  33731. +     if (userrs && invo_name && *invo_name) {
  33732. +     (void) sprintf (bp, "%s: ", invo_name);
  33733. +     bp += strlen (bp);
  33734. +     }
  33735. + 
  33736. + #ifdef VSPRINTF
  33737. + #ifdef __STDC__
  33738. +     va_start (arglist, fmt);
  33739. + #else
  33740. +     va_start (arglist);
  33741. +     what = va_arg(arglist, char *);
  33742. +     ct   = va_arg(arglist, CT);
  33743. +     fmt  = va_arg(arglist, char *);
  33744. + #endif
  33745. +     (void) vsprintf (bp, fmt, arglist);
  33746. +     bp += strlen (bp);
  33747. + #else
  33748. +     (void) sprintf (bp, fmt, a, b, c, d, e, f);
  33749. +     bp += strlen (bp);
  33750. + #endif
  33751. +     ci = &ct -> c_ctinfo;
  33752. + 
  33753. +     if (what) {
  33754. +     if (*what) {
  33755. +         (void) sprintf (bp, " %s: ", what);
  33756. +         bp += strlen (bp);
  33757. +     }
  33758. + 
  33759. +     if (errno > 0 && errno < sys_nerr)
  33760. +         (void) sprintf (bp, "%s", sys_errlist[errno]);
  33761. +     else
  33762. +         (void) sprintf (bp, "Error %d", errno);
  33763. +     bp += strlen (bp);
  33764. +     }
  33765. + 
  33766. +     i = strlen (invo_name) + 2;
  33767. +     (void) sprintf (bp, "\n%*.*s(content %s/%s", i, i, "", ci -> ci_type,
  33768. +             ci -> ci_subtype);
  33769. +     bp += strlen (bp);
  33770. +     if (ct -> c_file) {
  33771. +     (void) sprintf (bp, " in message %s", ct -> c_file);
  33772. +     bp += strlen (bp);
  33773. +     if (ct -> c_partno) {
  33774. +         (void) sprintf (bp, ", part %s", ct -> c_partno);
  33775. +         bp += strlen (bp);
  33776. +     }
  33777. +     }
  33778. +     (void) sprintf (bp, ")");
  33779. +     bp += strlen (bp);
  33780. + 
  33781. +     if (userrs) {
  33782. +     *bp++ = '\n';
  33783. +     *bp = '\0';
  33784. + 
  33785. +     errs = add (buffer, errs);
  33786. +     }
  33787. +     else
  33788. +     advise (NULLCP, "%s", buffer);
  33789. + }
  33790. + 
  33791. + 
  33792. + static void  flush_errors ()
  33793. + {
  33794. +     if (errs) {
  33795. +     (void) fflush (stdout);
  33796. +     fprintf (stderr, "%s", errs);
  33797. +     free (errs);
  33798. +     errs = NULL;
  33799. +     }
  33800. + }
  33801. + 
  33802. + /*   */
  33803. + 
  33804. + static    jmp_buf    intrenv;
  33805. + 
  33806. + 
  33807. + /* ARGSUSED */
  33808. + 
  33809. + static TYPESIG  intrser (i)
  33810. + int    i;
  33811. + {
  33812. + #ifdef    BSD42
  33813. +     (void) signal (SIGINT, intrser);
  33814. + #endif
  33815. + 
  33816. +     (void) putchar ('\n');
  33817. + 
  33818. +     longjmp (intrenv, DONE);
  33819. + }
  33820. + 
  33821. + /*   */
  33822. + 
  33823. + static int  show_content_aux ();
  33824. + 
  33825. + static int  show_content (ct, serial, alternate)
  33826. + register CT    ct;
  33827. + int    serial,
  33828. +     alternate;
  33829. + {
  33830. +     register char  *cp;
  33831. +     char    buffer[BUFSIZ];
  33832. +     register CI ci = &ct -> c_ctinfo;
  33833. + 
  33834. +     (void) sprintf (buffer, "%s-show-%s/%s", invo_name, ci -> ci_type,
  33835. +             ci -> ci_subtype);
  33836. +     if ((cp = m_find (buffer)) == NULL || *cp == 0) {
  33837. +     (void) sprintf (buffer, "%s-show-%s", invo_name, ci -> ci_type);
  33838. +     if (((cp = m_find (buffer)) == NULL || *cp == 0)
  33839. +             && (cp = ct -> c_showproc) == NULL) {
  33840. +         if (!alternate)
  33841. +         content_error (NULLCP, ct,
  33842. +                    "don't know how to display content");
  33843. + 
  33844. +         return NOTOK;
  33845. +     }
  33846. +     }
  33847. + 
  33848. +     return show_content_aux (ct, serial, alternate, cp, NULLCP);
  33849. + }
  33850. + 
  33851. + 
  33852. + static int  show_content_aux (ct, serial, alternate, cp, cracked)
  33853. + register CT    ct;
  33854. + int    serial,
  33855. +     alternate;
  33856. + register char   *cp;
  33857. + char   *cracked;
  33858. + {
  33859. +     int        child_id,
  33860. +         fd,
  33861. +         i,
  33862. +         xlist,
  33863. +         xpause,
  33864. +         xstdin,
  33865. +         xtty;
  33866. +     register char  *bp;
  33867. +     char   *file,
  33868. +        *vec[4],
  33869. +         buffer[BUFSIZ],
  33870. +         exec[BUFSIZ + sizeof "exec "];
  33871. +     register CI ci = &ct -> c_ctinfo;
  33872. + 
  33873. +     if (!ct -> c_ceopenfnx) {
  33874. +     if (!alternate)
  33875. +         content_error (NULLCP, ct, "don't know how to decode content");
  33876. + 
  33877. +     return NOTOK;
  33878. +     }
  33879. + 
  33880. +     file = NULL;
  33881. +     if ((fd = (*ct -> c_ceopenfnx) (ct, &file)) == NOTOK)
  33882. +     return NOTOK;
  33883. +     if (ct -> c_showproc && strcmp (ct -> c_showproc, "true") == 0)
  33884. +     return (alternate ? DONE : OK);
  33885. +     
  33886. +     xlist = xpause = xstdin = xtty = 0;
  33887. +     if (cracked) {
  33888. +     (void) strcpy (buffer, cp);
  33889. +     goto got_command;
  33890. +     }
  33891. +     buffer[0] = '\0';
  33892. +     for (bp = buffer; *cp; cp++)
  33893. +     if (*cp == '%') {
  33894. +         switch (*++cp) {
  33895. +         case 'a':    /* additional arguments */
  33896. +             {
  33897. +             register char **ap,
  33898. +                       **ep;
  33899. +             char   *s = "";
  33900. + 
  33901. +             for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  33902. +                      *ap;
  33903. +                      ap++, ep++) {
  33904. +                 (void) sprintf (bp, "%s%s=\"%s\"", s, *ap, *ep);
  33905. +                 bp += strlen (bp);
  33906. +                 s = " ";
  33907. +             }
  33908. +             }
  33909. +             break;
  33910. + 
  33911. +         case 'e':    /* exclusive execution */
  33912. +             xtty = 1;
  33913. +             break;
  33914. + 
  33915. +         case 'F':    /* %e, %f, and stdin is terminal not content */
  33916. +             xstdin = xtty = 1;
  33917. +             /* and fall... */
  33918. +             case 'f':    /* filename */
  33919. +             (void) sprintf (bp, "%s", file);
  33920. +             break;
  33921. + 
  33922. +         case 'p':    /* pause prior to displaying content */
  33923. +             xpause = 1;
  33924. +             /* and fall... */
  33925. +         case 'l':    /* display listing prior to displaying
  33926. +                    content */
  33927. +             xlist = 1;
  33928. +             break;
  33929. + 
  33930. +         case 's':    /* subtype */
  33931. +             (void) strcpy (bp, ci -> ci_subtype);
  33932. +             break;
  33933. + 
  33934. +         case '%':
  33935. +             goto raw;
  33936. + 
  33937. +         default:
  33938. +             *bp++ = *--cp;
  33939. +             *bp = '\0';
  33940. +             continue;
  33941. +         }
  33942. +         bp += strlen (bp);
  33943. +     }
  33944. +         else {
  33945. + raw: ;
  33946. +         *bp++ = *cp;
  33947. +         *bp = '\0';
  33948. +     }
  33949. +     if (ct -> c_termproc) {
  33950. +     char    term[BUFSIZ];
  33951. + 
  33952. +     (void) strcpy (term, buffer);
  33953. +     (void) sprintf (buffer, ct -> c_termproc, term);
  33954. +     }
  33955. + got_command: ;
  33956. + 
  33957. +     if (debugsw || cracked) {
  33958. +     (void) fflush (stdout);
  33959. + 
  33960. +     fprintf (stderr, "%s msg %s", cracked ? "storing" : "show",
  33961. +          ct -> c_file);
  33962. +     if (ct -> c_partno)
  33963. +         fprintf (stderr, " part %s", ct -> c_partno);
  33964. +     if (cracked)
  33965. +         fprintf (stderr, " using command (cd %s; %s)\n", cracked, buffer);
  33966. +     else
  33967. +         fprintf (stderr, " using command %s\n", buffer);
  33968. +     }
  33969. + 
  33970. +     if (xtty && xpid) {
  33971. +     (void) pidcheck (pidwait (xpid, NOTOK));
  33972. +     xpid = 0;
  33973. +     }
  33974. + 
  33975. +     if (xlist) {
  33976. +     char    prompt[BUFSIZ];
  33977. + 
  33978. +     if (ct -> c_ctlistfnx) {
  33979. +         (*ct -> c_ctlistfnx) (ct, -1);
  33980. + 
  33981. +         if (xpause && SOprintf ("Press <return> to show content..."))
  33982. +         printf ("Press <return> to show content...");
  33983. +     }
  33984. +     else {
  33985. +         register char *pp;
  33986. + 
  33987. +         pp = prompt;
  33988. +         if (ct -> c_descr) {
  33989. +         (void) sprintf (pp, "%s (", ct -> c_descr);
  33990. +         pp += strlen (pp);
  33991. +         }
  33992. + 
  33993. +         (void) sprintf (pp, "content %s/%s", ci -> ci_type,
  33994. +                 ci -> ci_subtype);
  33995. +         pp += strlen (pp);
  33996. +         if (ct -> c_file) {
  33997. +         (void) sprintf (pp, " in message %s", ct -> c_file);
  33998. +         pp += strlen (pp);
  33999. +         if (ct -> c_partno) {
  34000. +             (void) sprintf (pp, ", part %s", ct -> c_partno);
  34001. +             pp += strlen (pp);
  34002. +         }
  34003. +         }
  34004. + 
  34005. +         if (ct -> c_descr) {
  34006. +         (void) sprintf (pp, ")");
  34007. +         pp += strlen (pp);
  34008. +         }
  34009. + 
  34010. +         if (!xpause)
  34011. +         printf ("%s\n", prompt);
  34012. +         else
  34013. +         if (SOprintf ("Press <return> to show %s...", prompt))
  34014. +             printf ("Press <return> to show %s...", prompt);
  34015. +     }
  34016. + 
  34017. +     if (xpause) {
  34018. +         int        intr;
  34019. +         TYPESIG (*istat) ();
  34020. + 
  34021. +         istat = signal (SIGINT, intrser);
  34022. +         if ((intr = setjmp (intrenv)) == OK) {
  34023. +         (void) fflush (stdout);
  34024. +         prompt[0] = 0;
  34025. +         (void) read (fileno (stdout), prompt, sizeof prompt);
  34026. +         }
  34027. +         (void) signal (SIGINT, istat);
  34028. +         if (intr != OK) {
  34029. +         (void) (*ct -> c_ceclosefnx) (ct);
  34030. +         return (alternate ? DONE : NOTOK);
  34031. +         }
  34032. +     }
  34033. +     }
  34034. + 
  34035. +     (void) sprintf (exec, "exec %s", buffer);
  34036. + 
  34037. +     vec[0] = "/bin/sh";
  34038. +     vec[1] = "-c";
  34039. +     vec[2] = exec;
  34040. +     vec[3] = NULL;
  34041. + 
  34042. +     (void) fflush (stdout);
  34043. + 
  34044. +     for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  34045. +     sleep (5);
  34046. +     switch (child_id) {
  34047. +     case NOTOK:
  34048. +         advise ("fork", "unable to");
  34049. +         (void) (*ct -> c_ceclosefnx) (ct);
  34050. +         return NOTOK;
  34051. + 
  34052. +     case OK:
  34053. +         if (cracked)
  34054. +         (void) chdir (cracked);
  34055. +         if (!xstdin)
  34056. +         (void) dup2 (fd, 0);
  34057. +         (void) close (fd);
  34058. +         (void) execvp ("/bin/sh", vec);
  34059. +         fprintf (stderr, "unable to exec ");
  34060. +         perror ("/bin/sh");
  34061. +         _exit (-1);
  34062. +         /* NOTREACHED */
  34063. + 
  34064. +     default:
  34065. +         if (!serial) {
  34066. +         ct -> c_pid = child_id;
  34067. +         if (xtty)
  34068. +             xpid = child_id;
  34069. +         }
  34070. +         else
  34071. +         (void) pidcheck (pidXwait (child_id, NULLCP));
  34072. + 
  34073. +         (void) (*ct -> c_ceclosefnx) (ct);
  34074. +         return (alternate ? DONE : OK);
  34075. +     }
  34076. + }
  34077. + 
  34078. + /*   */
  34079. + 
  34080. + static int  store_content (ct, append)
  34081. + register CT    ct;
  34082. + char   *append;
  34083. + {
  34084. +     int        appending = append && *append;
  34085. +     long    last,
  34086. +         pos;
  34087. +     register char  *bp,
  34088. +            *cp;
  34089. +     char   *file,
  34090. +         buffer[BUFSIZ];
  34091. +     register CI ci = &ct -> c_ctinfo;
  34092. +     FILE       *fp;
  34093. + 
  34094. +     if (appending) {
  34095. +     (void) strcpy (buffer, append);
  34096. +     goto got_filename;
  34097. +     }
  34098. + 
  34099. +     if ((cp = ct -> c_storeproc) == NULL || *cp == 0) {
  34100. +     (void) sprintf (buffer, "%s-store-%s/%s", invo_name, ci -> ci_type,
  34101. +             ci -> ci_subtype);
  34102. +     if ((cp = m_find (buffer)) == NULL || *cp == 0) {
  34103. +         (void) sprintf (buffer, "%s-store-%s", invo_name, ci -> ci_type);
  34104. +         if ((cp = m_find (buffer)) == NULL || *cp == 0)
  34105. +         cp = ct -> c_type == CT_MESSAGE ? "+" : "%m%P.%s";
  34106. +     }
  34107. +     }
  34108. + 
  34109. +     switch (*cp) {
  34110. +     case '+':
  34111. +     case '@':
  34112. +         {
  34113. +         char   *folder = cp[1] ? path (cp + 1, *cp == '+' ? TFOLDER 
  34114. +                                       : TSUBCWF)
  34115. +                        : m_getfolder ();
  34116. +         struct msgs *mp = NULL;
  34117. +         struct stat st;
  34118. + 
  34119. +         if (stat (bp = m_mailpath (folder), &st) == NOTOK) {
  34120. +             int        answer;
  34121. +             char   *ep;
  34122. + 
  34123. +             if (errno != ENOENT) {
  34124. +             advise (bp, "error on folder");
  34125. +             goto losing_folder;
  34126. +             }
  34127. + 
  34128. +             ep = concat ("Create folder \"", bp, "\"? ", NULLCP);
  34129. +             answer = getanswer (ep);
  34130. +             free (ep);
  34131. + 
  34132. +             if (!answer)
  34133. +             goto losing_folder;
  34134. +             if (!makedir (bp)) {
  34135. +             advise (NULLCP, "unable to create folder %s", bp);
  34136. +             goto losing_folder;
  34137. +             }
  34138. +         }
  34139. + 
  34140. +         if (mp = m_gmsg (folder))
  34141. +             (void) sprintf (buffer, "%s/%d", mp -> foldpath,
  34142. +                    mp -> hghmsg + 1);
  34143. +         else
  34144. +             advise (NULLCP, "unable to read folder %s", folder);
  34145. + losing_folder: ;
  34146. +         if (cp[1])
  34147. +             free (folder);
  34148. +         if (mp)
  34149. +             m_fmsg (mp);
  34150. +         else
  34151. +             return NOTOK;
  34152. +         }
  34153. +         goto got_filename;
  34154. + 
  34155. +     case '/':
  34156. +     case '|':
  34157. +     case '!':
  34158. +         bp = buffer;
  34159. +         buffer[0] = '\0';
  34160. +         break;
  34161. + 
  34162. +     default:
  34163. +         bp = autosw ? cwd : dir;
  34164. +         (void) sprintf (buffer, "%s/", bp[1] ? bp : "");
  34165. +         bp = buffer + strlen (buffer);
  34166. +         break;
  34167. +     }
  34168. +     for (; *cp; cp++)
  34169. +     if (*cp == '%') {
  34170. +         switch (*++cp) {
  34171. +         case 'a':    /* additional arguments */
  34172. +             if (buffer[0] != '|' && buffer[0] != '!') {
  34173. +             *bp++ = *--cp;
  34174. +             *bp = '\0';
  34175. +             continue;
  34176. +             }
  34177. +             else {
  34178. +             register char **ap,
  34179. +                       **ep;
  34180. +             char   *s = "";
  34181. + 
  34182. +             for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  34183. +                      *ap;
  34184. +                      ap++, ep++) {
  34185. +                 (void) sprintf (bp, "%s%s=\"%s\"", s, *ap, *ep);
  34186. +                 bp += strlen (bp);
  34187. +                 s = " ";
  34188. +             }
  34189. +             }
  34190. +             break;
  34191. + 
  34192. +         case 'm':    /* message */
  34193. +             (void) sprintf (bp, "%s", r1bindex (ct -> c_file, '/'));
  34194. +             break;
  34195. + 
  34196. +         case 'P':    /* .part */
  34197. +             if (ct -> c_partno)
  34198. +             (void) sprintf (bp, ".%s", ct -> c_partno);
  34199. +             break;
  34200. + 
  34201. +         case 'p':    /* part */
  34202. +             if (ct -> c_partno)
  34203. +             (void) strcpy (bp, ct -> c_partno);
  34204. +             break;
  34205. + 
  34206. +         case 't':    /* type */
  34207. +             (void) strcpy (bp, ci -> ci_type);
  34208. +             break;
  34209. + 
  34210. +         case 's':    /* subtype */
  34211. +             (void) strcpy (bp, ci -> ci_subtype);
  34212. +             break;
  34213. + 
  34214. +         case '%':
  34215. +             goto raw;
  34216. + 
  34217. +         default:
  34218. +             *bp++ = *--cp;
  34219. +             *bp = '\0';
  34220. +             continue;
  34221. +         }
  34222. +         bp += strlen (bp);
  34223. +     }
  34224. +     else {
  34225. + raw: ;
  34226. +         *bp++ = *cp;
  34227. +         *bp = '\0';
  34228. +     }
  34229. +     if (buffer[0] == '|' || buffer[0] == '!')
  34230. +     return show_content_aux (ct, 1, 0, buffer + 1, autosw ? cwd : dir);
  34231. + got_filename: ;
  34232. + 
  34233. +     ct -> c_storage = add (buffer, NULLCP);
  34234. + /*
  34235. +     if (debugsw) {
  34236. +  */
  34237. +     (void) fflush (stdout);
  34238. + 
  34239. +     fprintf (stderr, "storing message %s", ct -> c_file);
  34240. +     if (ct -> c_partno)
  34241. +         fprintf (stderr, " part %s", ct -> c_partno);
  34242. +     fprintf (stderr, " as file %s\n",
  34243. +          strncmp (ct -> c_storage, cwd, cwdlen)
  34244. +             || ct -> c_storage[cwdlen] != '/'
  34245. +             ? ct -> c_storage
  34246. +             : ct -> c_storage + cwdlen + 1);
  34247. + /*
  34248. +     }
  34249. +  */
  34250. + 
  34251. +     if (ct -> c_encoding != CE_7BIT) {
  34252. +     int    cc,
  34253. +         fd;
  34254. + 
  34255. +     if (!ct -> c_ceopenfnx) {
  34256. +         advise (NULLCP, "don't know how to decode part %s of message %s",
  34257. +             ct -> c_partno, ct -> c_file);
  34258. +         return NOTOK;
  34259. +     }
  34260. + 
  34261. +     file = appending || !strcmp (ct -> c_storage, "-") ? NULLCP
  34262. +                                : ct -> c_storage;
  34263. +     if ((fd = (*ct -> c_ceopenfnx) (ct, &file)) == NOTOK)
  34264. +         return NOTOK;
  34265. +     if (strcmp (file, ct -> c_storage) == 0) {
  34266. +         (void) (*ct -> c_ceclosefnx) (ct);
  34267. +         return OK;
  34268. +     }
  34269. + 
  34270. +     if (!strcmp (ct -> c_storage, "-")) {
  34271. +         int        gd;
  34272. + 
  34273. +         if ((gd = dup (fileno (stdout))) == NOTOK) {
  34274. +         advise ("stdout", "unable to dup");
  34275. + losing: ;
  34276. +         (void) (*ct -> c_ceclosefnx) (ct);
  34277. +         return NOTOK;
  34278. +         }
  34279. +         if ((fp = fdopen (gd, appending ? "a" : "w")) == NULL) {
  34280. +         advise ("stdout", "unable to fdopen (%d, \"%s\") from", gd,
  34281. +             appending ? "a" : "w");
  34282. +         (void) close (gd);
  34283. +         goto losing;
  34284. +         }
  34285. +     }
  34286. +     else
  34287. +         if ((fp = fopen (ct -> c_storage, appending ? "a" : "w"))
  34288. +             == NULL) {
  34289. +         advise (ct -> c_storage, "unable to fopen for %s",
  34290. +             appending ? "appending" : "writing");
  34291. +         goto losing;
  34292. +         }
  34293. + 
  34294. +     if (append && !*append)
  34295. +         (void) copy_some_headers (fp, ct);
  34296. + 
  34297. +     for (;;) {
  34298. +         switch (cc = read (fd, buffer, sizeof buffer)) {
  34299. +         case NOTOK:
  34300. +             advise (file, "error reading content from");
  34301. +             break;
  34302. + 
  34303. +         case OK:
  34304. +             break;
  34305. + 
  34306. +         default:
  34307. +             (void) fwrite (buffer, sizeof *buffer, cc, fp);
  34308. +             continue;
  34309. +         }
  34310. +         break;
  34311. +     }
  34312. + 
  34313. +     (void) (*ct -> c_ceclosefnx) (ct);
  34314. + 
  34315. +     if (cc != NOTOK && fflush (fp))
  34316. +         advise (ct -> c_storage, "error writing to");
  34317. + 
  34318. +     (void) fclose (fp);
  34319. + 
  34320. +     return (cc != NOTOK ? OK : NOTOK);
  34321. +     }
  34322. + 
  34323. +     if (!ct -> c_fp && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  34324. +     advise (ct -> c_file, "unable to open for reading");
  34325. +     return NOTOK;
  34326. +     }
  34327. + 
  34328. +     (void) fseek (ct -> c_fp, pos = ct -> c_begin, 0);
  34329. +     last = ct -> c_end;
  34330. + 
  34331. +     if (!strcmp (ct -> c_storage, "-")) {
  34332. +     int    gd;
  34333. + 
  34334. +     if ((gd = dup (fileno (stdout))) == NOTOK) {
  34335. +         advise ("stdout", "unable to dup");
  34336. +         return NOTOK;
  34337. +     }
  34338. +     if ((fp = fdopen (gd, appending ? "a" : "w")) == NULL) {
  34339. +         advise ("stdout", "unable to fdopen (%d, \"%s\") from", gd,
  34340. +             appending ? "a" : "w");
  34341. +         (void) close (gd);
  34342. +         return NOTOK;
  34343. +     }
  34344. +     }
  34345. +     else
  34346. +     if ((fp = fopen (ct -> c_storage, appending ? "a" : "w")) == NULL) {
  34347. +         advise (ct -> c_storage, "unable to fopen for %s",
  34348. +             appending ? "appending" : "writing");
  34349. +         return NOTOK;
  34350. +     }
  34351. + 
  34352. +     if (append && !*append) {
  34353. +     (void) copy_some_headers (fp, ct);
  34354. +     appending = 1;
  34355. +     }
  34356. +     else
  34357. +     appending = 0;
  34358. + 
  34359. +     while (fgets (buffer, sizeof buffer - 1, ct -> c_fp)) {
  34360. +     if ((pos += strlen (buffer)) > last) {
  34361. +         int        diff = strlen (buffer) - (pos - last);
  34362. + 
  34363. +         if (diff >= 0)
  34364. +         buffer[diff] = '\0';
  34365. +     }
  34366. + 
  34367. +     if (appending)
  34368. +         switch (buffer[0]) {
  34369. +         case ' ':
  34370. +         case '\t':
  34371. +             if (appending < 0)
  34372. +             buffer[0] = 0;
  34373. +             break;
  34374. + 
  34375. +         case '\n':
  34376. +             appending = 0;
  34377. +             break;
  34378. + 
  34379. +         default:
  34380. +             if (!uprf (buffer, XXX_FIELD_PRF)
  34381. +                 && !uprf (buffer, "Message-ID:")) {
  34382. +             appending = -1;
  34383. +             buffer[0] = 0;
  34384. +             break;
  34385. +             }
  34386. +             appending = 1;
  34387. +             break;
  34388. +         }
  34389. + 
  34390. +     (void) fputs (buffer, fp);
  34391. +     if (pos >= last)
  34392. +         break;
  34393. +     }
  34394. + 
  34395. +     if (fflush (fp))
  34396. +     advise (ct -> c_storage, "error writing to");
  34397. + 
  34398. +     (void) fclose (fp);
  34399. + 
  34400. +     (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  34401. + 
  34402. +     return OK;
  34403. + }
  34404. + 
  34405. + 
  34406. + static int  copy_some_headers (out, ct)
  34407. + FILE   *out;
  34408. + register CT    ct;
  34409. + {
  34410. +     int        state;
  34411. +     char    buf[BUFSIZ],
  34412. +         name[NAMESZ];
  34413. +     FILE   *in;
  34414. + 
  34415. +     if ((in = fopen (ct -> c_file, "r")) == NULL) {
  34416. +     advise (ct -> c_file, "unable to open for reading");
  34417. +     return NOTOK;
  34418. +     }
  34419. + 
  34420. +     for (state = FLD;;) {
  34421. +     switch (state = m_getfld (state, name, buf, sizeof buf, in)) {
  34422. +         case FLD:
  34423. +         case FLDPLUS:
  34424. +         case FLDEOF:
  34425. +         if (uprf (name, XXX_FIELD_PRF) || uleq (name, "Message-ID")) {
  34426. +             while (state == FLDPLUS)
  34427. +             state = m_getfld (state, name, buf, sizeof buf, in);
  34428. +             continue;
  34429. +         }
  34430. + 
  34431. +         fprintf (out, "%s:%s", name, buf);
  34432. +         while (state == FLDPLUS) {
  34433. +             state = m_getfld (state, name, buf, sizeof buf, in);
  34434. +             (void) fputs (buf, out);
  34435. +         }
  34436. +         if (state != FLDEOF)
  34437. +             continue;
  34438. +         /* else fall... */
  34439. +        case BODY:
  34440. +        case BODYEOF:
  34441. +        case FILEEOF:
  34442. +         break;
  34443. + 
  34444. +        case LENERR:
  34445. +        case FMTERR:
  34446. +        default:
  34447. +         break;
  34448. +     }
  34449. + 
  34450. +     break;
  34451. +     }
  34452. + 
  34453. +     (void) fclose (in);
  34454. + 
  34455. +     return OK;
  34456. + }
  34457. + 
  34458. + /*   */
  34459. + 
  34460. + static void  free_ctinfo (ct)
  34461. + register CT    ct;
  34462. + {
  34463. +     register char **ap;
  34464. +     register CI    ci = &ct -> c_ctinfo;
  34465. + 
  34466. +     if (ci -> ci_type)
  34467. +     free (ci -> ci_type);
  34468. +     if (ci -> ci_subtype)
  34469. +     free (ci -> ci_subtype);
  34470. +     for (ap = ci -> ci_attrs; *ap; ap++)
  34471. +     free (*ap);
  34472. +     if (ci -> ci_comment)
  34473. +     free (ci -> ci_comment);
  34474. +     if (ci -> ci_magic)
  34475. +     free (ci -> ci_magic);
  34476. + }
  34477. + 
  34478. + 
  34479. + static void  free_content (ct)
  34480. + register CT    ct;
  34481. + {
  34482. +     if (!ct)
  34483. +     return;
  34484. + 
  34485. +     if (ct -> c_partno)
  34486. +     free (ct -> c_partno);
  34487. + 
  34488. +     if (ct -> c_vrsn)
  34489. +     free (ct -> c_vrsn);
  34490. + 
  34491. +     if (ct -> c_ctline)
  34492. +     free (ct -> c_ctline);
  34493. + 
  34494. +     free_ctinfo (ct);
  34495. + 
  34496. +     if (ct -> c_ctfreefnx)
  34497. +     (void) (*ct -> c_ctfreefnx) (ct);
  34498. + 
  34499. +     if (ct -> c_showproc)
  34500. +     free (ct -> c_showproc);
  34501. +     if (ct -> c_termproc)
  34502. +     free (ct -> c_termproc);
  34503. +     if (ct -> c_storeproc)
  34504. +     free (ct -> c_storeproc);
  34505. + 
  34506. +     if (ct -> c_celine)
  34507. +     free (ct -> c_celine);
  34508. +     if (ct -> c_cefreefnx)
  34509. +     (void) (*ct -> c_cefreefnx) (ct, 1);
  34510. + 
  34511. +     if (ct -> c_id)
  34512. +     free (ct -> c_id);
  34513. +     if (ct -> c_descr)
  34514. +     free (ct -> c_descr);
  34515. + 
  34516. +     if (ct -> c_file) {
  34517. +     if (ct -> c_unlink)
  34518. +         (void) unlink (ct -> c_file);
  34519. +     free (ct -> c_file);
  34520. +     }
  34521. +     if (ct -> c_fp)
  34522. +     (void) fclose (ct -> c_fp);
  34523. + 
  34524. +     if (ct -> c_storage)
  34525. +     (void) free (ct -> c_storage);
  34526. + 
  34527. +     free ((char *) ct);
  34528. + }
  34529. + 
  34530. + /*   */
  34531. + 
  34532. + static int  part_ok (ct)
  34533. + register CT    ct;
  34534. + {
  34535. +     register char **ap;
  34536. + 
  34537. +     if (ct -> c_type == CT_MULTIPART || npart == 0)
  34538. +     return 1;
  34539. + 
  34540. +     for (ap = parts; *ap; ap++)
  34541. +     if (strcmp (*ap, ct -> c_partno) == 0)
  34542. +         return 1;
  34543. + 
  34544. +     return 0;
  34545. + }
  34546. + 
  34547. + 
  34548. + 
  34549. + static int  type_ok (ct)
  34550. + register CT    ct;
  34551. + {
  34552. +     register char **ap;
  34553. +     char    buffer[BUFSIZ];
  34554. +     register CI        ci = &ct -> c_ctinfo;
  34555. + 
  34556. +     if (ct -> c_type == CT_MULTIPART || ntype == 0)
  34557. +     return 1;
  34558. + 
  34559. +     (void) sprintf (buffer, "%s/%s", ci -> ci_type, ci -> ci_subtype);
  34560. +     for (ap = types; *ap; ap++)
  34561. +     if (uleq (*ap, ci -> ci_type) || uleq (*ap, buffer))
  34562. +         return 1;
  34563. + 
  34564. +     return 0;
  34565. + }
  34566. + 
  34567. + /*     CONTENTS */
  34568. + 
  34569. + struct k2v {
  34570. +     char   *kv_key;
  34571. +     int        kv_value;
  34572. + };
  34573. + 
  34574. + /*     TEXT */
  34575. + 
  34576. + #define    TEXT_UNKNOWN    0x00
  34577. + #define    TEXT_PLAIN    0x01
  34578. + #define    TEXT_RICHTEXT    0x02
  34579. + 
  34580. + struct text {
  34581. +     int        tx_charset;
  34582. + #define    CHARSET_UNKNOWN    0x00
  34583. + #define    CHARSET_USASCII    0x01
  34584. + #define    CHARSET_LATIN    0x02
  34585. + };
  34586. + 
  34587. + static struct k2v    Charset[] = {
  34588. +     "us-ascii",        CHARSET_USASCII,
  34589. +     "iso-8859-1",   CHARSET_LATIN,
  34590. + 
  34591. +     NULL,        CHARSET_UNKNOWN        /* this one must be last! */
  34592. + };
  34593. + 
  34594. + static int  free_text (ct)
  34595. + register CT    ct;
  34596. + {
  34597. +     register struct text *t = (struct text *) ct -> c_ctparams;
  34598. + 
  34599. +     if (!t)
  34600. +     return;
  34601. + 
  34602. +     free ((char *) t);
  34603. +     ct -> c_ctparams = NULL;
  34604. + }
  34605. + 
  34606. + 
  34607. + static struct k2v    SubText[] = {
  34608. +     "plain",        TEXT_PLAIN,
  34609. +     "richtext",        TEXT_RICHTEXT,
  34610. + 
  34611. +     NULL,        TEXT_UNKNOWN        /* this one must be last! */
  34612. + };
  34613. + 
  34614. + static int  InitText (ct)
  34615. + register CT    ct;
  34616. + {
  34617. +     char   buffer[BUFSIZ];
  34618. +     register char **ap,
  34619. +           **ep;
  34620. +     register struct k2v *kv;
  34621. +     register CI    ci = &ct -> c_ctinfo;
  34622. + 
  34623. +     if (!*ci -> ci_subtype)    /* XXX: attmail bogosity! */
  34624. +     ci -> ci_subtype = add ("plain", ci -> ci_subtype);
  34625. +     for (kv = SubText; kv -> kv_key; kv++)
  34626. +     if (uleq (ci -> ci_subtype, kv -> kv_key))
  34627. +         break;
  34628. +     if ((ct -> c_subtype = kv -> kv_value) == TEXT_PLAIN) {
  34629. +     (void) sprintf (buffer, "%%p%s '%%F'",
  34630. +             progsw ? progsw
  34631. +                    : moreproc && *moreproc ? moreproc : "more");
  34632. +     ct -> c_showproc = add (buffer, NULLCP);
  34633. +     }
  34634. + 
  34635. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++)
  34636. +     if (uleq (*ap, "charset")) {
  34637. +         char   *cp;
  34638. +         register struct text *t;
  34639. + 
  34640. +         if ((t = (struct text *) calloc (1, sizeof *t)) == NULL)
  34641. +         adios (NULLCP, "out of memory");
  34642. +         ct -> c_ctparams = (caddr_t) t;
  34643. +         ct -> c_ctfreefnx = free_text;
  34644. + 
  34645. +         for (kv = Charset; kv -> kv_key; kv++)
  34646. +         if (uleq (*ep, kv -> kv_key)) {
  34647. +             (void) sprintf (buffer, "%s-charset-%s", invo_name,
  34648. +                     kv -> kv_key);
  34649. +             break;
  34650. +         }
  34651. +         t -> tx_charset = kv -> kv_value;
  34652. +         if (!kv -> kv_key)
  34653. +         (void) sprintf (buffer, "%s-charset-%s", invo_name, *ep);
  34654. +         if ((!mm_charset || !uleq (mm_charset, *ep))
  34655. +             && (cp = m_find (buffer)))
  34656. +         ct -> c_termproc = getcpy (cp);
  34657. +         
  34658. +         break;
  34659. +     }
  34660. + 
  34661. +     return OK;
  34662. + }
  34663. + 
  34664. + /*     MULTIPART */
  34665. + 
  34666. + #define    MULTI_UNKNOWN    0x00
  34667. + #define    MULTI_MIXED    0x01
  34668. + #define    MULTI_ALTERNATE    0x02
  34669. + #define    MULTI_DIGEST    0x03
  34670. + #define    MULTI_PARALLEL    0x04
  34671. + 
  34672. + 
  34673. + struct multipart {
  34674. +     char   *mp_start;
  34675. +     char   *mp_stop;
  34676. + 
  34677. +     struct part {
  34678. +     CT  mp_part;
  34679. + 
  34680. +     struct part *mp_next;
  34681. +     }       *mp_parts;
  34682. + };
  34683. + 
  34684. + 
  34685. + static int  list_multi (ct, toplevel)
  34686. + register CT    ct;
  34687. + int    toplevel;
  34688. + {
  34689. +     register struct multipart *m = (struct multipart *) ct -> c_ctparams;
  34690. +     register struct part *part;
  34691. + 
  34692. +     (void) list_content (ct, toplevel);
  34693. + 
  34694. +     for (part = m -> mp_parts; part; part = part -> mp_next) {
  34695. +     register CT  p = part -> mp_part;
  34696. + 
  34697. +     if (part_ok (p) && type_ok (p) && p -> c_ctlistfnx)
  34698. +         (void) (*p -> c_ctlistfnx) (p, 0);
  34699. +     }
  34700. + 
  34701. +     return OK;
  34702. + }
  34703. + 
  34704. + 
  34705. + static int  show_multi (ct, serial, alternate)
  34706. + register CT    ct;
  34707. + int    serial,
  34708. +     alternate;
  34709. + {
  34710. +     int        alternating,
  34711. +         nowalternate,
  34712. +         nowserial,
  34713. +         result;
  34714. +     register struct multipart *m = (struct multipart *) ct -> c_ctparams;
  34715. +     register struct part *part;
  34716. +     register CT  p;
  34717. +     TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  34718. + 
  34719. +     alternating = 0;
  34720. +     nowalternate = alternate;
  34721. +     switch (ct -> c_subtype) {
  34722. +     case MULTI_PARALLEL:
  34723. +         if (!(nowserial = serialsw)) {
  34724. + set_signals: ;
  34725. +         hstat = signal (SIGHUP, SIG_IGN);
  34726. +         istat = signal (SIGINT, SIG_IGN);
  34727. +         qstat = signal (SIGQUIT, SIG_IGN);
  34728. +         tstat = signal (SIGTERM, SIG_IGN);
  34729. +         }
  34730. +         break;
  34731. + 
  34732. +     case MULTI_ALTERNATE:
  34733. +         nowalternate = alternating = 1;
  34734. +         /* and fall... */
  34735. +     default:
  34736. +         if (!(nowserial = serial))
  34737. +         goto set_signals;
  34738. +         break;
  34739. +     }
  34740. + 
  34741. + /* alternate -> we're inside an alternative
  34742. +    alternating -> we are an alternative
  34743. +  */
  34744. + 
  34745. +     result = OK;
  34746. +     for (part = m -> mp_parts; part; part = part -> mp_next) {
  34747. +     p = part -> mp_part;
  34748. + 
  34749. +     if (part_ok (p)
  34750. +             && type_ok (p)
  34751. +             && p -> c_ctshowfnx) {
  34752. +         switch ((*p -> c_ctshowfnx) (p, nowserial, nowalternate)) {
  34753. +         case NOTOK:
  34754. +             if (alternate && !alternating) {
  34755. +             result = NOTOK;
  34756. +             goto out;
  34757. +             }
  34758. +             continue;
  34759. + 
  34760. +         case OK:
  34761. +         case DONE:
  34762. +             if (alternating) {
  34763. +             result = DONE;
  34764. +             break;
  34765. +             }
  34766. +             if (alternate)
  34767. +             alternate = nowalternate = 0;
  34768. +             continue;
  34769. +         }
  34770. +         break;
  34771. +     }
  34772. +     }
  34773. +     if (alternating && !part) {
  34774. +     if (!alternate)
  34775. +         content_error (NULLCP, ct,
  34776. +                "don't know how to display any of the contents");
  34777. + 
  34778. +     result = NOTOK;
  34779. +     goto out;
  34780. +     }
  34781. + 
  34782. +     if (serial && !nowserial) {
  34783. +     int    pid,
  34784. +         kids;
  34785. + #if defined(BSD42) && !defined(WAITINT)
  34786. +     union wait status;
  34787. + #else
  34788. +     int     status;
  34789. + #endif
  34790. + 
  34791. +     kids = 0;
  34792. +     for (part = m -> mp_parts; part; part = part -> mp_next) {
  34793. +         p = part -> mp_part;
  34794. + 
  34795. +         if (p -> c_pid > OK)
  34796. +         if (kill (p -> c_pid, 0) == NOTOK)
  34797. +             p -> c_pid = 0;
  34798. +         else
  34799. +             kids++;
  34800. +     }
  34801. + 
  34802. +     while (kids > 0 && (pid = wait (&status)) != NOTOK) {
  34803. + #if defined(BSD42) && !defined(WAITINT)
  34804. +         (void) pidcheck (status.w_status);
  34805. + #else
  34806. +         (void) pidcheck (status);
  34807. + #endif
  34808. + 
  34809. +         for (part = m -> mp_parts; part; part = part -> mp_next) {
  34810. +         p = part -> mp_part;
  34811. + 
  34812. +         if (xpid == pid)
  34813. +             xpid = 0;
  34814. +         if (p -> c_pid == pid) {
  34815. +             p -> c_pid = 0;
  34816. +             kids--;
  34817. +             break;
  34818. +         }
  34819. +         }
  34820. +     }
  34821. +     }
  34822. + 
  34823. + out: ;
  34824. +     if (!nowserial) {
  34825. +     (void) signal (SIGHUP, hstat);
  34826. +     (void) signal (SIGINT, istat);
  34827. +     (void) signal (SIGQUIT, qstat);
  34828. +     (void) signal (SIGTERM, tstat);
  34829. +     }
  34830. + 
  34831. +     return result;
  34832. + }
  34833. + 
  34834. + 
  34835. + /* ARGSUSED */
  34836. + 
  34837. + static int  store_multi (ct, unused)
  34838. + register CT    ct;
  34839. + char   *unused;
  34840. + {
  34841. +     int        result;
  34842. +     register struct multipart *m = (struct multipart *) ct -> c_ctparams;
  34843. +     register struct part *part;
  34844. + 
  34845. +     result = NOTOK;
  34846. +     for (part = m -> mp_parts; part; part = part -> mp_next) {
  34847. +     register CT  p = part -> mp_part;
  34848. + 
  34849. +     if (part_ok (p)
  34850. +             && type_ok (p)
  34851. +             && p -> c_ctstorefnx
  34852. +             && (result = (*p -> c_ctstorefnx) (p, NULLCP)) == OK
  34853. +             && ct -> c_subtype == MULTI_ALTERNATE)
  34854. +         break;
  34855. +     }
  34856. + 
  34857. +     return result;
  34858. + }
  34859. + 
  34860. + 
  34861. + static int  free_multi (ct)
  34862. + register CT    ct;
  34863. + {
  34864. +     register struct multipart *m = (struct multipart *) ct -> c_ctparams;
  34865. +     register struct part   *part,
  34866. +                *next;
  34867. + 
  34868. +     if (!m)
  34869. +     return;
  34870. + 
  34871. +     if (m -> mp_start)
  34872. +     free (m -> mp_start);
  34873. +     if (m -> mp_stop)
  34874. +     free (m -> mp_stop);
  34875. +     
  34876. +     for (part = m -> mp_parts; part; part = next) {
  34877. +     next = part -> mp_next;
  34878. + 
  34879. +     free_content (part -> mp_part);
  34880. + 
  34881. +     free ((char *) part);
  34882. +     }
  34883. +     m -> mp_parts = NULL;
  34884. + 
  34885. +     free ((char *) m);
  34886. +     ct -> c_ctparams = NULL;
  34887. + }
  34888. + 
  34889. + 
  34890. + static struct k2v SubMultiPart[] = {
  34891. +     "mixed",        MULTI_MIXED,
  34892. +     "alternative",  MULTI_ALTERNATE,
  34893. +     "digest",        MULTI_DIGEST,
  34894. +     "parallel",        MULTI_PARALLEL,
  34895. + 
  34896. +     NULL,        MULTI_UNKNOWN        /* this one must be last! */
  34897. + };
  34898. + 
  34899. + static int  InitMultiPart (ct)
  34900. + register CT    ct;
  34901. + {
  34902. +     int        inout;
  34903. +     long    last,
  34904. +         pos;
  34905. +     register char   *cp,
  34906. +             *dp,
  34907. +            **ap,
  34908. +            **ep;
  34909. +     char   *bp,
  34910. +         buffer[BUFSIZ];
  34911. +     register struct multipart *m;
  34912. +     register struct k2v *kv;
  34913. +     register struct part  *part,
  34914. +              **next;
  34915. +     register CI        ci = &ct -> c_ctinfo;
  34916. +     register CT        p;
  34917. +     FILE   *fp;
  34918. + 
  34919. +     ct -> c_ctshowfnx = NULL;
  34920. +     ct -> c_ctstorefnx = NULL;
  34921. + 
  34922. +     if (ct -> c_encoding != CE_7BIT) {
  34923. +     admonish (NULLCP,
  34924. +           "\"%s/%s\" type in message %s should be encoded in 7bit",
  34925. +           ci -> ci_type, ci -> ci_subtype, ct -> c_file);
  34926. +     return NOTOK;
  34927. +     }
  34928. + 
  34929. +     for (kv = SubMultiPart; kv -> kv_key; kv++)
  34930. +     if (uleq (ci -> ci_subtype, kv -> kv_key))
  34931. +         break;
  34932. +     ct -> c_subtype = kv -> kv_value;
  34933. + 
  34934. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++)
  34935. +     if (uleq (*ap, "boundary")) {
  34936. +         bp = *ep;
  34937. +         break;
  34938. +     }
  34939. +     if (!*ap) {
  34940. +     advise (NULLCP,
  34941. +         "a \"boundary\" parameter is mandatory for \"%s/%s\" type in message %s's %s: field",
  34942. +         ci -> ci_type, ci -> ci_subtype, ct -> c_file, TYPE_FIELD);
  34943. +     return NOTOK;
  34944. +     }
  34945. +     
  34946. +     if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  34947. +     adios (NULLCP, "out of memory");
  34948. +     ct -> c_ctparams = (caddr_t) m;
  34949. +     ct -> c_ctlistfnx = list_multi;
  34950. +     ct -> c_ctshowfnx = show_multi;
  34951. +     ct -> c_ctstorefnx = store_multi;
  34952. +     ct -> c_ctfreefnx = free_multi;
  34953. +     
  34954. +     for (cp = bp; isspace (*cp); cp++)
  34955. +     continue;
  34956. +     if (!*cp) {
  34957. +     advise (NULLCP, "invalid \"boundary\" parameter for \"%s/%s\" type in message %s's %s: field",
  34958. +         ci -> ci_type, ci -> ci_subtype, ct -> c_file, TYPE_FIELD);
  34959. +     return NOTOK;
  34960. +     }
  34961. +     for (cp = bp, dp = cp + strlen (cp) - 1; dp > cp; dp--)
  34962. +     if (!isspace (*dp))
  34963. +         break;
  34964. +     *++dp = '\0';
  34965. +     m -> mp_start = concat (bp, "\n", NULLCP);
  34966. +     m -> mp_stop = concat (bp, "--\n", NULLCP);
  34967. + 
  34968. +     if (!ct -> c_fp && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  34969. +     advise (ct -> c_file, "unable to open for reading");
  34970. +     return NOTOK;
  34971. +     }
  34972. + 
  34973. +     (void) fseek (fp = ct -> c_fp, pos = ct -> c_begin, 0);
  34974. +     last = ct -> c_end;
  34975. + 
  34976. +     next = &m -> mp_parts, part = NULL, inout = 1;
  34977. +     while (fgets (buffer, sizeof buffer - 1, fp)) {
  34978. +     if (pos > last)
  34979. +         break;
  34980. + 
  34981. +     pos += strlen (buffer);
  34982. +     
  34983. +     if (buffer[0] != '-' || buffer[1] != '-')
  34984. +         continue;
  34985. + 
  34986. +     if (inout) {
  34987. +         if (strcmp (buffer + 2, m -> mp_start))
  34988. +         continue;
  34989. + 
  34990. + next_part: ;
  34991. +         if ((part = (struct part *) calloc (1, sizeof *part)) == NULL)
  34992. +         adios (NULLCP, "out of memory");
  34993. +         *next = part, next = &part -> mp_next;
  34994. + 
  34995. +         if ((p = get_content (fp, ct -> c_file,
  34996. +                   rfc934sw && ct -> c_subtype == MULTI_DIGEST
  34997. +                             ? -1 : 0)) == NULLCT) {
  34998. +         (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  34999. +         return NOTOK;
  35000. +         }
  35001. +         p -> c_fp = NULL;
  35002. + 
  35003. +         part -> mp_part = p;
  35004. +         (void) fseek (fp, pos = p -> c_begin, 0);
  35005. +         inout = 0;
  35006. +     }
  35007. +     else
  35008. +         if (strcmp (buffer + 2, m -> mp_start) == 0) {
  35009. +         inout = 1;
  35010. + 
  35011. + end_part: ;
  35012. +         p = part -> mp_part;
  35013. +         p -> c_end = ftell (fp) - (strlen (buffer) + 1);
  35014. +         if (p -> c_end < p -> c_begin)
  35015. +             p -> c_begin = p -> c_end;
  35016. +         if (inout)
  35017. +             goto next_part;
  35018. +         goto last_part;
  35019. +         }
  35020. +         else
  35021. +         if (strcmp (buffer + 2, m -> mp_stop) == 0)
  35022. +             goto end_part;
  35023. +     }
  35024. +     advise (NULLCP, "bogus multipart content in message %s", ct -> c_file);
  35025. +     if (!inout && part) {
  35026. +     p = part -> mp_part;
  35027. +     p -> c_end = ct -> c_end;
  35028. + 
  35029. +     if (p -> c_begin >= p -> c_end) {
  35030. +         for (next = &m -> mp_parts;
  35031. +              *next != part;
  35032. +              next = &((*next) -> mp_next))
  35033. +         continue;
  35034. +         *next = NULL;
  35035. +         free_content (p);
  35036. +         free ((char *) part);
  35037. +     }
  35038. +     }
  35039. + 
  35040. + last_part: ;
  35041. +     if (ct -> c_subtype == MULTI_ALTERNATE && m -> mp_parts -> mp_next) {
  35042. +     register int    i;
  35043. +     register struct part **base,
  35044. +                  **bmp;
  35045. + 
  35046. +     i = 0;
  35047. +     for (part = m -> mp_parts; part; part = part -> mp_next)
  35048. +         i++;
  35049. +     if ((base = (struct part **) calloc ((unsigned) (i + 1), sizeof *base))
  35050. +             == NULL)
  35051. +         adios (NULLCP, "out of memory");
  35052. +     bmp = base;
  35053. +     for (part = m -> mp_parts; part; part = part -> mp_next)
  35054. +         *bmp++ = part;
  35055. +     *bmp = NULL;
  35056. + 
  35057. +     next = &m -> mp_parts;
  35058. +     for (bmp--; bmp >= base; bmp--) {
  35059. +         part = *bmp;
  35060. +         *next = part, next = &part -> mp_next;
  35061. +     }
  35062. +     *next = NULL;
  35063. + 
  35064. +     free ((char *) base);
  35065. +     }
  35066. + 
  35067. +     {
  35068. +     int    partnum;
  35069. +     register char *pp;
  35070. +     char    partnam[BUFSIZ];
  35071. + 
  35072. +     if (ct -> c_partno) {
  35073. +         (void) sprintf (partnam, "%s.", ct -> c_partno);
  35074. +         pp = partnam + strlen (partnam);
  35075. +     }
  35076. +     else
  35077. +         pp = partnam;
  35078. + 
  35079. +     for (part = m -> mp_parts, partnum = 1;
  35080. +              part;
  35081. +              part = part -> mp_next, partnum++) {
  35082. +         p = part -> mp_part;
  35083. + 
  35084. +         (void) sprintf (pp, "%d", partnum);
  35085. +         p -> c_partno = add (partnam, NULLCP);
  35086. + 
  35087. +         if (p -> c_ctinitfnx && (*p -> c_ctinitfnx) (p) == NOTOK) {
  35088. +         (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  35089. +         return NOTOK;
  35090. +         }
  35091. +     }
  35092. +     }
  35093. + 
  35094. +     (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  35095. + 
  35096. +     return OK;
  35097. + }
  35098. + 
  35099. + /*     MESSAGE */
  35100. + 
  35101. + #define    MESSAGE_UNKNOWN     0x00
  35102. + #define    MESSAGE_RFC822     0x01
  35103. + #define    MESSAGE_PARTIAL     0x02
  35104. + #define    MESSAGE_EXTERNAL 0x03
  35105. + 
  35106. + 
  35107. + struct partial {
  35108. +     char   *pm_partid;
  35109. + 
  35110. +     int        pm_partno;
  35111. +     int        pm_maxno;
  35112. + 
  35113. +     int        pm_marked;
  35114. +     int        pm_stored;
  35115. + };
  35116. + 
  35117. + 
  35118. + static int  list_partial (ct, toplevel)
  35119. + register CT    ct;
  35120. + int    toplevel;
  35121. + {
  35122. +     register struct partial *p = (struct partial *) ct -> c_ctparams;
  35123. + 
  35124. +     (void) list_content (ct, toplevel);
  35125. +     if (verbosw) {
  35126. +     printf ("\t     [message %s, part %d", p -> pm_partid, p -> pm_partno);
  35127. +     if (p -> pm_maxno)
  35128. +         printf (" of %d", p -> pm_maxno);
  35129. +     printf ("]\n");
  35130. +     }
  35131. + 
  35132. +     return OK;
  35133. + }
  35134. + 
  35135. + 
  35136. + static int  ct_compar (a, b)
  35137. + CT   *a,
  35138. +      *b;
  35139. + {
  35140. +     register struct  partial *am = (struct partial *) ((*a) -> c_ctparams);
  35141. +     register struct  partial *bm = (struct partial *) ((*b) -> c_ctparams);
  35142. + 
  35143. +     return (am -> pm_marked - bm -> pm_marked);
  35144. + }
  35145. + 
  35146. + 
  35147. + /* ARGSUSED */
  35148. + 
  35149. + static int  store_partial (ct, unused)
  35150. + register CT    ct;
  35151. + char   *unused;
  35152. + {
  35153. +     int        cur,
  35154. +         hi,
  35155. +         i;
  35156. +     register CT        p,
  35157. +            *ctp,
  35158. +            *ctq;
  35159. +     CT       *base;
  35160. +     struct partial *qm = (struct partial *) ct -> c_ctparams;
  35161. + 
  35162. +     if (qm -> pm_stored)
  35163. +     return OK;
  35164. + 
  35165. +     hi = i = 0;
  35166. +     for (ctp = cts; p = *ctp; ctp++)
  35167. +     if (p -> c_type == CT_MESSAGE && p -> c_subtype == ct -> c_subtype) {
  35168. +         register struct partial *pm = (struct partial *) p -> c_ctparams;
  35169. + 
  35170. +         if (!pm -> pm_stored
  35171. +                 && strcmp (qm -> pm_partid, pm -> pm_partid) == 0) {
  35172. +         pm -> pm_marked = pm -> pm_partno;
  35173. +         if (pm -> pm_maxno)
  35174. +             hi = pm -> pm_maxno;
  35175. +         pm -> pm_stored = 1;
  35176. +         i++;
  35177. +         }
  35178. +         else
  35179. +         pm -> pm_marked = 0;
  35180. +     }
  35181. +     if (hi == 0) {
  35182. +     advise (NULLCP, "missing (at least) last part of multipart message");
  35183. +     return NOTOK;
  35184. +     }
  35185. + 
  35186. +     if ((base = (CT *) calloc ((unsigned) (i + 1), sizeof *base)) == NULL)
  35187. +     adios (NULLCP, "out of memory");
  35188. + 
  35189. +     ctq = base;
  35190. +     for (ctp = cts; p = *ctp; ctp++)
  35191. +     if (p -> c_type == CT_MESSAGE && p -> c_subtype == ct -> c_subtype) {
  35192. +         register struct partial *pm = (struct partial *) p -> c_ctparams;
  35193. + 
  35194. +         if (pm -> pm_marked)
  35195. +         *ctq++ = p;
  35196. +     }
  35197. +     *ctq = NULL;
  35198. + 
  35199. +     if (i > 1)
  35200. +     qsort ((char *) base, i, sizeof *base, ct_compar);
  35201. + 
  35202. +     cur = 1;
  35203. +     for (ctq = base; p = *ctq; ctq++) {
  35204. +     register struct partial *pm = (struct partial *) p -> c_ctparams;
  35205. + 
  35206. +     if (pm -> pm_marked != cur) {
  35207. +         if (pm -> pm_marked == cur - 1) {
  35208. +         admonish (NULLCP,
  35209. +               "duplicate part %d of %d part multipart message",
  35210. +               pm -> pm_marked, hi);
  35211. +         continue;
  35212. +         }
  35213. + 
  35214. + missing_part: ;
  35215. +         advise (NULLCP,
  35216. +             "missing %spart %d of %d part multipart message",
  35217. +             cur != hi ? "(at least) " : "", cur, hi);
  35218. +         goto losing;
  35219. +     }
  35220. +         else
  35221. +         cur++;
  35222. +     }
  35223. +     if (hi != --cur) {
  35224. +     cur = hi;
  35225. +     goto missing_part;
  35226. +     }
  35227. + 
  35228. +     ctq = base;
  35229. +     ct = *ctq++;
  35230. +     if (store_content (ct, "") == NOTOK) {
  35231. + losing: ;
  35232. +     free ((char *) base);
  35233. +     return NOTOK;
  35234. +     }
  35235. + 
  35236. +     for (; p = *ctq; ctq++)
  35237. +     if (store_content (p, ct -> c_storage) == NOTOK)
  35238. +         goto losing;
  35239. + 
  35240. +     free ((char *) base);
  35241. +     return OK;
  35242. + }
  35243. + 
  35244. + 
  35245. + static int  free_partial (ct)
  35246. + register CT    ct;
  35247. + {
  35248. +     register struct partial *p = (struct partial *) ct -> c_ctparams;
  35249. + 
  35250. +     if (!p)
  35251. +     return;
  35252. + 
  35253. +     if (p -> pm_partid)
  35254. +     free (p -> pm_partid);
  35255. + 
  35256. +     free ((char *) p);
  35257. +     ct -> c_ctparams = NULL;
  35258. + }
  35259. + 
  35260. + 
  35261. + struct exbody {
  35262. +     CT        eb_parent;
  35263. +     CT        eb_content;
  35264. +     char   *eb_partno;
  35265. + 
  35266. +     char   *eb_access;
  35267. +     int        eb_flags;
  35268. + 
  35269. +     char   *eb_name;
  35270. +     char   *eb_permission;
  35271. + 
  35272. +     char   *eb_site;
  35273. +     char   *eb_dir;
  35274. +     char   *eb_mode;
  35275. + 
  35276. +     char   *eb_server;
  35277. +     char   *eb_body;
  35278. + 
  35279. +     unsigned long
  35280. +         eb_size;
  35281. + };
  35282. + 
  35283. + 
  35284. + static    int    openFile ();
  35285. + static    int    openFTP ();
  35286. + static    int    openMail ();
  35287. + 
  35288. + /* NOTE WELL: si_key MUST NOT have value of NOTOK */
  35289. + 
  35290. + static struct str2init str2methods[] = {
  35291. +     "afs",       1,    openFile,
  35292. +     "anon-ftp",       1,    openFTP,
  35293. +     "ftp",       0,    openFTP,
  35294. +     "local-file",  0,    openFile,
  35295. +     "mail-server", 0,    openMail,
  35296. + 
  35297. +     NULL
  35298. + };
  35299. + 
  35300. + 
  35301. + static int  params_external (ct, composing)
  35302. + register CT    ct;
  35303. + int    composing;
  35304. + {
  35305. +     register char  **ap,
  35306. +            **ep;
  35307. +     register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  35308. +     register CI        ci = &ct -> c_ctinfo;
  35309. + 
  35310. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++) {
  35311. +     if (uleq (*ap, "access-type")) {
  35312. +         register struct str2init *s2i;
  35313. +         register    CT    p = e -> eb_content;
  35314. + 
  35315. +         for (s2i = str2methods; s2i -> si_key; s2i++)
  35316. +         if (uleq (*ep, s2i -> si_key))
  35317. +             break;
  35318. +         if (!s2i -> si_key) {
  35319. +         e -> eb_access = *ep;
  35320. +         e -> eb_flags = NOTOK;
  35321. +         p -> c_encoding = CE_EXTERNAL;
  35322. +         continue;
  35323. +         }
  35324. +         e -> eb_access = s2i -> si_key;
  35325. +         e -> eb_flags = s2i -> si_value;
  35326. +         p -> c_encoding = CE_EXTERNAL;
  35327. +         if (init_encoding (p, s2i -> si_init) == NOTOK)
  35328. +         return NOTOK;
  35329. +         continue;
  35330. +     }
  35331. +     if (uleq (*ap, "name")) {
  35332. +         e -> eb_name = *ep;
  35333. +         continue;
  35334. +     }
  35335. +     if (uleq (*ap, "permission")) {
  35336. +         e -> eb_permission = *ep;
  35337. +         continue;
  35338. +     }
  35339. +     if (uleq (*ap, "site")) {
  35340. +         e -> eb_site = *ep;
  35341. +         continue;
  35342. +     }
  35343. +     if (uleq (*ap, "directory")) {
  35344. +         e -> eb_dir = *ep;
  35345. +         continue;
  35346. +     }
  35347. +     if (uleq (*ap, "mode")) {
  35348. +         e -> eb_mode = *ep;
  35349. +         continue;
  35350. +     }
  35351. +     if (uleq (*ap, "size")) {
  35352. +         (void) sscanf (*ep, "%lu", &e -> eb_size);
  35353. +         continue;
  35354. +     }
  35355. +     if (uleq (*ap, "server")) {
  35356. +         e -> eb_server = *ep;
  35357. +         continue;
  35358. +     }
  35359. +     if (composing && uleq (*ap, "body")) {
  35360. +         e -> eb_body = getcpy (*ep);
  35361. +         continue;
  35362. +     }
  35363. +     }
  35364. + 
  35365. +     if (!e -> eb_access) {
  35366. +     advise (NULLCP,
  35367. +         "invalid parameters for \"%s/%s\" type in message %s's %s field",
  35368. +         ci -> ci_type, ci -> ci_subtype,
  35369. +         ct -> c_file, TYPE_FIELD);
  35370. +     return NOTOK;
  35371. +     }
  35372. + 
  35373. +     return OK;
  35374. + }
  35375. + 
  35376. + static int  list_external (ct, toplevel)
  35377. + register CT    ct;
  35378. + int    toplevel;
  35379. + {
  35380. +     register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  35381. + 
  35382. +     (void) list_content (ct, toplevel);
  35383. +     if (verbosw) {
  35384. +     if (e -> eb_name)
  35385. +         printf ("\t     retrieve %s\n", e -> eb_name);
  35386. +     if (e -> eb_dir)
  35387. +         printf ("\t in directory %s\n", e -> eb_dir);
  35388. +     if (e -> eb_site)
  35389. +         printf ("\t         from %s\n", e -> eb_site);
  35390. +     if (e -> eb_server)
  35391. +         printf ("\t from mailbox %s\n", e -> eb_server);
  35392. +     printf     ("\t        using %s", e -> eb_access);
  35393. +     if (e -> eb_mode)
  35394. +         printf (" (in %s mode)", e -> eb_mode);
  35395. +     if (e -> eb_permission)
  35396. +         printf (" (permission %s)", e -> eb_permission);
  35397. +     if (e -> eb_flags == NOTOK)
  35398. +         printf (" [service unavailable]");
  35399. +     printf ("\n");
  35400. +     }
  35401. +     (void) list_content (e -> eb_content, 0);
  35402. + 
  35403. +     return OK;
  35404. + }
  35405. + 
  35406. + 
  35407. + static int  show_external (ct, serial, alternate)
  35408. + register CT    ct;
  35409. + int    serial,
  35410. +     alternate;
  35411. + {
  35412. +     register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  35413. +     register CT        p = e -> eb_content;
  35414. + 
  35415. +     if (!type_ok (p))
  35416. +     return OK;
  35417. + 
  35418. +     if (p -> c_ctshowfnx)
  35419. +     return (*p -> c_ctshowfnx) (p, serial, alternate);
  35420. + 
  35421. +     content_error (NULLCP, p, "don't know how to display content");
  35422. +     return NOTOK;
  35423. + }
  35424. + 
  35425. + 
  35426. + static int  store_external (ct)
  35427. + register CT    ct;
  35428. + {
  35429. +     int        result = NOTOK;
  35430. +     register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  35431. +     register CT        p = e -> eb_content;
  35432. + 
  35433. +     if (!type_ok (p))
  35434. +     return OK;
  35435. + 
  35436. +     p -> c_partno = ct -> c_partno;
  35437. +     if (p -> c_ctstorefnx)
  35438. +     result = (*p -> c_ctstorefnx) (p, NULLCP);
  35439. +     p -> c_partno = NULL;
  35440. + 
  35441. +     return result;
  35442. + }
  35443. + 
  35444. + 
  35445. + static int  free_external (ct)
  35446. + register CT    ct;
  35447. + {
  35448. +     register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  35449. + 
  35450. +     if (!e)
  35451. +     return;
  35452. + 
  35453. +     free_content (e -> eb_content);
  35454. +     if (e -> eb_body)
  35455. +     free (e -> eb_body);
  35456. + 
  35457. +     free ((char *) e);
  35458. +     ct -> c_ctparams = NULL;
  35459. + }
  35460. + 
  35461. + 
  35462. + static struct k2v SubMessage[] = {
  35463. +     "rfc822",         MESSAGE_RFC822,
  35464. +     "partial",          MESSAGE_PARTIAL,
  35465. +     "external-body", MESSAGE_EXTERNAL,
  35466. + 
  35467. +     NULL,         MESSAGE_UNKNOWN        /* this one must be last! */
  35468. + };
  35469. + 
  35470. + static int  InitMessage (ct)
  35471. + register CT    ct;
  35472. + {
  35473. +     register struct k2v *kv;
  35474. +     register CI        ci = &ct -> c_ctinfo;
  35475. + 
  35476. +     if (ct -> c_encoding != CE_7BIT) {
  35477. +     admonish (NULLCP,
  35478. +           "\"%s/%s\" type in message %s should be encoded in 7bit",
  35479. +           ci -> ci_type, ci -> ci_subtype, ct -> c_file);
  35480. +     return NOTOK;
  35481. +     }
  35482. + 
  35483. +     if (!*ci -> ci_subtype)    /* XXX: attmail bogosity! */
  35484. +     ci -> ci_subtype = add ("rfc822", ci -> ci_subtype);
  35485. +     for (kv = SubMessage; kv -> kv_key; kv++)
  35486. +     if (uleq (ci -> ci_subtype, kv -> kv_key))
  35487. +         break;
  35488. + 
  35489. +     switch (ct -> c_subtype = kv -> kv_value) {
  35490. +     case MESSAGE_RFC822:
  35491. +         ct -> c_showproc = add ("%pshow -file '%F'", NULLCP);
  35492. +         break;
  35493. + 
  35494. +     case MESSAGE_PARTIAL:
  35495. +         {
  35496. +         register char **ap,
  35497. +                   **ep;
  35498. +         register struct partial *p;
  35499. + 
  35500. +         ct -> c_ctshowfnx = NULL;
  35501. +         ct -> c_ctstorefnx = NULL;
  35502. + 
  35503. +         if ((p = (struct partial *) calloc (1, sizeof *p)) == NULL)
  35504. +             adios (NULLCP, "out of memory");
  35505. +         ct -> c_ctparams = (caddr_t) p;
  35506. +         ct -> c_ctfreefnx = free_partial;
  35507. + 
  35508. +         for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  35509. +                  *ap; 
  35510. +                  ap++, ep++) {
  35511. +             if (uleq (*ap, "id")) {
  35512. +             p -> pm_partid = add (*ep, NULLCP);
  35513. + 
  35514. +             continue;
  35515. +             }
  35516. + 
  35517. +             if (uleq (*ap, "number")) {
  35518. +             if (sscanf (*ep, "%d", &p -> pm_partno) != 1
  35519. +                     || p -> pm_partno < 1) {
  35520. + invalid_param: ;
  35521. +                 advise (NULLCP,
  35522. +                     "invalid %s parameter for \"%s/%s\" type in message %s's %s field",
  35523. +                     *ap, ci -> ci_type, ci -> ci_subtype,
  35524. +                     ct -> c_file, TYPE_FIELD);
  35525. +                 return NOTOK;
  35526. +             }
  35527. + 
  35528. +             continue;
  35529. +             }
  35530. + 
  35531. +             if (uleq (*ap, "total")) {
  35532. +             if (sscanf (*ep, "%d", &p -> pm_maxno) != 1
  35533. +                     || p -> pm_maxno < 1)
  35534. +                 goto invalid_param;
  35535. + 
  35536. +             continue;
  35537. +             }
  35538. +         }
  35539. + 
  35540. +         if (!p -> pm_partid
  35541. +                 || !p -> pm_partno
  35542. +                 || (p -> pm_maxno && p -> pm_partno > p -> pm_maxno)) {
  35543. +             advise (NULLCP,
  35544. +                 "invalid parameters for \"%s/%s\" type in message %s's %s field",
  35545. +                 ci -> ci_type, ci -> ci_subtype,
  35546. +                 ct -> c_file, TYPE_FIELD);
  35547. +             return NOTOK;
  35548. +         }
  35549. + 
  35550. +         ct -> c_ctlistfnx = list_partial;
  35551. +         ct -> c_ctstorefnx = store_partial;
  35552. +         }
  35553. +         break;
  35554. + 
  35555. +     case MESSAGE_EXTERNAL:
  35556. +         {
  35557. +         int    exresult;
  35558. +         register struct exbody *e;
  35559. +         CT    p;
  35560. +         FILE   *fp;
  35561. + 
  35562. +         ct -> c_ctshowfnx = NULL;
  35563. +         ct -> c_ctstorefnx = NULL;
  35564. + 
  35565. +         if ((e = (struct exbody *) calloc (1, sizeof *e)) == NULL)
  35566. +             adios (NULLCP, "out of memory");
  35567. +         ct -> c_ctparams = (caddr_t) e;
  35568. +         ct -> c_ctfreefnx = free_external;
  35569. + 
  35570. +         if (!ct -> c_fp
  35571. +                 && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  35572. +             advise (ct -> c_file, "unable to open for reading");
  35573. +             return NOTOK;
  35574. +         }
  35575. + 
  35576. +         (void) fseek (fp = ct -> c_fp, ct -> c_begin, 0);
  35577. + 
  35578. +         if ((p = get_content (fp, ct -> c_file, 0)) == NULLCT) {
  35579. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  35580. +             return NOTOK;
  35581. +         }
  35582. + 
  35583. +         e -> eb_parent = ct;
  35584. +         e -> eb_content = p;
  35585. +         p -> c_ctextern = (caddr_t) e;
  35586. +         if ((exresult = params_external (ct, 0)) != NOTOK
  35587. +                 && p -> c_ceopenfnx == openMail) {
  35588. +             int        cc,
  35589. +                 size;
  35590. +             char   *bp;
  35591. +             
  35592. +             if ((size = ct -> c_end - p -> c_begin) <= 0) {
  35593. +             content_error (NULLCP, ct,
  35594. +                        "empty body for access-type=mail-server");
  35595. +             goto no_body;
  35596. +             }
  35597. +             
  35598. +             if ((e -> eb_body = bp = malloc ((unsigned) size)) == NULL)
  35599. +             adios (NULLCP, "out of memory");
  35600. +             (void) fseek (p -> c_fp, p -> c_begin, 0);
  35601. +             while (size > 0)
  35602. +             switch (cc = fread (bp, sizeof *bp, size, p -> c_fp)) {
  35603. +                 case NOTOK:
  35604. +                     adios ("failed", "fread");
  35605. + 
  35606. +                 case OK:
  35607. +                 adios (NULLCP, "unexpected EOF from fread");
  35608. + 
  35609. +                 default:
  35610. +                 bp += cc, size -= cc;
  35611. +                 break;
  35612. +             }
  35613. +             *bp = 0;
  35614. + no_body: ;
  35615. +         }
  35616. +         p -> c_fp = NULL;
  35617. +         p -> c_end = p -> c_begin;
  35618. + 
  35619. +         (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  35620. + 
  35621. +         ct -> c_ctlistfnx = list_external;
  35622. + 
  35623. +         if (exresult == NOTOK)
  35624. +             return NOTOK;
  35625. +         if (e -> eb_flags == NOTOK)
  35626. +             return OK;
  35627. + 
  35628. +         if (e -> eb_name && autosw) {
  35629. +             char   *cp = e -> eb_name;
  35630. + 
  35631. +             if (*cp != '/'
  35632. +                 && *cp != '.'
  35633. +                 && *cp != '|'
  35634. +                 && *cp != '!'
  35635. +                 && !index (cp, '%')) {
  35636. +             if (!ct -> c_storeproc)
  35637. +                 ct -> c_storeproc = add (cp, NULLCP);
  35638. +             if (!p -> c_storeproc)
  35639. +                 p -> c_storeproc = add (cp, NULLCP);
  35640. +             }
  35641. +         }
  35642. + 
  35643. +         ct -> c_ctshowfnx = show_external;
  35644. +         ct -> c_ctstorefnx = store_external;
  35645. +         switch (p -> c_type) {
  35646. +             case CT_MULTIPART:
  35647. +                 break;
  35648. + 
  35649. +             case CT_MESSAGE:
  35650. +             if (p -> c_subtype != MESSAGE_RFC822)
  35651. +                 break;
  35652. +             /* else fall... */
  35653. +             default:
  35654. +             e -> eb_partno = ct -> c_partno;
  35655. +             if (p -> c_ctinitfnx)
  35656. +                 (void) (*p -> c_ctinitfnx) (p);
  35657. +             break;
  35658. +         }
  35659. +         }
  35660. +         break;
  35661. + 
  35662. +     default:
  35663. +         break;
  35664. +     }
  35665. + 
  35666. +     return OK;
  35667. + }
  35668. + 
  35669. + 
  35670. + /*     APPLICATION */
  35671. + 
  35672. + #define    APPLICATION_UNKNOWN    0x00
  35673. + #define    APPLICATION_OCTETS    0x01
  35674. + #define    APPLICATION_ODA        0x02
  35675. + #define    APPLICATION_POSTSCRIPT    0x03
  35676. + 
  35677. + 
  35678. + static int  list_application (ct, toplevel)
  35679. + register CT    ct;
  35680. + int    toplevel;
  35681. + {
  35682. +     (void) list_content (ct, toplevel);
  35683. +     if (verbosw) {
  35684. +     register char **ap,
  35685. +               **ep;
  35686. +     register CI    ci = &ct -> c_ctinfo;
  35687. + 
  35688. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++)
  35689. +         printf ("\t     %s=\"%s\"\n", *ap, *ep);
  35690. +     }
  35691. + 
  35692. +     return OK;
  35693. + }
  35694. + 
  35695. + 
  35696. + static struct k2v SubApplication[] = {
  35697. +     "octet-stream",      APPLICATION_OCTETS,
  35698. +     "oda",          APPLICATION_ODA,
  35699. +     "postscript",      APPLICATION_POSTSCRIPT,
  35700. +     NULL,              APPLICATION_UNKNOWN    /* this one must be last! */
  35701. + };
  35702. + 
  35703. + static int  InitApplication (ct)
  35704. + register CT    ct;
  35705. + {
  35706. +     register char **ap,
  35707. +           **ep;
  35708. +     register struct k2v *kv;
  35709. +     register CI        ci = &ct -> c_ctinfo;
  35710. + 
  35711. +     ct -> c_ctlistfnx = list_application;
  35712. +     
  35713. +     for (kv = SubApplication; kv -> kv_key; kv++)
  35714. +     if (uleq (ci -> ci_subtype, kv -> kv_key))
  35715. +         break;
  35716. + 
  35717. +     if (autosw && !ct -> c_storeproc)
  35718. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++)
  35719. +         if (uleq (*ap, "name")) {
  35720. +         register char   *cp;
  35721. + 
  35722. +         if (*(cp = *ep) != '/'
  35723. +                 && *cp != '.'
  35724. +                 && *cp != '|'
  35725. +                 && *cp != '!'
  35726. +                 && !index (cp, '%'))
  35727. +             ct -> c_storeproc = add (cp, NULLCP);
  35728. +         break;
  35729. +         }
  35730. + 
  35731. +     if ((ct -> c_subtype = kv -> kv_value) == APPLICATION_OCTETS) {
  35732. +     int    tarP,
  35733. +         zP;
  35734. + 
  35735. +     tarP = zP = 0;
  35736. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++) {
  35737. +         if (uleq (*ap, "type")) {
  35738. +         if (!uleq (*ep, "tar"))
  35739. +             break;
  35740. + 
  35741. +         tarP = 1;
  35742. +         continue;
  35743. +         }
  35744. + 
  35745. +         if (uleq (*ap, "conversions")
  35746. +             && (uleq (*ep, "compress") || uleq (*ep, "x-compress"))) {
  35747. +         zP = 1;
  35748. +         continue;
  35749. +         }
  35750. +     }
  35751. + 
  35752. +     if (tarP) {
  35753. +         ct -> c_showproc = add (zP ? "%euncompress | tar tvf -"
  35754. +                        : "%etar tvf -", NULLCP);
  35755. +         if (!ct -> c_storeproc)
  35756. +         if (autosw) {
  35757. +             ct -> c_storeproc = add (zP ? "| uncompress | tar xvpf -"
  35758. +                             : "| tar xvpf -", NULLCP);
  35759. +             ct -> c_umask = 0022;
  35760. +         }
  35761. +         else
  35762. +             ct -> c_storeproc = add (zP ? "%m%P.tar.Z" : "%m%P.tar",
  35763. +                          NULLCP);
  35764. +     }
  35765. +     }
  35766. + 
  35767. +     return OK;
  35768. + }
  35769. + 
  35770. + /*     ENCODINGS */
  35771. + 
  35772. + struct cefile {
  35773. +     char   *ce_file;
  35774. +     int        ce_unlink;
  35775. + 
  35776. +     FILE   *ce_fp;
  35777. + };
  35778. + 
  35779. + 
  35780. + static int  list_encoding (ct)
  35781. + register CT    ct;
  35782. + {
  35783. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  35784. + 
  35785. +     if (ce)
  35786. +     fprintf (stderr, "  decoded fp 0x%x file \"%s\"\n", ce -> ce_fp,
  35787. +          ce -> ce_file ? ce -> ce_file : "");
  35788. + 
  35789. +     return OK;
  35790. + }
  35791. + 
  35792. + 
  35793. + static int  close_encoding (ct)
  35794. + register CT    ct;
  35795. + {
  35796. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  35797. + 
  35798. +     if (!ce)
  35799. +     return;
  35800. + 
  35801. +     if (ce -> ce_fp) {
  35802. +     (void) fclose (ce -> ce_fp);
  35803. +     ce -> ce_fp = NULL;
  35804. +     }
  35805. + }
  35806. + 
  35807. + 
  35808. + static unsigned long  size_encoding (ct)
  35809. + register CT    ct;
  35810. + {
  35811. +     int        fd;
  35812. +     unsigned long size;
  35813. +     char   *file;
  35814. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  35815. +     struct stat st;
  35816. + 
  35817. +     if (!ce) {
  35818. + estimate: ;
  35819. + 
  35820. +     return (ct -> c_end - ct -> c_begin);
  35821. +     }
  35822. + 
  35823. +     if (ce -> ce_fp && fstat (fileno (ce -> ce_fp), &st) != NOTOK)
  35824. +     return st.st_size;
  35825. + 
  35826. +     if (ce -> ce_file)
  35827. +     return stat (ce -> ce_file, &st) != NOTOK ? st.st_size : 0L;
  35828. + 
  35829. +     if (ct -> c_encoding == CE_EXTERNAL)
  35830. +     goto estimate;
  35831. + 
  35832. +     file = NULL;
  35833. +     if ((fd = (*ct -> c_ceopenfnx) (ct, &file)) == NOTOK)
  35834. +     goto estimate;
  35835. + 
  35836. +     size = fstat (fd, &st) != NOTOK ? st.st_size : 0L;
  35837. + 
  35838. +     (*ct -> c_ceclosefnx) (ct);
  35839. + 
  35840. +     return size;
  35841. + }
  35842. + 
  35843. + 
  35844. + static int  free_encoding (ct, toplevel)
  35845. + register CT    ct;
  35846. + int    toplevel;
  35847. + {
  35848. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  35849. + 
  35850. +     if (!ce)
  35851. +     return;
  35852. + 
  35853. +     if (ce -> ce_fp) {
  35854. +     (void) fclose (ce -> ce_fp);
  35855. +     ce -> ce_fp = NULL;
  35856. +     }
  35857. + 
  35858. +     if (ce -> ce_file) {
  35859. +     if (ce -> ce_unlink)
  35860. +         (void) unlink (ce -> ce_file);
  35861. +     free (ce -> ce_file);
  35862. +     }
  35863. + 
  35864. +     if (toplevel) {
  35865. +     free ((char *) ce);
  35866. +     ct -> c_ceparams = NULL;
  35867. +     }
  35868. +     else
  35869. +     ct -> c_ceopenfnx = NULL;
  35870. + }
  35871. + 
  35872. + 
  35873. + static    init_encoding (ct, openfnx)
  35874. + register CT    ct;
  35875. + int   (*openfnx) ();
  35876. + {
  35877. +     register struct cefile *ce;
  35878. + 
  35879. +     if ((ce = (struct cefile *) calloc (1, sizeof *ce)) == NULL)
  35880. +     adios (NULLCP, "out of memory");
  35881. + 
  35882. +     ct -> c_ceparams = (caddr_t) ce;
  35883. +     ct -> c_ceopenfnx = openfnx;
  35884. +     ct -> c_ceclosefnx = close_encoding;
  35885. +     ct -> c_cesizefnx = size_encoding;
  35886. +     ct -> c_celistfnx = list_encoding;
  35887. +     ct -> c_cefreefnx = free_encoding;
  35888. + 
  35889. +     return OK;
  35890. + }
  35891. + 
  35892. + /*     BASE64 */
  35893. + 
  35894. + static unsigned char b642nib[0x80] = {
  35895. +     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35896. +     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35897. +     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35898. +     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35899. +     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35900. +     0xff, 0xff, 0xff, 0x3e, 0xff, 0xff, 0xff, 0x3f,
  35901. +     0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b,
  35902. +     0x3c, 0x3d, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  35903. +     0xff, 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 
  35904. +     0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e,
  35905. +     0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16,
  35906. +     0x17, 0x18, 0x19, 0xff, 0xff, 0xff, 0xff, 0xff,
  35907. +     0xff, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 
  35908. +     0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28,
  35909. +     0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30,
  35910. +     0x31, 0x32, 0x33, 0xff, 0xff, 0xff, 0xff, 0xff
  35911. + };
  35912. + 
  35913. + 
  35914. + static int  openBase64 (ct, file)
  35915. + register CT    ct;
  35916. + char  **file;
  35917. + {
  35918. +     int        bitno,
  35919. +         cc,
  35920. +         fd,
  35921. +         len,
  35922. +         skip;
  35923. +     unsigned long    bits;
  35924. +     register char  *cp,
  35925. +            *ep;
  35926. +     unsigned char   value,
  35927. +            *b = (unsigned char *) &bits,
  35928. +            *b1 = &b[endian > 0 ? 1 : 2],
  35929. +            *b2 = &b[endian > 0 ? 2 : 1],
  35930. +            *b3 = &b[endian > 0 ? 3 : 0];
  35931. +     char    buffer[BUFSIZ];
  35932. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  35933. + 
  35934. +     if (ce -> ce_fp)
  35935. +     goto ready_to_go;
  35936. +     if (ce -> ce_file) {
  35937. +     if ((ce -> ce_fp = fopen (ce -> ce_file, "r")) == NULL) {
  35938. +         content_error (ce -> ce_file, ct, "unable to fopen for reading");
  35939. +         return NOTOK;
  35940. +     }
  35941. + 
  35942. +     *file = ce -> ce_file;
  35943. +     return fileno (ce -> ce_fp);
  35944. +     }
  35945. + 
  35946. +     ce -> ce_unlink = *file == NULL;
  35947. +     if ((ce -> ce_fp = fopen (ce -> ce_file =
  35948. +                     add (*file ? *file : m_scratch ("", tmp),
  35949. +                      NULLCP),
  35950. +                   "w+")) == NULL) {
  35951. +     content_error (ce -> ce_file, ct,
  35952. +                "unable to fopen for writing and reading");
  35953. +     return NOTOK;
  35954. +     }
  35955. + 
  35956. +     if ((len = ct -> c_end - ct -> c_begin) < 0)
  35957. +     adios (NULLCP, "internal error(1)");
  35958. + 
  35959. +     if (!ct -> c_fp && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  35960. +     content_error (ct -> c_file, ct, "unable to open for reading");
  35961. +     return NOTOK;
  35962. +     }
  35963. +     
  35964. +     (void) lseek (fd = fileno (ct -> c_fp), ct -> c_begin, 0);
  35965. +     bitno = 18, bits = 0L, skip = 0;
  35966. +     while (len > 0)
  35967. +     switch (cc = read (fd, buffer, sizeof buffer - 1)) {
  35968. +         case NOTOK:
  35969. +             content_error (ct -> c_file, ct, "error reading from");
  35970. +             goto clean_up;
  35971. + 
  35972. +         case OK:
  35973. +         content_error (NULLCP, ct, "premature eof");
  35974. +             goto clean_up;
  35975. + 
  35976. +         default:
  35977. +         if (cc > len)
  35978. +             cc = len;
  35979. +         len -= cc;
  35980. + 
  35981. +         for (ep = (cp = buffer) + cc; cp < ep; cp++)
  35982. +             switch (*cp) {
  35983. +             default:
  35984. +                 if (isspace (*cp))
  35985. +                 break;
  35986. +                 if (skip
  35987. +                     || (*cp & 0x80)
  35988. +                     || (value = b642nib[*cp & 0x7f]) > 0x3f) {
  35989. +                 if (debugsw)
  35990. +                     fprintf (stderr,
  35991. +                          "*cp=0x%x pos=%ld skip=%d\n", *cp,
  35992. +                          lseek (fd, 0L, 1) - (ep - cp),
  35993. +                          skip);
  35994. +                 content_error (NULLCP, ct,
  35995. +                       "invalid BASE64 encoding -- continuing");
  35996. +                 continue;
  35997. +                 }
  35998. + 
  35999. +                 bits |= value << bitno;
  36000. + test_end: ;
  36001. +                 if ((bitno -= 6) < 0) {
  36002. +                 (void) putc ((char) *b1, ce -> ce_fp);
  36003. +                 if (skip < 2) {
  36004. +                     (void) putc ((char) *b2, ce -> ce_fp);
  36005. +                     if (skip < 1)
  36006. +                     (void) putc ((char) *b3, ce -> ce_fp);
  36007. +                 }
  36008. + 
  36009. +                 if (ferror (ce -> ce_fp)) {
  36010. +                     content_error (ce -> ce_file, ct,
  36011. +                            "error writing to");
  36012. +                     goto clean_up;
  36013. +                 }
  36014. +                 bitno = 18, bits = 0L, skip = 0;
  36015. +                 }
  36016. +                 break;
  36017. + 
  36018. +             case '=':
  36019. +                 if (++skip > 3)
  36020. +                 goto self_delimiting;
  36021. +                 goto test_end;
  36022. +             }
  36023. +     }
  36024. +     if (bitno != 18) {
  36025. +     if (debugsw)
  36026. +         fprintf (stderr, "premature ending (bitno %d)\n", bitno);
  36027. + 
  36028. +     content_error (NULLCP, ct, "invalid BASE64 encoding");
  36029. +     goto clean_up;
  36030. +     }
  36031. + self_delimiting: ;
  36032. +     (void) fseek (ct -> c_fp, 0L, 0);
  36033. + 
  36034. +     if (fflush (ce -> ce_fp)) {
  36035. +     content_error (ce -> ce_file, ct, "error writing to");
  36036. +     goto clean_up;
  36037. +     }
  36038. + 
  36039. + ready_to_go: ;
  36040. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36041. +     *file = ce -> ce_file;
  36042. +     return fileno (ce -> ce_fp);
  36043. + 
  36044. + clean_up: ;
  36045. +     free_encoding (ct, 0);
  36046. + 
  36047. +     return NOTOK;
  36048. + }
  36049. + 
  36050. + 
  36051. + static int  InitBase64 (ct)
  36052. + register CT    ct;
  36053. + {
  36054. +     return init_encoding (ct, openBase64);
  36055. + }
  36056. + 
  36057. + 
  36058. + static int  set_endian ()
  36059. + {
  36060. +     union {
  36061. +     long    l;
  36062. +     char    c[sizeof (long)];
  36063. +     }    un;
  36064. + 
  36065. +     un.l = 1;
  36066. +     endian = un.c[0] ? -1 : 1;
  36067. +     if (debugsw)
  36068. +     fprintf (stderr, "%s endian architecture\n",
  36069. +          endian > 0 ? "big" : "little");
  36070. + 
  36071. +     mm_charset = getenv ("MM_CHARSET");
  36072. + }
  36073. + 
  36074. + /*     QUOTED */
  36075. + 
  36076. + static char hex2nib[0x80] = {
  36077. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36078. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36079. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36080. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36081. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36082. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36083. +     0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
  36084. +     0x08, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36085. +     0x00, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F, 0x00, 
  36086. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36087. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36088. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36089. +     0x00, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x00, 
  36090. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36091. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  36092. +     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
  36093. + };
  36094. + 
  36095. + 
  36096. + static int  openQuoted (ct, file)
  36097. + register CT    ct;
  36098. + char  **file;
  36099. + {
  36100. +     int        cc,
  36101. +         len,
  36102. +         quoted;
  36103. +     register char  *cp,
  36104. +            *ep;
  36105. +     char    buffer[BUFSIZ];
  36106. +     unsigned char mask;
  36107. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  36108. + 
  36109. +     if (ce -> ce_fp)
  36110. +     goto ready_to_go;
  36111. +     if (ce -> ce_file) {
  36112. +     if ((ce -> ce_fp = fopen (ce -> ce_file, "r")) == NULL) {
  36113. +         content_error (ce -> ce_file, ct, "unable to fopen for reading");
  36114. +         return NOTOK;
  36115. +     }
  36116. + 
  36117. +     *file = ce -> ce_file;
  36118. +     return fileno (ce -> ce_fp);
  36119. +     }
  36120. + 
  36121. +     ce -> ce_unlink = *file == NULL;
  36122. +     if ((ce -> ce_fp = fopen (ce -> ce_file =
  36123. +                     add (*file ? *file : m_scratch ("", tmp),
  36124. +                      NULLCP),
  36125. +                   "w+")) == NULL) {
  36126. +     content_error (ce -> ce_file, ct,
  36127. +                "unable to fopen for writing and reading");
  36128. +     return NOTOK;
  36129. +     }
  36130. + 
  36131. +     if ((len = ct -> c_end - ct -> c_begin) < 0)
  36132. +     adios (NULLCP, "internal error(2)");
  36133. + 
  36134. +     if (!ct -> c_fp && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  36135. +     content_error (ct -> c_file, ct, "unable to open for reading");
  36136. +     return NOTOK;
  36137. +     }
  36138. + 
  36139. +     (void) fseek (ct -> c_fp, ct -> c_begin, 0);
  36140. +     quoted = 0;
  36141. + #ifdef    lint
  36142. +     mask = 0;
  36143. + #endif
  36144. +     while (len > 0) {
  36145. +     char   *dp;
  36146. + 
  36147. +     if (fgets (buffer, sizeof buffer - 1, ct -> c_fp) == NULL) {
  36148. +         content_error (NULLCP, ct, "premature eof");
  36149. +         goto clean_up;
  36150. +     }
  36151. + 
  36152. +     if ((cc = strlen (buffer)) > len)
  36153. +         cc = len;
  36154. +     len -= cc;
  36155. + 
  36156. +     for (ep = (cp = buffer) + cc - 1; cp <= ep; ep--)
  36157. +         if (!isspace (*ep))
  36158. +         break;
  36159. +     *++ep = '\n', ep++;
  36160. + 
  36161. +     for (; cp < ep; cp++) {
  36162. +         if (quoted) {
  36163. +         if (quoted > 1) {
  36164. +             if (!isxdigit (*cp)) {
  36165. + invalid_hex: ;
  36166. +             dp = "expecting hexidecimal-digit";
  36167. +             goto invalid_encoding;
  36168. +             }
  36169. +             mask <<= 4;
  36170. +             mask |= hex2nib[*cp & 0x7f];
  36171. +             (void) putc (mask, ce -> ce_fp);
  36172. +         }
  36173. +         else
  36174. +             switch (*cp) {
  36175. +                 case ':':
  36176. +                 (void) putc (*cp, ce -> ce_fp);
  36177. +                 break;
  36178. + 
  36179. +             default:
  36180. +                 if (!isxdigit (*cp))
  36181. +                 goto invalid_hex;
  36182. +                 mask = hex2nib[*cp & 0x7f];
  36183. +                 quoted = 2;
  36184. +                 continue;
  36185. +             }
  36186. + 
  36187. +         if (ferror (ce -> ce_fp)) {
  36188. +             content_error (ce -> ce_file, ct, "error writing to");
  36189. +             goto clean_up;
  36190. +         }
  36191. +         quoted = 0;
  36192. +         continue;
  36193. +         }
  36194. + 
  36195. +         switch (*cp) {
  36196. +             default:
  36197. +             if (*cp < '!' || *cp > '~') {
  36198. +             int    i;
  36199. +             dp = "expecting character in range [!..~]";
  36200. + 
  36201. + invalid_encoding: ;
  36202. +             i = strlen (invo_name) + 2;
  36203. +             content_error (NULLCP, ct,
  36204. +                        "invalid QUOTED-PRINTABLE encoding -- %s,\n%*.*sbut got char 0x%x",
  36205. +                        dp, i, i, "", *cp);
  36206. +             goto clean_up;
  36207. +             }
  36208. +             /* and fall...*/
  36209. +         case ' ':
  36210. +         case '\t':
  36211. +         case '\n':
  36212. +             (void) putc (*cp, ce -> ce_fp);
  36213. +             if (ferror (ce -> ce_fp)) {
  36214. +             content_error (ce -> ce_file, ct, "error writing to");
  36215. +             goto clean_up;
  36216. +             }
  36217. +             break;
  36218. + 
  36219. +         case '=':
  36220. +             if (*++cp != '\n') {
  36221. +             quoted = 1;
  36222. +             cp--;
  36223. +             }
  36224. +             break;
  36225. +         }
  36226. +     }
  36227. +     }
  36228. +     if (quoted) {
  36229. +     content_error (NULLCP, ct,
  36230. +                "invalid QUOTED-PRINTABLE encoding -- end-of-content while still quoting");
  36231. +     goto clean_up;
  36232. +     }
  36233. +     (void) fseek (ct -> c_fp, 0L, 0);
  36234. + 
  36235. +     if (fflush (ce -> ce_fp)) {
  36236. +     content_error (ce -> ce_file, ct, "error writing to");
  36237. +     goto clean_up;
  36238. +     }
  36239. + 
  36240. + ready_to_go: ;
  36241. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36242. +     *file = ce -> ce_file;
  36243. +     return fileno (ce -> ce_fp);
  36244. + 
  36245. + clean_up: ;
  36246. +     free_encoding (ct, 0);
  36247. + 
  36248. +     return NOTOK;
  36249. + }
  36250. + 
  36251. + 
  36252. + static int  InitQuoted (ct)
  36253. + register CT    ct;
  36254. + {
  36255. +     return init_encoding (ct, openQuoted);
  36256. + }
  36257. + 
  36258. + /*     7BIT */
  36259. + 
  36260. + static int  open7Bit (ct, file)
  36261. + register CT    ct;
  36262. + char  **file;
  36263. + {
  36264. +     int        cc,
  36265. +         fd,
  36266. +         len;
  36267. +     char    buffer[BUFSIZ];
  36268. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  36269. + 
  36270. +     if (ce -> ce_fp)
  36271. +     goto ready_to_go;
  36272. +     if (ce -> ce_file) {
  36273. +     if ((ce -> ce_fp = fopen (ce -> ce_file, "r")) == NULL) {
  36274. +         content_error (ce -> ce_file, ct, "unable to fopen for reading");
  36275. +         return NOTOK;
  36276. +     }
  36277. + 
  36278. +     *file = ce -> ce_file;
  36279. +     return fileno (ce -> ce_fp);
  36280. +     }
  36281. + 
  36282. +     ce -> ce_unlink = *file == NULL;
  36283. +     if ((ce -> ce_fp = fopen (ce -> ce_file =
  36284. +                     add (*file ? *file : m_scratch ("", tmp),
  36285. +                      NULLCP),
  36286. +                   "w+")) == NULL) {
  36287. +     content_error (ce -> ce_file, ct,
  36288. +                "unable to fopen for writing and reading");
  36289. +     return NOTOK;
  36290. +     }
  36291. + 
  36292. +     if ((len = ct -> c_end - ct -> c_begin) < 0)
  36293. +     adios (NULLCP, "internal error(3)");
  36294. + 
  36295. +     if (!ct -> c_fp && (ct -> c_fp = fopen (ct -> c_file, "r")) == NULL) {
  36296. +     content_error (ct -> c_file, ct, "unable to open for reading");
  36297. +     return NOTOK;
  36298. +     }
  36299. + 
  36300. +     (void) lseek (fd = fileno (ct -> c_fp), ct -> c_begin, 0);
  36301. +     while (len > 0)
  36302. +     switch (cc = read (fd, buffer, sizeof buffer - 1)) {
  36303. +         case NOTOK:
  36304. +             content_error (ct -> c_file, ct, "error reading from");
  36305. +             goto clean_up;
  36306. + 
  36307. +         case OK:
  36308. +         content_error (NULLCP, ct, "premature eof");
  36309. +             goto clean_up;
  36310. + 
  36311. +         default:
  36312. +         if (cc > len)
  36313. +             cc = len;
  36314. +         len -= cc;
  36315. + 
  36316. +         (void) fwrite (buffer, sizeof *buffer, cc, ce -> ce_fp);
  36317. +         if (ferror (ce -> ce_fp)) {
  36318. +             content_error (ce -> ce_file, ct, "error writing to");
  36319. +             goto clean_up;
  36320. +         }
  36321. +     }
  36322. +     (void) fseek (ct -> c_fp, 0L, 0);
  36323. + 
  36324. +     if (fflush (ce -> ce_fp)) {
  36325. +     content_error (ce -> ce_file, ct, "error writing to");
  36326. +     goto clean_up;
  36327. +     }
  36328. + 
  36329. + ready_to_go: ;
  36330. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36331. +     *file = ce -> ce_file;
  36332. +     return fileno (ce -> ce_fp);
  36333. + 
  36334. + clean_up: ;
  36335. +     free_encoding (ct, 0);
  36336. + 
  36337. +     return NOTOK;
  36338. + }
  36339. + 
  36340. + 
  36341. + static int  Init7Bit (ct)
  36342. + register CT    ct;
  36343. + {
  36344. +     if (init_encoding (ct, open7Bit) == NOTOK)
  36345. +     return NOTOK;
  36346. +     ct -> c_cesizefnx = NULL;
  36347. + 
  36348. +     return OK;
  36349. + }
  36350. + 
  36351. + /*     External */
  36352. + 
  36353. + static int  openExternal (ct, ce, file, fd)
  36354. + register CT    ct;
  36355. + struct cefile *ce;
  36356. + char  **file;
  36357. + int    *fd;
  36358. + {
  36359. +     char   *id;
  36360. + 
  36361. +     if (ce -> ce_fp) {
  36362. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36363. + 
  36364. + ready_already: ;
  36365. +     *file = ce -> ce_file, *fd = fileno (ce -> ce_fp);
  36366. +     return DONE;
  36367. +     }
  36368. + 
  36369. +     if (ce -> ce_file) {
  36370. +     if ((ce -> ce_fp = fopen (ce -> ce_file, "r")) == NULL) {
  36371. +         content_error (ce -> ce_file, ct, "unable to fopen for reading");
  36372. +         return NOTOK;
  36373. +     }
  36374. + 
  36375. +     goto ready_already;
  36376. +     }
  36377. + 
  36378. +     if (xpid) {
  36379. +     (void) pidcheck (pidwait (xpid, NOTOK));
  36380. +     xpid = 0;
  36381. +     }
  36382. + 
  36383. +     if (cache && (id = ct -> c_id)) {
  36384. +     char    buffer[BUFSIZ];
  36385. + 
  36386. +     (void) sprintf (buffer, "%s/%s", cache, id = trimcpy (id));
  36387. +     free (id);
  36388. + 
  36389. +     id = getcpy (buffer);
  36390. +     if (ce -> ce_fp = fopen (id, "r")) {
  36391. +         struct stat    st;
  36392. + 
  36393. +         (void) fstat (fileno (ce -> ce_fp), &st);
  36394. +         (void) sprintf (buffer,
  36395. +                 "Use cached copy %s of size %lu octets (content %s)? ",
  36396. +                 id, (unsigned long) st.st_size,
  36397. +                 ct -> c_partno);
  36398. +         if (getanswer (buffer)) {
  36399. +         ce -> ce_unlink = 0;
  36400. +         ce -> ce_file = id;
  36401. +         goto ready_already;
  36402. +         }
  36403. + 
  36404. +         (void) fclose (ce -> ce_fp), ce -> ce_fp = NULL;
  36405. +     }
  36406. +     free (id);
  36407. +     }
  36408. + 
  36409. +     return OK;
  36410. + }
  36411. + 
  36412. + /*     File */
  36413. + 
  36414. + static int  openFile (ct, file)
  36415. + register CT    ct;
  36416. + char  **file;
  36417. + {
  36418. +     int        fd;
  36419. +     char   *id;
  36420. +     register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  36421. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  36422. + 
  36423. +     switch (openExternal (e -> eb_parent, ce, file, &fd)) {
  36424. +     case NOTOK:
  36425. +         return NOTOK;
  36426. + 
  36427. +     case OK:
  36428. +         break;
  36429. + 
  36430. +     case DONE:
  36431. +         return fd;
  36432. +     }
  36433. + 
  36434. +     if (!e -> eb_name) {
  36435. +     content_error (NULLCP, ct, "missing name parameter");
  36436. +     return NOTOK;
  36437. +     }
  36438. + 
  36439. +     ce -> ce_unlink = 0;
  36440. +     if ((ce -> ce_fp = fopen (ce -> ce_file = getcpy (e -> eb_name), "r"))
  36441. +         == NULL) {
  36442. +     content_error (ce -> ce_file, ct, "unable to fopen for reading");
  36443. +     return NOTOK;
  36444. +     }
  36445. + 
  36446. +     if (cache
  36447. +         && (id = e -> eb_parent -> c_id)
  36448. +         && (!e -> eb_permission
  36449. +             || !uleq (e -> eb_permission, "read-write"))) {
  36450. +     char    buffer[BUFSIZ];
  36451. + 
  36452. +     (void) sprintf (buffer, "Make cached, publically-accessible copy of %s? ",
  36453. +             e -> eb_name);
  36454. +     if (getanswer (buffer)) {
  36455. +         int        mask;
  36456. +         char    cachefile[BUFSIZ];
  36457. +         FILE   *fp;
  36458. + 
  36459. +         (void) sprintf (cachefile, "%s/%s", cache, id = trimcpy (id));
  36460. +         free (id);
  36461. + 
  36462. +         mask = umask (0022);
  36463. +         if (fp = fopen (cachefile, "w")) {
  36464. +         register FILE   *gp = ce -> ce_fp;
  36465. + 
  36466. +         (void) fseek (gp, 0L, 0);
  36467. + 
  36468. +         while (fgets (buffer, sizeof buffer - 1, gp))
  36469. +             (void) fputs (buffer, fp);
  36470. +         (void) fflush (fp);
  36471. + 
  36472. +         if (ferror (gp)) {
  36473. +             admonish (ce -> ce_file, "error reading");
  36474. +             (void) unlink (cachefile);
  36475. +         }
  36476. + 
  36477. +         if (ferror (fp)) {
  36478. +             admonish (cachefile, "error writing");
  36479. +             (void) unlink (cachefile);
  36480. +         }
  36481. +         (void) fclose (fp);
  36482. +         }
  36483. +         (void) umask (mask);
  36484. +     }
  36485. +     }
  36486. + 
  36487. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36488. +     *file = ce -> ce_file;
  36489. +     return fileno (ce -> ce_fp);
  36490. + }
  36491. + 
  36492. + /*     FTP */
  36493. + 
  36494. + static int  openFTP (ct, file)
  36495. + register CT    ct;
  36496. + char  **file;
  36497. + {
  36498. +     int        caching,
  36499. +         fd;
  36500. +     char   *ftp,
  36501. +            *id,
  36502. +        *user,
  36503. +        *pass,
  36504. +         buffer[BUFSIZ],
  36505. +         cachefile[BUFSIZ];
  36506. +     register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  36507. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  36508. +     static char   *username = NULL;
  36509. +     static char   *password = NULL;
  36510. + 
  36511. +     (void) sprintf (buffer, "%s-access-ftp", invo_name);
  36512. +     if ((ftp = m_find (buffer)) && !*ftp)
  36513. +     ftp = NULLCP;
  36514. + #ifndef    FTP
  36515. +     if (!ftp)
  36516. +     return NOTOK;
  36517. + #endif
  36518. +     switch (openExternal (e -> eb_parent, ce, file, &fd)) {
  36519. +     case NOTOK:
  36520. +         return NOTOK;
  36521. + 
  36522. +     case OK:
  36523. +         break;
  36524. + 
  36525. +     case DONE:
  36526. +         return fd;
  36527. +     }
  36528. + 
  36529. +     if (!e -> eb_name || !e -> eb_site) {
  36530. +     content_error (NULLCP, ct, "missing %s parameter",
  36531. +                e -> eb_name ? "site": "name");
  36532. +     return NOTOK;
  36533. +     }
  36534. + 
  36535. +     (void) sprintf (buffer,
  36536. +             e -> eb_size > 0
  36537. +             ? "Retrieve %s (content %s)\n    using %sFTP from site %s (%lu octets)? "
  36538. +             : "Retrieve %s (content %s)\n    using %sFTP from site %s? ",
  36539. +             e -> eb_name, e -> eb_partno,
  36540. +             e -> eb_flags ? "anonymous " : "",
  36541. +             e -> eb_site, e -> eb_size);
  36542. +     if (!getanswer (buffer))
  36543. +     return NOTOK;
  36544. + 
  36545. +     if (e -> eb_flags) {
  36546. +     user = "anonymous";
  36547. +     (void) sprintf (pass = buffer, "%s@%s", getusr (), LocalName ());
  36548. +     }
  36549. +     else {
  36550. +     ruserpass (e -> eb_site, &username, &password);
  36551. +     user = username, pass = password;
  36552. +     }
  36553. + 
  36554. +     ce -> ce_unlink = *file == NULL, caching = 0, cachefile[0] = 0;
  36555. +     if (cache
  36556. +         && (id = e -> eb_parent -> c_id)
  36557. +         && (!e -> eb_permission
  36558. +             || !uleq (e -> eb_permission, "read-write"))) {
  36559. +     (void) sprintf (buffer, "Make cached, publically-accessible copy? ");
  36560. +     if (getanswer (buffer)) {
  36561. +         (void) sprintf (cachefile, "%s/%s", cache, id = trimcpy (id));
  36562. +         free (id);
  36563. + 
  36564. +         if (*file == NULL) {
  36565. +         ce -> ce_unlink = 0;
  36566. +         caching = 1;
  36567. +         }
  36568. +     }
  36569. +     }
  36570. + 
  36571. +     if ((ce -> ce_fp = fopen (ce -> ce_file =
  36572. +                     add (*file ? *file
  36573. +                            : caching ? cachefile
  36574. +                            : m_scratch ("", tmp),
  36575. +                      NULLCP),
  36576. +                   "w+")) == NULL) {
  36577. +     content_error (ce -> ce_file, ct,
  36578. +                "unable to fopen for writing and reading");
  36579. +     return NOTOK;
  36580. +     }
  36581. + 
  36582. + 
  36583. + #ifdef    FTP
  36584. +     if (ftp)
  36585. + #endif
  36586. +     {
  36587. +     int    child_id,
  36588. +         i,
  36589. +         vecp;
  36590. +     char   *vec[9];
  36591. + 
  36592. +     vecp = 0;
  36593. +     vec[vecp++] = r1bindex (ftp, '/');
  36594. +     vec[vecp++] = e -> eb_site;
  36595. +     vec[vecp++] = user;
  36596. +     vec[vecp++] = pass;
  36597. +     vec[vecp++] = e -> eb_dir;
  36598. +     vec[vecp++] = e -> eb_name;
  36599. +     vec[vecp++] = ce -> ce_file,
  36600. +     vec[vecp++] = e -> eb_mode && uleq (e -> eb_mode, "ascii")
  36601. +                 ? "ascii" : "binary";
  36602. +     vec[vecp] = NULL;
  36603. + 
  36604. +     (void) fflush (stdout);
  36605. + 
  36606. +     for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  36607. +         sleep (5);
  36608. +     switch (child_id) {
  36609. +         case NOTOK:
  36610. +             adios ("fork", "unable to");
  36611. +         /* NOTREACHED */
  36612. + 
  36613. +         case OK:
  36614. +         (void) close (fileno (ce -> ce_fp));
  36615. +         (void) execvp (ftp, vec);
  36616. +         fprintf (stderr, "unable to exec ");
  36617. +         perror (ftp);
  36618. +         _exit (-1);
  36619. +         /* NOTREACHED */
  36620. + 
  36621. +         default:
  36622. +         if (pidXwait (child_id, NULLCP)) {
  36623. + #ifdef    FTP
  36624. + losing_ftp: ;
  36625. + #endif
  36626. +             username = password = NULL;
  36627. +             ce -> ce_unlink = 1;
  36628. +             return NOTOK;
  36629. +         }
  36630. +         break;
  36631. +     }
  36632. +     }
  36633. + #ifdef    FTP
  36634. +     else
  36635. +     if (ftp_get (e -> eb_site, user, pass, e -> eb_dir, e -> eb_name,
  36636. +              ce -> ce_file,
  36637. +              e -> eb_mode && uleq (e -> eb_mode, "ascii"), 0)
  36638. +             == NOTOK)
  36639. +         goto losing_ftp;
  36640. + #endif
  36641. + 
  36642. +     if (cachefile[0])
  36643. +     if (caching)
  36644. +         (void) chmod (cachefile, 0644);
  36645. +     else {
  36646. +         int        mask;
  36647. +         register FILE   *fp;
  36648. + 
  36649. +         mask = umask (0022);
  36650. +         if (fp = fopen (cachefile, "w")) {
  36651. +         register FILE   *gp = ce -> ce_fp;
  36652. + 
  36653. +         (void) fseek (gp, 0L, 0);
  36654. + 
  36655. +         while (fgets (buffer, sizeof buffer - 1, gp))
  36656. +             (void) fputs (buffer, fp);
  36657. +         (void) fflush (fp);
  36658. + 
  36659. +         if (ferror (gp)) {
  36660. +             admonish (ce -> ce_file, "error reading");
  36661. +             (void) unlink (cachefile);
  36662. +         }
  36663. + 
  36664. +         if (ferror (fp)) {
  36665. +             admonish (cachefile, "error writing");
  36666. +             (void) unlink (cachefile);
  36667. +         }
  36668. +         (void) fclose (fp);
  36669. +         }
  36670. +         (void) umask (mask);
  36671. +     }
  36672. + 
  36673. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36674. +     *file = ce -> ce_file;
  36675. +     return fileno (ce -> ce_fp);
  36676. + }
  36677. + 
  36678. + /*     Mail */
  36679. + 
  36680. + static int  openMail (ct, file)
  36681. + register CT    ct;
  36682. + char  **file;
  36683. + {
  36684. +     int        child_id,
  36685. +         fd,
  36686. +         i,
  36687. +         result,
  36688. +         vecp;
  36689. +     char   *bp,
  36690. +        *id,
  36691. +         buffer[BUFSIZ],
  36692. +        *vec[7];
  36693. +     register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  36694. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  36695. + 
  36696. +     switch (openExternal (e -> eb_parent, ce, file, &fd)) {
  36697. +     case NOTOK:
  36698. +         return NOTOK;
  36699. + 
  36700. +     case OK:
  36701. +         break;
  36702. + 
  36703. +     case DONE:
  36704. +         return fd;
  36705. +     }
  36706. + 
  36707. +     if (!e -> eb_server) {
  36708. +     content_error (NULLCP, ct, "missing server parameter");
  36709. +     return NOTOK;
  36710. +     }
  36711. + 
  36712. +     bp = concat ("Retrieve content ", e -> eb_partno, " by asking mailbox ",
  36713. +          e -> eb_server, "\n\n", e -> eb_body, "\n? ", NULLCP);
  36714. +     result = getanswer (bp);
  36715. +     free (bp);
  36716. + 
  36717. +     if (!result)
  36718. +     return NOTOK;
  36719. + 
  36720. +     vecp = 0;
  36721. +     vec[vecp++] = r1bindex (mailproc, '/');
  36722. +     vec[vecp++] = e -> eb_server;
  36723. +     vec[vecp++] = "-subject";
  36724. +     if (cache
  36725. +         && (id = e -> eb_parent -> c_id)
  36726. +         && (!e -> eb_permission
  36727. +             || !uleq (e -> eb_permission, "read-write"))) {
  36728. +     (void) sprintf (buffer, "cache content as %s/%s", cache,
  36729. +             id = trimcpy (id));
  36730. +     free (id);
  36731. + 
  36732. +     vec[vecp++] = buffer;
  36733. +     }
  36734. +     else
  36735. +     vec[vecp++] = "mail-server request";
  36736. +     vec[vecp++] = "-body";
  36737. +     vec[vecp++] = e -> eb_body;
  36738. +     vec[vecp] = NULL;
  36739. + 
  36740. +     for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  36741. +     sleep (5);
  36742. +     switch (child_id) {
  36743. +     case NOTOK:
  36744. +         advise ("fork", "unable to");
  36745. +         return NOTOK;
  36746. + 
  36747. +     case OK:
  36748. +         (void) execvp (mailproc, vec);
  36749. +         fprintf (stderr, "unable to exec ");
  36750. +         perror (mailproc);
  36751. +         _exit (-1);
  36752. +         /* NOTREACHED */
  36753. + 
  36754. +     default:
  36755. +         if (pidXwait (child_id, NULLCP) == OK)
  36756. +         advise (NULLCP, "request sent");
  36757. +         break;
  36758. +     }
  36759. + 
  36760. +     ce -> ce_unlink = *file == NULL;
  36761. +     if ((ce -> ce_fp = fopen (ce -> ce_file =
  36762. +                     add (*file ? *file : m_scratch ("", tmp),
  36763. +                      NULLCP),
  36764. +                   "w+")) == NULL) {
  36765. +     content_error (ce -> ce_file, ct,
  36766. +                "unable to fopen for writing and reading");
  36767. +     return NOTOK;
  36768. +     }
  36769. +     if (ct -> c_showproc)
  36770. +     free (ct -> c_showproc);
  36771. +     ct -> c_showproc = add ("true", NULLCP);
  36772. + 
  36773. +     (void) fseek (ce -> ce_fp, 0L, 0);
  36774. +     *file = ce -> ce_file;
  36775. +     return fileno (ce -> ce_fp);
  36776. + }
  36777. + 
  36778. + /*     COMPOSITION */
  36779. + 
  36780. + static    char    prefix[] = "----- =_aaaaaaaaaa";
  36781. + 
  36782. + static    char   *free_file = NULL;
  36783. + static    CT    free_ct = NULL;
  36784. + 
  36785. + 
  36786. + static void  build_comp (file)
  36787. + char   *file;
  36788. + {
  36789. +     int        compnum,
  36790. +         state;
  36791. +     char   *cp,
  36792. +         buf[BUFSIZ],
  36793. +         name[NAMESZ],
  36794. +         tmpfil[BUFSIZ];
  36795. +     struct multipart *m;
  36796. +     register struct part **pp;
  36797. +     CT        ct;
  36798. +     FILE   *in,
  36799. +        *out;
  36800. + 
  36801. +     if ((in = fopen (file, "r")) == NULL)
  36802. +     adios (file, "unable to open for reading");
  36803. + 
  36804. +     (void) umask (~m_gmprot ());
  36805. + 
  36806. +     (void) strcpy (tmpfil, m_scratch (file, invo_name));
  36807. +     if ((out = fopen (tmpfil, "w")) == NULL)
  36808. +     adios (tmpfil, "unable to open for writing");
  36809. +     free_file = tmpfil;
  36810. + 
  36811. +     for (compnum = 1, state = FLD;;) {
  36812. +     switch (state = m_getfld (state, name, buf, sizeof buf, in)) {
  36813. +         case FLD:
  36814. +         case FLDPLUS:
  36815. +         case FLDEOF:
  36816. +         compnum++;
  36817. + 
  36818. +         if (uleq (name, VRSN_FIELD))
  36819. +             adios (NULLCP, "draft shouldn't contain %s: field",
  36820. +                VRSN_FIELD);
  36821. + 
  36822. +         if (uleq (name, TYPE_FIELD)) {
  36823. +             while (state == FLDPLUS)
  36824. +             state = m_getfld (state, name, buf, sizeof buf, in);
  36825. +             goto finish_field;
  36826. +         }
  36827. + 
  36828. +         if (uleq (name, ENCODING_FIELD))
  36829. +             adios (NULLCP, "draft shouldn't contain %s: field",
  36830. +                ENCODING_FIELD);
  36831. + 
  36832. +         fprintf (out, "%s:%s", name, buf);
  36833. +         while (state == FLDPLUS) {
  36834. +             state = m_getfld (state, name, buf, sizeof buf, in);
  36835. +             (void) fputs (buf, out);
  36836. +         }
  36837. + finish_field: ;
  36838. +         if (state != FLDEOF)
  36839. +             continue;
  36840. +         /* else fall... */
  36841. + 
  36842. +         case FILEEOF:
  36843. +         adios (NULLCP, "draft has empty body -- no directives!");
  36844. +         /* NOTREACHED */
  36845. + 
  36846. +         case BODY:
  36847. +         case BODYEOF:
  36848. +         (void) fseek (in, (long) (-strlen (buf)), 1);
  36849. +         break;
  36850. + 
  36851. +         case LENERR:
  36852. +         case FMTERR:
  36853. +         adios (NULLCP, "message format error in component #%d",
  36854. +                compnum);
  36855. + 
  36856. +         default:
  36857. +         adios (NULLCP, "getfld() returned %d", state);
  36858. +     }
  36859. +     break;
  36860. +     }
  36861. + 
  36862. +     if ((free_ct = ct = (CT) calloc (1, sizeof *ct)) == NULL)
  36863. +     adios (NULLCP, "out of memory");
  36864. +     if (get_ctinfo ("multipart/mixed", ct, 0) == NOTOK)
  36865. +     done (1);
  36866. +     ct -> c_type = CT_MULTIPART;
  36867. +     ct -> c_subtype = MULTI_MIXED;
  36868. +     ct -> c_ctlistfnx = list_multi;
  36869. +     ct -> c_ctfreefnx = free_multi;
  36870. +     ct -> c_file = add (file, NULLCP);
  36871. + 
  36872. +     if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  36873. +     adios (NULLCP, "out of memory");
  36874. +     ct -> c_ctparams = (caddr_t) m;
  36875. + 
  36876. +     pp = &m -> mp_parts;
  36877. +     while (fgetstr (buf, sizeof buf - 1, in)) {
  36878. +     register struct part *part;
  36879. +     CT    p;
  36880. + 
  36881. +     if (user_content (in, file, buf, &p) == DONE) {
  36882. +         admonish (NULLCP, "ignoring spurious #end");
  36883. +         continue;
  36884. +     }
  36885. +     if (!p)
  36886. +         continue;
  36887. + 
  36888. +     if ((part = (struct part *) calloc (1, sizeof *part)) == NULL)
  36889. +         adios (NULLCP, "out of memory");
  36890. +     *pp = part, pp = &part -> mp_next;
  36891. +     part -> mp_part = p;
  36892. +     }
  36893. + 
  36894. +     (void) fclose (in);
  36895. + 
  36896. +     if (!m -> mp_parts)
  36897. +     adios (NULLCP, "no content directives found");
  36898. +     if (!m -> mp_parts -> mp_next) {
  36899. +     CT    p = m -> mp_parts -> mp_part;
  36900. + 
  36901. +     m -> mp_parts -> mp_part = NULL;
  36902. +     free_content (ct);
  36903. +     free_ct = ct = p;
  36904. +     }
  36905. + 
  36906. +     if ((cp = index (prefix, 'a')) == NULL)
  36907. +     adios (NULLCP, "internal error(4)");
  36908. + 
  36909. +     while (compose_content (ct) == NOTOK)
  36910. +     if (*cp < 'z')
  36911. +         (*cp)++;
  36912. +         else
  36913. +         if (*++cp == 0)
  36914. +         adios (NULLCP,
  36915. +                "giving up trying to find a unique delimiter string");
  36916. +             else
  36917. +         (*cp)++;
  36918. + 
  36919. +     fprintf (out, "%s: %s\n", VRSN_FIELD, VRSN_VALUE);
  36920. +     (void) output_content (ct, out);
  36921. + 
  36922. +     if (fflush (out))
  36923. +     adios (tmpfil, "error writing to");
  36924. + 
  36925. +     (void) fclose (out);
  36926. + 
  36927. +     if (listsw && ct -> c_ctlistfnx) {
  36928. +     char   *savfile;
  36929. + 
  36930. +     if (headsw)
  36931. +         printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  36932. +             "description");
  36933. + 
  36934. +                 /* to get msgno */
  36935. +     savfile = ct -> c_file, ct -> c_file = file;
  36936. +     (*ct -> c_ctlistfnx) (ct, 1);
  36937. +     ct -> c_file = savfile;
  36938. +     }
  36939. + 
  36940. +     free_content (ct);
  36941. +     free_ct = NULL;
  36942. + 
  36943. +     (void) sprintf (buf, "%s.orig", m_backup (file));
  36944. +     if (rename (file, buf) == NOTOK)
  36945. +     adios (buf, "unable to rename %s to", file);
  36946. +     if (rename (tmpfil, file) == NOTOK) {
  36947. +     advise (file, "unable to rename %s to", tmpfil);
  36948. +     (void) rename (buf, file);
  36949. +     done (1);
  36950. +     }
  36951. +     free_file = NULL;
  36952. + 
  36953. +     done (0);
  36954. + }
  36955. + 
  36956. + /*   */
  36957. + 
  36958. + static char *fgetstr (s, n, stream)
  36959. + char   *s;
  36960. + int    n;
  36961. + FILE   *stream;
  36962. + {
  36963. +     register char *cp,
  36964. +           *ep;
  36965. + 
  36966. +     for (ep = (cp = s) + n; cp < ep; ) {
  36967. +     register int    i;
  36968. + 
  36969. +     if (!fgets (cp, n, stream))
  36970. +         return (cp != s ? s : NULL);
  36971. +     if (cp == s && *cp != '#')
  36972. +         return s;
  36973. + 
  36974. +     cp += (i = strlen (cp)) - 1;
  36975. +     if (i <= 1 || *cp-- != '\n' || *cp != '\\')
  36976. +         break;
  36977. +     *cp = 0, n -= (i - 2);
  36978. +     }
  36979. + 
  36980. +     return s;
  36981. + }
  36982. + 
  36983. + /*   */
  36984. + 
  36985. + static int  user_content (in, file, buf, ctp)
  36986. + FILE   *in;
  36987. + char   *file,
  36988. +        *buf;
  36989. + CT     *ctp;
  36990. + {
  36991. +     int        extrnal,
  36992. +         vrsn;
  36993. +     register char  *cp,
  36994. +           **ap;
  36995. +     char    buffer[BUFSIZ];
  36996. +     struct multipart *m;
  36997. +     register struct part **pp;
  36998. +     struct stat st;
  36999. +     register struct str2init *s2i;
  37000. +     register CI        ci;
  37001. +     register CT        ct;
  37002. + 
  37003. +     if (buf[0] == '\n' || strcmp (buf, "#\n") == 0) {
  37004. +     *ctp = NULL;
  37005. +     return OK;
  37006. +     }
  37007. + 
  37008. +     if ((ct = (CT) calloc (1, sizeof *ct)) == NULL)
  37009. +     adios (NULLCP, "out of memory");
  37010. +     *ctp = ct;
  37011. +     ci = &ct -> c_ctinfo;
  37012. +     ct -> c_ctlistfnx = list_content;
  37013. + 
  37014. +     if (buf[0] != '#' || buf[1] == '#' || buf[1] == '<') {
  37015. +     int    headers,
  37016. +         inlineD;
  37017. +     long    pos;
  37018. +     char    content[BUFSIZ];
  37019. +     FILE   *out;
  37020. + 
  37021. +     ct -> c_file = add (m_tmpfil (invo_name), NULLCP);
  37022. +     ct -> c_unlink = 1;
  37023. + 
  37024. +     if ((out = fopen (ct -> c_file, "w")) == NULL)
  37025. +         adios (ct -> c_file, "unable to open for writing");
  37026. + 
  37027. +     if (buf[0] == '#' && buf[1] == '<') {
  37028. +         (void) strcpy (content, buf + 2);
  37029. +         inlineD = 1;
  37030. +         goto rock_and_roll;
  37031. +     }
  37032. +     else
  37033. +         inlineD = 0;
  37034. + 
  37035. +     (void) strcpy (content, "text/plain");
  37036. +     headers = 0;
  37037. +     (void) strcpy (buffer, buf[0] != '#' ? buf : buf + 1);
  37038. +     for (;;) {
  37039. +         int        i;
  37040. + 
  37041. +         if (headers >= 0
  37042. +             && uprf (buffer, DESCR_FIELD)
  37043. +             && buffer[i = strlen (DESCR_FIELD)] == ':') {
  37044. +             headers = 1;
  37045. + 
  37046. + again_descr: ;
  37047. +             ct -> c_descr = add (buffer + i + 1, ct -> c_descr);
  37048. +             if (!fgetstr (buffer, sizeof buffer - 1, in))
  37049. +             adios (NULLCP,
  37050. +                    "end-of-file after %s: field in plaintext",
  37051. +                    DESCR_FIELD);
  37052. +             switch (buffer[0]) {
  37053. +                 case ' ':
  37054. +                 case '\t':
  37055. +                 i = -1;
  37056. +                 goto again_descr;
  37057. + 
  37058. +             case '#':
  37059. +                 adios (NULLCP,
  37060. +                    "#-directive after %s: field in plaintext",
  37061. +                    DESCR_FIELD);
  37062. +                 /* NOTREACHED */
  37063. + 
  37064. +             default:
  37065. +                 break;
  37066. +             }
  37067. +         }
  37068. + 
  37069. +         if (headers != 1 || buffer[0] != '\n')
  37070. +         (void) fputs (buffer, out);
  37071. + rock_and_roll: ;
  37072. +         headers = -1;
  37073. + 
  37074. +         pos = ftell (in);
  37075. +         if ((cp = fgetstr (buffer, sizeof buffer - 1, in)) == NULL)
  37076. +         break;
  37077. +         if (buffer[0] == '#') {
  37078. +         register char  *bp;
  37079. + 
  37080. +         if (buffer[1] != '#')
  37081. +             break;
  37082. +         for (cp = (bp = buffer) + 1; *cp; cp++)
  37083. +             *bp++ = *cp;
  37084. +         *bp = '\0';
  37085. +         }
  37086. +     }
  37087. + 
  37088. +     if (listsw)
  37089. +         ct -> c_end = ftell (out);
  37090. +     (void) fclose (out);
  37091. + 
  37092. +     if (get_ctinfo (content, ct, inlineD) == NOTOK)
  37093. +         done (1);
  37094. +     for (s2i = str2cts; s2i -> si_key; s2i++)
  37095. +         if (uleq (ci -> ci_type, s2i -> si_key))
  37096. +         break;
  37097. +     if (!s2i -> si_key && !uprf (ci -> ci_type, "X-"))
  37098. +         s2i++;
  37099. +     switch (ct -> c_type = s2i -> si_value) {
  37100. +         case CT_MESSAGE:
  37101. +         case CT_MULTIPART:
  37102. +         adios (NULLCP,
  37103. +                "it makes sense to define a in-line %s content... NOT!",
  37104. +                ct -> c_type == CT_MESSAGE ? "message" : "multipart");
  37105. +         /* NOTREACHED */
  37106. + 
  37107. +         default:
  37108. +         if (ct -> c_ctinitfnx = s2i -> si_init)
  37109. +             (void) (*ct -> c_ctinitfnx) (ct);
  37110. +             break;
  37111. +     }
  37112. + 
  37113. +     if (cp)
  37114. +         (void) fseek (in, pos, 0);
  37115. +     return OK;
  37116. +     }
  37117. + 
  37118. +     extrnal = buf[1] == '@';
  37119. +     if (get_ctinfo (buf + (extrnal ? 2 : 1), ct, 1) == NOTOK)
  37120. +     done (1);
  37121. + 
  37122. +     for (s2i = str2cts; s2i -> si_key; s2i++)
  37123. +     if (uleq (ci -> ci_type, s2i -> si_key))
  37124. +         break;
  37125. +     if (s2i -> si_key) {        /* type/subtype [file] */
  37126. +     if (!ci -> ci_subtype)
  37127. +         adios (NULLCP, "missing subtype in \"#%s\"", ci -> ci_type);
  37128. + 
  37129. +     switch (ct -> c_type = s2i -> si_value) {
  37130. +         case CT_MULTIPART:
  37131. +             adios (NULLCP, "use \"#begin ... #end\" instead of \"#%s/%s\"",
  37132. +                ci -> ci_type, ci -> ci_subtype);
  37133. +         /* NOTREACHED */
  37134. + 
  37135. +         case CT_MESSAGE:
  37136. +         if (uleq (ci -> ci_subtype, "partial"))
  37137. +             adios (NULLCP, "sorry, \"#%s/%s\" isn't supported",
  37138. +                ci -> ci_type, ci -> ci_subtype);
  37139. +         if (uleq (ci -> ci_subtype, "external-body"))
  37140. +             adios (NULLCP, "use \"#@type/subtype ... [] ...\" instead of \"#%s/%s\"",
  37141. +                ci -> ci_type, ci -> ci_subtype);
  37142. +         adios (NULLCP,
  37143. +                "use \"#forw [+folder] [msgs]\" instead of \"#%s/%s\"",
  37144. +                ci -> ci_type, ci -> ci_subtype);
  37145. +         /* NOTREACHED */
  37146. + 
  37147. +         default:
  37148. +         if (ct -> c_ctinitfnx = s2i -> si_init)
  37149. +             (void) (*ct -> c_ctinitfnx) (ct);
  37150. +         break;
  37151. +     }
  37152. + 
  37153. +     if (extrnal) {
  37154. +         char    msgid[BUFSIZ];
  37155. +         register struct exbody *e;
  37156. +         CT        p;
  37157. +         static int    partno;
  37158. +         static long clock = 0L;
  37159. +         static char *msgfmt;
  37160. + 
  37161. +         if (!ci -> ci_magic)
  37162. +         adios (NULLCP, "need external information for \"#@%s/%s\"",
  37163. +                ci -> ci_type, ci -> ci_subtype);
  37164. +         p = ct;
  37165. + 
  37166. +         (void) sprintf (buffer, "message/external-body; %s",
  37167. +                 ci -> ci_magic);
  37168. +         free (ci -> ci_magic), ci -> ci_magic = NULL;
  37169. + 
  37170. +         if ((ct = (CT) calloc (1, sizeof *ct)) == NULL)
  37171. +         adios (NULLCP, "out of memory");
  37172. +         *ctp = ct;
  37173. +         ci = &ct -> c_ctinfo;
  37174. +         ct -> c_ctlistfnx = list_content;
  37175. +         if (get_ctinfo (buffer, ct, 0) == NOTOK)
  37176. +         done (1);
  37177. +         ct -> c_type = CT_MESSAGE;
  37178. +         ct -> c_subtype = MESSAGE_EXTERNAL;
  37179. + 
  37180. +         if ((e = (struct exbody *) calloc (1, sizeof *e)) == NULL)
  37181. +         adios (NULLCP, "out of memory");
  37182. +         ct -> c_ctparams = (caddr_t) e;
  37183. +         ct -> c_ctfreefnx = free_external;
  37184. + 
  37185. +         e -> eb_parent = ct;
  37186. +         e -> eb_content = p;
  37187. +         p -> c_ctextern = (caddr_t) e;
  37188. + 
  37189. +         ct -> c_ctlistfnx = list_external;
  37190. + 
  37191. +         if (params_external (ct, 1) == NOTOK)
  37192. +         done (1);
  37193. + 
  37194. +         if (clock == 0L) {
  37195. +         (void) time (&clock);
  37196. +         (void) sprintf (msgid, "<%d.%ld.%%d@%s>\n", getpid (), clock,
  37197. +                 LocalName ());
  37198. +         partno = 0;
  37199. +         msgfmt = getcpy (msgid);
  37200. +         }
  37201. + 
  37202. +         (void) sprintf (msgid, msgfmt, ++partno);
  37203. +         ct -> c_id = getcpy (msgid);
  37204. + 
  37205. +         return OK;
  37206. +     }
  37207. + 
  37208. +     if (ci -> ci_magic) {
  37209. +         if (*ci -> ci_magic == '|' || *ci -> ci_magic == '!') {
  37210. +         for (cp = ci -> ci_magic + 1; isspace (*cp); cp++)
  37211. +             continue;
  37212. +         if (!*cp)
  37213. +             adios (NULLCP, "empty pipe command for #%s directive",
  37214. +                ci -> ci_type);
  37215. +         cp = add (cp, NULLCP);
  37216. +         free (ci -> ci_magic);
  37217. +         ci -> ci_magic = cp;
  37218. +         }
  37219. +         else {
  37220. +         if (access (ct -> c_file = ci -> ci_magic, 04) == NOTOK)
  37221. +             adios ("reading", "unable to access %s for", ct -> c_file);
  37222. +         if (listsw && stat (ct -> c_file, &st) != NOTOK)
  37223. +             ct -> c_end = st.st_size;
  37224. +         ci -> ci_magic = NULL;
  37225. +         }
  37226. +         return OK;
  37227. +     }
  37228. + 
  37229. +     (void) sprintf (buffer, "%s-compose-%s/%s", invo_name, ci -> ci_type,
  37230. +             ci -> ci_subtype);
  37231. +     if ((cp = m_find (buffer)) == NULL || *cp == 0) {
  37232. +         (void) sprintf (buffer, "%s-compose-%s", invo_name, ci -> ci_type);
  37233. +         if ((cp = m_find (buffer)) == NULL || *cp == 0) {
  37234. +         content_error (NULLCP, ct,
  37235. +                    "don't know how to compose content");
  37236. +         done (1);
  37237. +         }
  37238. +     }
  37239. +     ci -> ci_magic = add (cp, NULLCP);
  37240. +     return OK;
  37241. +     }
  37242. + 
  37243. +     if (extrnal)
  37244. +     adios (NULLCP, "externally definition not allowed for \"#%s\"",
  37245. +            ci -> ci_type);
  37246. + 
  37247. +     if (uleq (ci -> ci_type, "forw")) {    /* #forw [+folder] [msgs] */
  37248. +     int    msgnum;
  37249. +     char   *folder,
  37250. +            *arguments[MAXARGS];
  37251. +     struct msgs *mp;
  37252. + 
  37253. +     if (ci -> ci_magic) {
  37254. +         ap = brkstring (ci -> ci_magic, " ", "\n");
  37255. +         ap = copyip (ap, arguments);
  37256. +     }
  37257. +     else
  37258. +         arguments[0] = "cur", arguments[1] = NULL;
  37259. + 
  37260. +     folder = NULL;
  37261. +     for (ap = arguments; cp = *ap; ap++)
  37262. +         if (*cp == '+' || *cp == '@')
  37263. +         if (folder)
  37264. +             adios (NULLCP, "only one folder per #forw directive");
  37265. +         else
  37266. +             folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF);
  37267. +     if (!folder)
  37268. +         folder = add (m_getfolder (), NULLCP);
  37269. + 
  37270. +     if ((mp = m_gmsg (folder)) == NULL)
  37271. +         adios (NULLCP, "unable to read folder %s", folder);
  37272. +     for (ap = arguments; cp = *ap; ap++)
  37273. +         if (*cp != '+' && *cp != '@')
  37274. +         if (!m_convert (mp, cp))
  37275. +             done (1);
  37276. +     free (folder);
  37277. + 
  37278. +     free_ctinfo (ct);
  37279. +     if (get_ctinfo ("multipart/digest", ct, 0) == NOTOK)
  37280. +         done (1);
  37281. +     ct -> c_type = CT_MULTIPART;
  37282. +     ct -> c_subtype = MULTI_DIGEST;
  37283. +     ct -> c_ctlistfnx = list_multi;
  37284. +     ct -> c_ctfreefnx = free_multi;
  37285. + 
  37286. +     if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  37287. +         adios (NULLCP, "out of memory");
  37288. +     ct -> c_ctparams = (caddr_t) m;
  37289. + 
  37290. +     pp = &m -> mp_parts;
  37291. +     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  37292. +         if (mp -> msgstats[msgnum] & SELECTED) {
  37293. +         register struct part *part;
  37294. +         register CT    p;
  37295. + 
  37296. +         if ((p = (CT) calloc (1, sizeof *p)) == NULL)
  37297. +             adios (NULLCP, "out of memory");
  37298. +         if (get_ctinfo ("message/rfc822", p, 0) == NOTOK)
  37299. +             done (1);
  37300. +         p -> c_type = CT_MESSAGE;
  37301. +         p -> c_subtype = MESSAGE_RFC822;
  37302. +         p -> c_ctlistfnx = list_content;
  37303. + 
  37304. +         (void) sprintf (buffer, "%s/%d", mp -> foldpath, msgnum);
  37305. +         p -> c_file = add (buffer, NULLCP);
  37306. +         if (listsw && stat (p -> c_file, &st) != NOTOK)
  37307. +             p -> c_end = st.st_size;
  37308. + 
  37309. +         if ((part = (struct part *) calloc (1, sizeof *part)) == NULL)
  37310. +             adios (NULLCP, "out of memory");
  37311. +         *pp = part, pp = &part -> mp_next;
  37312. +         part -> mp_part = p;
  37313. +         }
  37314. + 
  37315. +     m_fmsg (mp);
  37316. + 
  37317. +     return OK;
  37318. +     }
  37319. + 
  37320. +     if (uleq (ci -> ci_type, "end")) {
  37321. +     free_content (ct);
  37322. +     *ctp = NULL;
  37323. +     return DONE;
  37324. +     }
  37325. + 
  37326. +     if (!uleq (ci -> ci_type, "begin"))
  37327. +     adios (NULLCP, "unknown directive \"#%s\"", ci -> ci_type);
  37328. + 
  37329. +                     /* #begin [ alternative | parallel ] */
  37330. +     vrsn = !ci -> ci_magic ? MULTI_MIXED
  37331. +         : uprf (ci -> ci_magic, "alt") ? MULTI_ALTERNATE
  37332. +                            : MULTI_PARALLEL;
  37333. +     free_ctinfo (ct);
  37334. +     (void) sprintf (buffer, "multipart/%s", SubMultiPart[vrsn - 1].kv_key);
  37335. +     if (get_ctinfo (buffer, ct, 0) == NOTOK)
  37336. +     done (1);
  37337. +     ct -> c_type = CT_MULTIPART;
  37338. +     ct -> c_subtype = vrsn;
  37339. +     ct -> c_ctlistfnx = list_multi;
  37340. +     ct -> c_ctfreefnx = free_multi;
  37341. + 
  37342. +     if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  37343. +     adios (NULLCP, "out of memory");
  37344. +     ct -> c_ctparams = (caddr_t) m;
  37345. + 
  37346. +     pp = &m -> mp_parts;
  37347. +     while (fgetstr (buffer, sizeof buffer - 1, in)) {
  37348. +     register struct part *part;
  37349. +     CT    p;
  37350. + 
  37351. +     if (user_content (in, file, buffer, &p) == DONE) {
  37352. +         if (!m -> mp_parts)
  37353. +         adios (NULLCP, "empty \"#begin ... #end\" sequence");
  37354. +         return OK;
  37355. +     }
  37356. +     if (!p)
  37357. +         continue;
  37358. + 
  37359. +     if ((part = (struct part *) calloc (1, sizeof *part)) == NULL)
  37360. +         adios (NULLCP, "out of memory");
  37361. +     *pp = part, pp = &part -> mp_next;
  37362. +     part -> mp_part = p;
  37363. +     }
  37364. +     admonish (NULLCP, "premature end-of-file, missing #end");
  37365. +     return OK;
  37366. + }
  37367. + 
  37368. + /*   */
  37369. + 
  37370. + static int  compose_content (ct)
  37371. + register CT    ct;
  37372. + {
  37373. +     register char   *cp;
  37374. +     char    buffer[BUFSIZ];
  37375. +     register CI        ci = &ct -> c_ctinfo;
  37376. + 
  37377. +     if (ct -> c_type == CT_MESSAGE && ct -> c_subtype == MESSAGE_EXTERNAL)
  37378. +     return OK;
  37379. + 
  37380. +     switch (ct -> c_type) {
  37381. +     case CT_MULTIPART:
  37382. +         {
  37383. +         int    partnum;
  37384. +         register char *pp;
  37385. +         char    partnam[BUFSIZ];
  37386. +         struct multipart *m = (struct multipart *) ct -> c_ctparams;
  37387. +         register struct part *part;
  37388. + 
  37389. +         if (ct -> c_partno) {
  37390. +             (void) sprintf (partnam, "%s.", ct -> c_partno);
  37391. +             pp = partnam + strlen (partnam);
  37392. +         }
  37393. +         else
  37394. +             pp = partnam;
  37395. + 
  37396. +         for (part = m -> mp_parts, partnum = 1;
  37397. +                  part;
  37398. +                  part = part -> mp_next, partnum++) {
  37399. +             register CT  p = part -> mp_part;
  37400. + 
  37401. +             (void) sprintf (pp, "%d", partnum);
  37402. +             p -> c_partno = add (partnam, NULLCP);
  37403. + 
  37404. +             if (compose_content (p) == NOTOK)
  37405. +             return NOTOK;
  37406. +         }
  37407. + 
  37408. +         if (rfc934sw && ct -> c_subtype == MULTI_DIGEST) {
  37409. +             int        is934 = 1;
  37410. + 
  37411. +             for (part = m -> mp_parts; part; part = part -> mp_next) {
  37412. +             register CT  p = part -> mp_part;
  37413. + 
  37414. +             if (p -> c_subtype != MESSAGE_RFC822) {
  37415. +                 is934 = 0;
  37416. +                 break;
  37417. +             }
  37418. +             }
  37419. + 
  37420. +             ct -> c_rfc934 = is934;
  37421. +             for (part = m -> mp_parts; part; part = part -> mp_next) {
  37422. +             register CT  p = part -> mp_part;
  37423. + 
  37424. +             if (p -> c_rfc934 = is934)
  37425. +                 p -> c_end++;
  37426. +             }
  37427. +         }
  37428. + 
  37429. +         if (listsw) {
  37430. +             ct -> c_end = (partnum = strlen (prefix) + 2) + 2;
  37431. +             if (ct -> c_rfc934)
  37432. +             ct -> c_end += 1;
  37433. + 
  37434. +             for (part = m -> mp_parts; part; part = part -> mp_next)
  37435. +             ct -> c_end += part -> mp_part -> c_end + partnum;
  37436. +         }
  37437. +         }
  37438. +         break;
  37439. + 
  37440. + 
  37441. +     default:
  37442. +         if (!ct -> c_file) {
  37443. +         int    child_id,
  37444. +             i,
  37445. +             xstdout;
  37446. +         register char  *bp,
  37447. +                   **ap;
  37448. +         char   *vec[4];
  37449. +         FILE   *out;
  37450. + 
  37451. +         if (!(cp = ci -> ci_magic))
  37452. +             adios (NULLCP, "internal error(5)");
  37453. + 
  37454. +         ct -> c_file = add (m_tmpfil (invo_name), NULLCP);
  37455. +         ct -> c_unlink = 1;
  37456. + 
  37457. +         xstdout = 0;
  37458. +         buffer[0] = '\0';
  37459. +         for (bp = buffer; *cp; cp++)
  37460. +             if (*cp == '%') {
  37461. +             switch (*++cp) {
  37462. +                     case 'a':    /* additional arguments */
  37463. +                     {
  37464. +                     register char **ep;
  37465. +                     char   *s = "";
  37466. + 
  37467. +                     for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  37468. +                          *ap;
  37469. +                          ap++, ep++) {
  37470. +                     (void) sprintf (bp, "%s%s=\"%s\"", s,
  37471. +                             *ap, *ep);
  37472. +                     bp += strlen (bp);
  37473. +                     s = " ";
  37474. +                     }
  37475. +                 }
  37476. +                 break;
  37477. + 
  37478. +                 case 'F':    /* %f, and stdout is not-redirected */
  37479. +                 xstdout = 1;
  37480. +                 /* and fall... */
  37481. +                 case 'f':    /* filename */
  37482. +                 (void) sprintf (bp, "%s", ct -> c_file);
  37483. +                 break;
  37484. + 
  37485. +                 case 's':    /* subtype */
  37486. +                 (void) strcpy (bp, ci -> ci_subtype);
  37487. +                 break;
  37488. + 
  37489. +                 case '%':
  37490. +                 goto raw;
  37491. + 
  37492. +                 default:
  37493. +                 *bp++ = *--cp;
  37494. +                 *bp = '\0';
  37495. +                 continue;
  37496. +             }
  37497. +             bp += strlen (bp);
  37498. +             }
  37499. +             else {
  37500. + raw: ;
  37501. +             *bp++ = *cp;
  37502. +             *bp = '\0';
  37503. +             }
  37504. + 
  37505. +         printf ("composing content %s/%s from command\n\t%s\n",
  37506. +             ci -> ci_type, ci -> ci_subtype, buffer);
  37507. +         (void) fflush (stdout);
  37508. + 
  37509. +         vec[0] = "/bin/sh";
  37510. +         vec[1] = "-c";
  37511. +         vec[2] = buffer;
  37512. +         vec[3] = NULL;
  37513. + 
  37514. +         if ((out = fopen (ct -> c_file, "w")) == NULL)
  37515. +             adios (ct -> c_file, "unable to open for writing");
  37516. + 
  37517. +         for (i = 0; (child_id = vfork ()) == NOTOK && i > 5; i++)
  37518. +             sleep (5);
  37519. +         switch (child_id) {
  37520. +             case NOTOK:
  37521. +                 adios ("fork", "unable to fork");
  37522. +             /* NOTREACHED */
  37523. + 
  37524. +             case OK:
  37525. +             if (!xstdout)
  37526. +                 (void) dup2 (fileno (out), 1);
  37527. +             (void) close (fileno (out));
  37528. +             (void) execvp ("/bin/sh", vec);
  37529. +             fprintf (stderr, "unable to exec ");
  37530. +             perror ("/bin/sh");
  37531. +             _exit (-1);
  37532. +             /* NOTREACHED */
  37533. + 
  37534. +            default:
  37535. +             (void) fclose (out);
  37536. +             if (pidXwait (child_id, NULLCP))
  37537. +                 done (1);
  37538. +             break;
  37539. +         }
  37540. +         }
  37541. +         if (listsw && ct -> c_end == 0L) {
  37542. +         struct stat st;
  37543. + 
  37544. +         if (stat (ct -> c_file, &st) != NOTOK)
  37545. +             ct -> c_end = st.st_size;
  37546. +         }
  37547. +         if (ct -> c_type != CT_TEXT
  37548. +             && !(ct -> c_type == CT_APPLICATION
  37549. +                  && ct -> c_subtype == APPLICATION_POSTSCRIPT))
  37550. +         break;
  37551. +         /* else fall... */
  37552. + 
  37553. +     case CT_MESSAGE:
  37554. +         {
  37555. +         int    charset,
  37556. +             len,
  37557. +             linelen,
  37558. +             result;
  37559. +         FILE   *in;
  37560. + 
  37561. +         if ((in = fopen (ct -> c_file, "r")) == NULL)
  37562. +             adios (ct -> c_file, "unable to open for reading");
  37563. + 
  37564. +         len = strlen (prefix);
  37565. +         result = OK;
  37566. +         switch (ct -> c_type) {
  37567. +             case CT_TEXT:
  37568. +                 charset = ct -> c_ctparams ? 0 : -1;
  37569. +             linelen = 0;
  37570. +             break;
  37571. + 
  37572. +             case CT_APPLICATION:
  37573. +             charset = linelen = ct -> c_encoding ? 0 : -1;
  37574. +             break;
  37575. + 
  37576. +             default:
  37577. +             charset = linelen = 0;
  37578. +             break;
  37579. +         }
  37580. +         while (fgets (buffer, sizeof buffer - 1, in)) {
  37581. +             if (charset == -1) {
  37582. +             for (cp = buffer; *cp; cp++)
  37583. +                 if (!isascii (*cp)) {
  37584. +                 charset = CHARSET_UNKNOWN;
  37585. +                 break;
  37586. +                 }
  37587. +             if ((linelen == -1) && (cp - buffer > CPERLIN + 1))
  37588. +                 linelen = 1;
  37589. +             if (result == NOTOK)
  37590. +                 break;
  37591. +             }
  37592. +             else
  37593. +             if ((linelen == -1) && (strlen (buffer) > CPERLIN + 1))
  37594. +                 linelen = 1;
  37595. +             if (result == NOTOK)
  37596. +             continue;
  37597. + 
  37598. +             if (buffer[0] == '-' && buffer[1] == '-') {
  37599. +             for (cp = buffer + strlen (buffer) - 1;
  37600. +                      cp >= buffer;
  37601. +                      cp--)
  37602. +                 if (!isspace (*cp))
  37603. +                 break;
  37604. +             *++cp = '\0';
  37605. +             if (strncmp (buffer + 2, prefix, len) == 0
  37606. +                     && isdigit (buffer[2 + len])) {
  37607. +                 result = NOTOK;
  37608. +                 if (charset != -1 && linelen != -1)
  37609. +                 break;
  37610. +             }
  37611. +             }
  37612. +         }
  37613. +         if (ct -> c_type == CT_APPLICATION && !ct -> c_encoding)
  37614. +             ct -> c_encoding = linelen == -1
  37615. +                             && charset != CHARSET_UNKNOWN
  37616. +                         ? CE_7BIT : CE_QUOTED;
  37617. +         if (ct -> c_type == CT_TEXT && !ct -> c_ctparams) {
  37618. +             register char  **ap,
  37619. +                    **ep;
  37620. +             register struct text *t;
  37621. + 
  37622. +             if (charset == CHARSET_UNKNOWN && mm_charset)
  37623. +             charset = -2;
  37624. +             else
  37625. +             if (charset == -1)
  37626. +                 charset = CHARSET_USASCII;
  37627. + 
  37628. +             if ((t = (struct text *) calloc (1, sizeof *t)) == NULL)
  37629. +             adios (NULLCP, "out of memory");
  37630. +             ct -> c_ctparams = (caddr_t) t;
  37631. +             for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  37632. +                  *ap;
  37633. +                  ap++, ep++)
  37634. +             continue;
  37635. +             switch (t -> tx_charset = charset) {
  37636. +             case CHARSET_USASCII:
  37637. +                 *ap = add ("charset=us-ascii", NULLCP);
  37638. +                 break;
  37639. + 
  37640. +             case CHARSET_UNKNOWN:
  37641. +             default:
  37642. +                 *ap = add ("charset=x-unknown", NULLCP);
  37643. +                 break;
  37644. + 
  37645. +             case -2:
  37646. +                 *ap = concat ("charset=", mm_charset, NULLCP);
  37647. +                 break;
  37648. +             }
  37649. +             cp = index (*ap++, '=');
  37650. +             *ap = NULL;
  37651. +             *cp++ = '\0';
  37652. +             *ep = cp;
  37653. +         }
  37654. + 
  37655. +         (void) fclose (in);
  37656. + 
  37657. +         return result;
  37658. +         }
  37659. +     }
  37660. + 
  37661. +     return OK;
  37662. + }
  37663. + 
  37664. + /*   */
  37665. + 
  37666. + static int  output_content (ct, out)
  37667. + register CT    ct;
  37668. + FILE   *out;
  37669. + {
  37670. +     int        cc,
  37671. +         mailbody,
  37672. +         len;
  37673. +     register char   **ap,
  37674. +             **ep;
  37675. +     char    buffer[BUFSIZ];
  37676. +     register CI        ci = &ct -> c_ctinfo;
  37677. + 
  37678. +     if (ct -> c_type == CT_MULTIPART) {
  37679. +     register char  *cp;
  37680. +     static    int    encl = 0;
  37681. + 
  37682. +     ap = ci -> ci_attrs, ep = ci -> ci_values;
  37683. + 
  37684. +     (void) sprintf (buffer, "boundary=%s%d", prefix, encl++);
  37685. +     cp = index (*ap++ = add (buffer, NULLCP), '=');
  37686. +     *ap = NULL;
  37687. +     *cp++ = '\0';
  37688. +     *ep = cp;
  37689. +     }
  37690. +     else
  37691. +     if (ct -> c_type == CT_MESSAGE && ct -> c_rfc934)
  37692. +         goto rfc934_mode;
  37693. + 
  37694. +     len = 0;
  37695. +     fprintf (out, "%s: %s/%s", TYPE_FIELD, ci -> ci_type, ci -> ci_subtype);
  37696. +     len += strlen (TYPE_FIELD) + 2 + strlen (ci -> ci_type)
  37697. +                    + 1 + strlen (ci -> ci_subtype);
  37698. +     mailbody = ct -> c_type == CT_MESSAGE
  37699. +         && ct -> c_subtype == MESSAGE_EXTERNAL
  37700. +             && ((struct exbody *) ct -> c_ctparams) -> eb_body;
  37701. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++) {
  37702. +     if (mailbody && uleq (*ap, "body"))
  37703. +         continue;
  37704. + 
  37705. +     (void) putc (';', out);
  37706. +     len++;
  37707. + 
  37708. +     (void) sprintf (buffer, "%s=\"%s\"", *ap, *ep);
  37709. + 
  37710. +     if (len + 1 + (cc = strlen (buffer)) >= CPERLIN) {
  37711. +         (void) fputs ("\n\t", out);
  37712. +         len = 8;
  37713. +     }
  37714. +     else {
  37715. +         (void) putc (' ', out);
  37716. +         len++;
  37717. +     }
  37718. +     fprintf (out, "%s", buffer);
  37719. +     len += cc;
  37720. +     }
  37721. +     if (ci -> ci_comment) {
  37722. +     if (len + 1 + (cc = 2 + strlen (ci -> ci_comment)) >= CPERLIN) {
  37723. +         (void) fputs ("\n\t", out);
  37724. +         len = 8;
  37725. +     }
  37726. +     else {
  37727. +         (void) putc (' ', out);
  37728. +         len++;
  37729. +     }
  37730. +     fprintf (out, "(%s)", ci -> ci_comment);
  37731. +     len += cc;
  37732. +     }
  37733. +     fprintf (out, "\n");
  37734. +     if (ct -> c_id)
  37735. +     fprintf (out, "%s: %s", ID_FIELD, ct -> c_id);
  37736. +     if (ct -> c_descr)
  37737. +     fprintf (out, "%s: %s", DESCR_FIELD, ct -> c_descr);
  37738. + 
  37739. + rfc934_mode: ;
  37740. +     if (ct -> c_ctextern)
  37741. +     return OK;
  37742. +     switch (ct -> c_type) {
  37743. +     case CT_MULTIPART:
  37744. +         {
  37745. +         struct multipart *m = (struct multipart *) ct -> c_ctparams;
  37746. +         register struct part *part;
  37747. + 
  37748. +         if (ct -> c_rfc934)
  37749. +             fprintf (out, "\n");
  37750. + 
  37751. +         for (part = m -> mp_parts; part; part = part -> mp_next) {
  37752. +             register CT  p = part -> mp_part;
  37753. + 
  37754. +             fprintf (out, "\n--%s\n", ci -> ci_values[0]);
  37755. +             if (p -> c_type == CT_MESSAGE
  37756. +                 && p -> c_subtype != MESSAGE_EXTERNAL
  37757. +                 && !p -> c_rfc934)
  37758. +             fprintf (out, "%s: %s\n", VRSN_FIELD, VRSN_VALUE);
  37759. +             (void) output_content (p, out);
  37760. +         }
  37761. + 
  37762. +         fprintf (out, "\n--%s--\n", ci -> ci_values[0]);
  37763. +         }
  37764. +         break;
  37765. + 
  37766. +     case CT_TEXT:
  37767. +         if (ct -> c_subtype != TEXT_PLAIN
  37768. +             || (ct -> c_ctparams
  37769. +                 && ((struct text *) ct -> c_ctparams) -> tx_charset
  37770. +                     != CHARSET_USASCII)) {
  37771. + quoted_printable: ;
  37772. +         fprintf (out, "%s: %s\n\n", ENCODING_FIELD,
  37773. +              "quoted-printable");
  37774. +         (void) writeQuoted (ct, out);
  37775. +         break;
  37776. +         }
  37777. +         /* else fall... */
  37778. + 
  37779. +     case CT_MESSAGE:
  37780. + seven_bit: ;
  37781. +         fprintf (out, "\n");
  37782. +         if (ct -> c_type == CT_MESSAGE
  37783. +             && ct -> c_subtype == MESSAGE_EXTERNAL) {
  37784. +         register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  37785. +         
  37786. +         (void) output_content (e -> eb_content, out);
  37787. +         if (e -> eb_body)
  37788. +             fprintf (out, "\n%s\n", e -> eb_body);
  37789. +         }
  37790. +         else
  37791. +         (void) write7Bit (ct, out);
  37792. +         break;
  37793. + 
  37794. +     case CT_APPLICATION:
  37795. +         if (ct -> c_subtype == APPLICATION_POSTSCRIPT) {
  37796. +         if (ct -> c_encoding == CE_7BIT)
  37797. +             goto seven_bit;
  37798. +         goto quoted_printable;
  37799. +         }
  37800. +         /* else fall... */
  37801. + 
  37802. +     default:
  37803. +         fprintf (out, "%s: %s\n\n", ENCODING_FIELD, "base64");
  37804. +         (void) writeBase64 (ct, out);
  37805. +         break;
  37806. +     }
  37807. + 
  37808. +     return OK;
  37809. + }
  37810. + 
  37811. + /*   */
  37812. + 
  37813. + static int  write7Bit (ct, out)
  37814. + register CT    ct;
  37815. + FILE   *out;
  37816. + {
  37817. +     char    c,
  37818. +         buffer[BUFSIZ];
  37819. +     FILE   *in;
  37820. + 
  37821. +     if ((in = fopen (ct -> c_file, "r")) == NULL)
  37822. +     adios (ct -> c_file, "unable to open for reading");
  37823. + 
  37824. +     c = '\n';
  37825. +     while (fgets (buffer, sizeof buffer - 1, in)) {
  37826. +     c = buffer[strlen (buffer) - 1];
  37827. +     (void) fputs (buffer, out);
  37828. +     }
  37829. +     if (c != '\n')
  37830. +     (void) putc ('\n', out);
  37831. + 
  37832. +     (void) fclose (in);
  37833. + 
  37834. +     return OK;
  37835. + }
  37836. + 
  37837. + /*   */
  37838. + 
  37839. + static int  writeQuoted (ct, out)
  37840. + register CT    ct;
  37841. + FILE   *out;
  37842. + {
  37843. +     register char *cp;
  37844. +     char    c,
  37845. +         buffer[BUFSIZ];
  37846. +     FILE   *in;
  37847. + 
  37848. +     if ((in = fopen (ct -> c_file, "r")) == NULL)
  37849. +     adios (ct -> c_file, "unable to open for reading");
  37850. + 
  37851. +     while (fgets (buffer, sizeof buffer - 1, in)) {
  37852. +     register int    n;
  37853. + 
  37854. +     cp = buffer + strlen (buffer) - 1;
  37855. +     if ((c = *cp) == '\n')
  37856. +         *cp = '\0';
  37857. + 
  37858. +     if (strncmp (cp = buffer, "From ", sizeof "From " - 1) == 0) {
  37859. +         (void) fprintf (out, "=%02X", *cp++ & 0xff);
  37860. +         n = 3;
  37861. +     }
  37862. +     else
  37863. +         n = 0;
  37864. +     for (; *cp; cp++) {
  37865. +         if (n > CPERLIN - 3) {
  37866. +         (void) fputs ("=\n", out);
  37867. +         n = 0;
  37868. +         }
  37869. + 
  37870. +         switch (*cp) {
  37871. +         case ' ':
  37872. +         case '\t':
  37873. +             (void) putc (*cp, out);
  37874. +             n++;
  37875. +             break;
  37876. + 
  37877. +         case '@':
  37878. +         case '`':
  37879. +             if (ebcdicsw)
  37880. +             goto three_print;
  37881. + one_print: ;
  37882. +             (void) putc (*cp, out);
  37883. +             n++;
  37884. +             break;
  37885. + 
  37886. +         default:
  37887. +             if (('!' <= *cp && *cp <= '$')
  37888. +                 || ('[' <= *cp && *cp <= '^')
  37889. +                 || ('{' <= *cp && *cp <= '~')) {
  37890. +             if (ebcdicsw)
  37891. +                 goto three_print;
  37892. +             goto one_print;
  37893. +             }
  37894. + 
  37895. +             if ('%' <= *cp && *cp <= 'z')
  37896. +             goto one_print;
  37897. +             /* else fall... */
  37898. +         case '=':
  37899. + three_print: ;
  37900. +             (void) fprintf (out, "=%02X", *cp & 0xff);
  37901. +             n += 3;
  37902. +             break;
  37903. +         }
  37904. +     }
  37905. + 
  37906. +     if (c == '\n') {
  37907. +         if (cp > buffer && (*--cp == ' ' || *cp == '\t'))
  37908. +         (void) fputs ("=\n", out);
  37909. + 
  37910. +         (void) putc ('\n', out);
  37911. +     }
  37912. +     else
  37913. +         (void) fputs ("=\n", out);
  37914. +     }
  37915. + 
  37916. +     (void) fclose (in);
  37917. + 
  37918. +     return OK;
  37919. + }
  37920. + 
  37921. + /*   */
  37922. + 
  37923. + static char nib2b64[0x40f] =
  37924. +     "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  37925. + 
  37926. + 
  37927. + static int  writeBase64 (ct, out)
  37928. + register CT    ct;
  37929. + FILE   *out;
  37930. + {
  37931. +     int        result;
  37932. +     FILE   *in;
  37933. + 
  37934. +     if ((in = fopen (ct -> c_file, "r")) == NULL)
  37935. +     adios (ct -> c_file, "unable to open for reading");
  37936. + 
  37937. +     result = writeBase64aux (in, out);
  37938. + 
  37939. +     (void) fclose (in);
  37940. + 
  37941. +     return result;
  37942. + }
  37943. + 
  37944. + 
  37945. + static int  writeBase64aux (in, out)
  37946. + FILE   *in,
  37947. +        *out;
  37948. + {
  37949. +     int        cc,
  37950. +         n;
  37951. +     char    inbuf[3];
  37952. + 
  37953. +     n = BPERLIN;
  37954. +     while ((cc = fread (inbuf, sizeof *inbuf, sizeof inbuf, in)) > 0) {
  37955. +     unsigned long bits;
  37956. +     register char *bp;
  37957. +     char    outbuf[4];
  37958. + 
  37959. +     if (cc < sizeof inbuf) {
  37960. +         inbuf[2] = 0;
  37961. +         if (cc < sizeof inbuf - 1)
  37962. +         inbuf[1] = 0;
  37963. +     }
  37964. +     bits = (inbuf[0] & 0xff) << 16;
  37965. +     bits |= (inbuf[1] & 0xff) << 8;
  37966. +     bits |= inbuf[2] & 0xff;
  37967. + 
  37968. +     for (bp = outbuf + sizeof outbuf; bp > outbuf; bits >>= 6)
  37969. +         *--bp = nib2b64[bits & 0x3f];
  37970. +     if (cc < sizeof inbuf) {
  37971. +         outbuf[3] = '=';
  37972. +         if (cc < sizeof inbuf - 1)
  37973. +         outbuf[2] = '=';
  37974. +     }
  37975. + 
  37976. +     (void) fwrite (outbuf, sizeof *outbuf, sizeof outbuf, out);
  37977. + 
  37978. +     if (cc < sizeof inbuf) {
  37979. +         (void) putc ('\n', out);
  37980. +         return OK;
  37981. +     }
  37982. + 
  37983. +     if (--n <= 0) {
  37984. +         n = BPERLIN;
  37985. +         (void) putc ('\n', out);
  37986. +     }
  37987. +     }
  37988. +     if (n != BPERLIN)
  37989. +     (void) putc ('\n', out);
  37990. + 
  37991. +     return OK;
  37992. + }
  37993. + 
  37994. + /*     VIAMAIL */
  37995. + 
  37996. + #include "../zotnet/tws.h"
  37997. + 
  37998. + 
  37999. + static int  via_mail (mailsw, subjsw, parmsw, descsw, cmntsw, slowsw, fromsw)
  38000. + char   *mailsw,
  38001. +        *subjsw,
  38002. +        *parmsw,
  38003. +        *descsw,
  38004. +        *cmntsw,
  38005. +        *fromsw;
  38006. + int    slowsw;
  38007. + {
  38008. +     int        nlines,
  38009. +         nparts,
  38010. +         status;
  38011. +     long    pos;
  38012. +     char    tmpfil[BUFSIZ];
  38013. +     struct stat st;
  38014. +     FILE   *fp;
  38015. + 
  38016. +     (void) umask (~m_gmprot ());
  38017. + 
  38018. +     (void) strcpy (tmpfil, m_tmpfil (invo_name));
  38019. +     if ((fp = fopen (tmpfil, "w+")) == NULL)
  38020. +     adios (tmpfil, "unable to open for writing");
  38021. +     (void) chmod (tmpfil, 0600);
  38022. + 
  38023. +     if (!index (mailsw, '@'))
  38024. +     mailsw = concat (mailsw, "@", LocalName (), NULLCP);
  38025. +     fprintf (fp, "To: %s\n", mailsw);
  38026. +     nlines = 1;
  38027. +     if (subjsw)
  38028. +     fprintf (fp, "Subject: %s\n", subjsw), nlines++;
  38029. +     if (fromsw) {
  38030. +     if (!index (fromsw, '@'))
  38031. +         fromsw = concat (fromsw, "@", LocalName (), NULLCP);
  38032. +     fprintf (fp, "From: %s\n", fromsw), nlines++;
  38033. +     }
  38034. +     fprintf (fp, "%s: %s\n", VRSN_FIELD, VRSN_VALUE), nlines++;
  38035. +     fprintf (fp, "%s: application/octet-stream", TYPE_FIELD);
  38036. +     if (parmsw)
  38037. +     fprintf (fp, "; %s", parmsw);
  38038. +     if (cmntsw)
  38039. +     fprintf (fp, "\n\t(%s)", cmntsw), nlines++;
  38040. +     if (descsw)
  38041. +     fprintf (fp, "\n%s: %s", DESCR_FIELD, descsw), nlines++;
  38042. +     fprintf (fp, "\n%s: %s\n\n", ENCODING_FIELD, "base64"), nlines += 2;
  38043. +     if (fflush (fp))
  38044. +     adios (tmpfil, "error writing to");
  38045. + 
  38046. +     pos = ftell (fp);
  38047. +     (void) writeBase64aux (stdin, fp);
  38048. +     if (fflush (fp))
  38049. +     adios (tmpfil, "error writing to");
  38050. + 
  38051. +     if (fstat (fileno (fp), &st) == NOTOK)
  38052. +     adios ("failed", "fstat of %s", tmpfil);
  38053. +     nlines += ((st.st_size - pos) + CPERLIN) / (CPERLIN + 1);
  38054. +     nparts = (nlines + (LPERMSG - 1)) / LPERMSG;
  38055. + 
  38056. +     if (nparts <= 1)
  38057. +     status = via_post (tmpfil);
  38058. +     else {
  38059. +     int    partno;
  38060. +     long    clock;
  38061. +     char    buffer[BUFSIZ],
  38062. +         msgid[BUFSIZ];
  38063. +     
  38064. +     if (verbosw) {
  38065. +         printf ("sending binary image as %d partial messages\n", nparts);
  38066. +         (void) fflush (stdout);
  38067. +     }
  38068. + 
  38069. +     (void) time (&clock);
  38070. +     (void) sprintf (msgid, "<%d.%ld@%s>", getpid (), clock, LocalName ());
  38071. + 
  38072. +     (void) fseek (fp, 0L, 0);
  38073. +     if (!fgets (buffer, sizeof buffer, fp)
  38074. +             || !fgets (buffer, sizeof buffer, fp)
  38075. +             || (subjsw && !fgets (buffer, sizeof buffer, fp)))
  38076. +         adios (NULLCP, "premature eof");
  38077. +     for (partno = 1; partno <= nparts; partno++) {
  38078. +         int        lineno;
  38079. +         char    tmpdrf[BUFSIZ];
  38080. +         FILE   *out;
  38081. + 
  38082. +         (void) strcpy (tmpdrf, m_tmpfil (invo_name));
  38083. +         if ((out = fopen (tmpdrf, "w")) == NULL)
  38084. +         adios (tmpdrf, "unable to open for writing");
  38085. +         (void) chmod (tmpdrf, 0600);
  38086. + 
  38087. +         fprintf (out, "To: %s\n", mailsw);
  38088. +         if (subjsw)
  38089. +         fprintf (out, "Subject: %s\n", subjsw);
  38090. +         fprintf (out, "%s: %s\n", VRSN_FIELD, VRSN_VALUE);
  38091. +         fprintf (out,
  38092. +              "%s: message/partial; id=\"%s\";\n\tnumber=%d; total=%d\n",
  38093. +              TYPE_FIELD, msgid, partno, nparts);
  38094. +         fprintf (out, "%s: part %d of %d\n\n", DESCR_FIELD, partno,
  38095. +              nparts);
  38096. + 
  38097. +         if (partno == 1)
  38098. +         fprintf (out, "Message-ID: %s\n", msgid);
  38099. + 
  38100. +         for (lineno = LPERMSG; lineno > 0; lineno--) {
  38101. +         if (!fgets (buffer, sizeof buffer, fp)) {
  38102. +             if (partno == nparts)
  38103. +             break;
  38104. +             adios (NULLCP, "premature eof");
  38105. +         }
  38106. + 
  38107. +         (void) fputs (buffer, out);
  38108. +         }
  38109. + 
  38110. +         if (fflush (out))
  38111. +         adios (tmpdrf, "error writing to");
  38112. + 
  38113. +         (void) fclose (out);
  38114. + 
  38115. +         if (slowsw > 0 && 1 < partno && partno < nparts) {
  38116. +         if (verbosw) {
  38117. +             printf ("pausing %d seconds before sending part %d...\n",
  38118. +                 slowsw, partno);
  38119. +             (void) fflush (stdout);
  38120. +         }
  38121. + 
  38122. +         sleep ((unsigned) slowsw);
  38123. +         }
  38124. + 
  38125. +         status = via_post (tmpdrf);
  38126. +         (void) unlink (tmpdrf);
  38127. +         if (status)
  38128. +         break;
  38129. +     }
  38130. +     }
  38131. + 
  38132. +     (void) fclose (fp);
  38133. +     (void) unlink (tmpfil);
  38134. + 
  38135. +     done (status ? 1 : 0);
  38136. + }
  38137. + 
  38138. + /*   */
  38139. + 
  38140. + static int  via_post (file)
  38141. + char   *file;
  38142. + {
  38143. +     int        child_id,
  38144. +         i;
  38145. + 
  38146. +     for (i = 0; (child_id = fork ()) == NOTOK && i < 5; i++)
  38147. +     sleep (5);
  38148. +     switch (child_id) {
  38149. +         case NOTOK:
  38150. +         adios ("fork", "unable to");
  38151. +         /* NOTREACHED */
  38152. + 
  38153. +     case OK:
  38154. +         (void) execlp (postproc, r1bindex (postproc, '/'), file, NULLCP);
  38155. +         fprintf (stderr, "unable to exec ");
  38156. +         perror (postproc);
  38157. +         _exit (-1);
  38158. +         /* NOTREACHED */
  38159. + 
  38160. +     default:
  38161. +         return pidXwait (child_id, postproc);
  38162. +     }
  38163. + }
  38164. + 
  38165. + /*   */
  38166. + 
  38167. + void done (status)
  38168. + int    status;
  38169. + {
  38170. +     register CT       *ctp;
  38171. + 
  38172. +     if (ctp = cts)
  38173. +     for (; *ctp; ctp++)
  38174. +         free_content (*ctp);
  38175. +     if (free_ct)
  38176. +     free_content (free_ct);
  38177. +     if (free_file)
  38178. +     (void) unlink (free_file);
  38179. + 
  38180. +     exit (status);
  38181. + }
  38182. + 
  38183. + 
  38184. + static int  pidcheck (status)
  38185. + int    status;
  38186. + {
  38187. +     if ((status & 0xff00) == 0xff00 || (status & 0x007f) != SIGQUIT)
  38188. +     return status;
  38189. + 
  38190. +     (void) unlink ("core");
  38191. + 
  38192. +     (void) fflush (stdout);
  38193. + 
  38194. +     (void) fflush (stderr);
  38195. + 
  38196. +     done (1);
  38197. +     /* NOTREACHED */
  38198. + }
  38199. *** /dev/null    Tue Dec 15 08:01:10 1992
  38200. --- uip/mhparam.c    Mon Dec 14 16:21:20 1992
  38201. ***************
  38202. *** 0 ****
  38203. --- 1,167 ----
  38204. + /* mhparam.c - print mh_profile values */
  38205. + #ifndef    lint
  38206. + static char ident[] = "@(#)$Id: mhparam.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  38207. + #endif    /* lint */
  38208. + /* contributed by Jeffrey C Honig <Jeffrey_C_Honig@cornell.edu> */
  38209. + 
  38210. + #include "../h/mh.h"
  38211. + #include <stdio.h>
  38212. + 
  38213. + /*   */
  38214. + 
  38215. + static struct swit switches[] = {
  38216. + #define    COMPSW    0
  38217. +     "components", 0,
  38218. + #define    NCOMPSW    1
  38219. +     "nocomponents", 0,
  38220. + #define    ALLSW    2
  38221. +     "all", 0,
  38222. + #define    HELPSW    3
  38223. +     "help", 4,
  38224. + 
  38225. +     NULL, 0
  38226. + };
  38227. + 
  38228. + static char *p_find();
  38229. + 
  38230. + /*   */
  38231. + 
  38232. + /* ARGSUSED */
  38233. + 
  38234. + main(argc, argv)
  38235. +     int argc;
  38236. +     char *argv[];
  38237. + {
  38238. +     int     i,
  38239. +             all = 0,
  38240. +             compp = 0,
  38241. +             components = -1,
  38242. +             missed = 0;
  38243. +     char   *cp,
  38244. +             buf[100],
  38245. +           **ap,
  38246. +           **argp,
  38247. +            *arguments[MAXARGS],
  38248. +            *comps[MAXARGS];
  38249. + 
  38250. +     invo_name = r1bindex (argv[0], '/');
  38251. +     if ((cp = m_find (invo_name)) != NULL) {
  38252. +     ap = brkstring (cp = getcpy (cp), " ", "\n");
  38253. +     ap = copyip (ap, arguments);
  38254. +     }
  38255. +     else
  38256. +     ap = arguments;
  38257. +     (void) copyip (argv + 1, ap);
  38258. +     argp = arguments;
  38259. + 
  38260. + /*   */
  38261. + 
  38262. +     while (cp = *argp++) {
  38263. +     if (*cp == '-')
  38264. +         switch (smatch (++cp, switches)) {
  38265. +         case AMBIGSW: 
  38266. +             ambigsw (cp, switches);
  38267. +             done (1);
  38268. +         case UNKWNSW: 
  38269. +             adios (NULLCP, "-%s unknown", cp);
  38270. +         case HELPSW: 
  38271. +             (void) sprintf (buf, "%s [profile-components] [switches]",
  38272. +                 invo_name);
  38273. +             help (buf, switches);
  38274. +             done (1);
  38275. + 
  38276. +         case COMPSW:
  38277. +             components = 1;
  38278. +             break;
  38279. +         case NCOMPSW:
  38280. +             components = 0;
  38281. +             break;
  38282. + 
  38283. +         case ALLSW:
  38284. +             all = 1;
  38285. +             break;
  38286. + 
  38287. +         }
  38288. +     else 
  38289. +         comps[compp++] = cp;
  38290. +     }
  38291. + 
  38292. + /*   */
  38293. + 
  38294. +     if (all) {
  38295. +         register struct node   *np;
  38296. + 
  38297. +     if (compp)
  38298. +         advise(NULLCP, "profile-components ignored with -all");
  38299. + 
  38300. +     if (components >= 0)
  38301. +         advise(NULLCP, "-%scomponents ignored with -all",
  38302. +            components ? "" : "no");
  38303. +       
  38304. +     m_getdefs ();
  38305. +     for (np = m_defs; np; np = np -> n_next)
  38306. +         printf("%s:\t%s\n", np -> n_name, np -> n_field);
  38307. +     } else {
  38308. +         if (components < 0)
  38309. +         components = compp > 1;
  38310. + 
  38311. +     for (i = 0; i < compp; i++)  {
  38312. +         register char *value = m_find(comps[i]);
  38313. + 
  38314. +         if (!value)
  38315. +         value = p_find(comps[i]);
  38316. + 
  38317. +         if (value) {
  38318. +             if (components)
  38319. +             printf("%s:\t", comps[i]);
  38320. + 
  38321. +         printf("%s\n", value);
  38322. +         } else
  38323. +             missed++;
  38324. +     }
  38325. +     }
  38326. +     
  38327. +     done (missed);
  38328. + }
  38329. + 
  38330. + static struct procs {
  38331. +     char    *p_name;
  38332. +     char    **p_field;
  38333. + } procs [] = {
  38334. +      { "context",    &context    },
  38335. +      { "faceproc",    &faceproc    },
  38336. +      { "fileproc",    &fileproc    },
  38337. +      { "foldprot",    &foldprot    },
  38338. +      { "incproc",    &incproc    },
  38339. +      { "installproc",    &installproc     },
  38340. +      { "lproc",       &lproc        },
  38341. +      { "mailproc",    &mailproc    },
  38342. +      { "mhlproc",    &mhlproc    },
  38343. +      { "moreproc",    &moreproc    },
  38344. +      { "msgprot",    &msgprot    },
  38345. +      { "mshproc",    &mshproc    },
  38346. +      { "packproc",    &packproc    },
  38347. +      { "postproc",    &postproc    },
  38348. +      { "rmfproc",    &rmfproc    },
  38349. +      { "rmmproc",    &rmmproc    },
  38350. +      { "sendproc",    &sendproc    },
  38351. +      { "showproc",    &showproc    },
  38352. +      { "slocalproc",    &slocalproc    },
  38353. +      { "version",    &version    },
  38354. +      { "vmhproc",    &vmhproc    },
  38355. +      { "whatnowproc",    &whatnowproc    },
  38356. +      { "whomproc",    &whomproc    },
  38357. +      { NULL, NULL },
  38358. + };
  38359. + 
  38360. + static char *p_find(str)
  38361. + register char *str;
  38362. + {
  38363. +     register struct procs *ps;
  38364. + 
  38365. +     for (ps = procs; ps->p_name; ps++)
  38366. +     if (uleq (ps -> p_name, str))
  38367. +         return (*ps -> p_field);
  38368. + 
  38369. +     return NULL;
  38370. + }
  38371. *** ../mh-6.7.2/uip/mhpath.c    Thu Oct 29 15:02:27 1987
  38372. --- uip/mhpath.c    Mon Dec 14 16:21:21 1992
  38373. ***************
  38374. *** 1,7 ****
  38375. --- 1,13 ----
  38376.   /* mhpath.c - print full pathnames */
  38377. + #ifndef    lint
  38378. + static char ident[] = "@(#)$Id: mhpath.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  38379. + #endif    /* lint */
  38380.   
  38381.   #include "../h/mh.h"
  38382.   #include <stdio.h>
  38383. + #ifdef LOCALE
  38384. + #include    <locale.h>
  38385. + #endif
  38386.   
  38387.   /*   */
  38388.   
  38389. ***************
  38390. *** 9,15 ****
  38391.   #define    HELPSW    0
  38392.       "help", 4,
  38393.   
  38394. !     NULL, NULL
  38395.   };
  38396.   
  38397.   /*   */
  38398. --- 15,21 ----
  38399.   #define    HELPSW    0
  38400.       "help", 4,
  38401.   
  38402. !     NULL, 0
  38403.   };
  38404.   
  38405.   /*   */
  38406. ***************
  38407. *** 32,37 ****
  38408. --- 38,46 ----
  38409.              *msgs[MAXARGS];
  38410.       struct msgs *mp;
  38411.   
  38412. + #ifdef LOCALE
  38413. +     setlocale(LC_ALL, "");
  38414. + #endif
  38415.       invo_name = r1bindex (argv[0], '/');
  38416.       if ((cp = m_find (invo_name)) != NULL) {
  38417.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  38418. *** ../mh-6.7.2/uip/msgchk.c    Thu Apr  5 16:03:44 1990
  38419. --- uip/msgchk.c    Mon Dec 14 16:21:21 1992
  38420. ***************
  38421. *** 1,7 ****
  38422.   /* msgchk.c - check for mail */
  38423.   #ifndef    lint
  38424. ! static char ident[] = "@(#)$Id: msgchk.c,v 1.3 90/04/05 15:01:32 sources Exp $";
  38425. ! #endif    lint
  38426.   
  38427.   #include "../h/mh.h"
  38428.   #include <stdio.h>
  38429. --- 1,7 ----
  38430.   /* msgchk.c - check for mail */
  38431.   #ifndef    lint
  38432. ! static char ident[] = "@(#)$Id: msgchk.c,v 1.11 1992/12/15 00:20:22 jromine Exp $";
  38433. ! #endif    /* lint */
  38434.   
  38435.   #include "../h/mh.h"
  38436.   #include <stdio.h>
  38437. ***************
  38438. *** 10,30 ****
  38439.   #include <sys/types.h>
  38440.   #include <sys/stat.h>
  38441.   #include <pwd.h>
  38442.   
  38443.   /*   */
  38444.   
  38445.   #ifndef    POP
  38446.   #define    POPminc(a)    (a)
  38447. ! #else    POP
  38448.   #define    POPminc(a)    0
  38449. ! #endif    POP
  38450.   
  38451.   #ifndef    RPOP
  38452.   #define    RPOPminc(a)    (a)
  38453. ! #else    RPOP
  38454.   #define    RPOPminc(a)    0
  38455. ! #endif    RPOP
  38456.   
  38457.   static struct swit  switches[] = {
  38458.   #define    DATESW    0
  38459.       "date", 0,
  38460. --- 10,42 ----
  38461.   #include <sys/types.h>
  38462.   #include <sys/stat.h>
  38463.   #include <pwd.h>
  38464. + #ifdef LOCALE
  38465. + #include <locale.h>
  38466. + #endif
  38467. + #ifdef HESIOD
  38468. + #include <hesiod.h>
  38469. + #endif
  38470.   
  38471.   /*   */
  38472.   
  38473.   #ifndef    POP
  38474.   #define    POPminc(a)    (a)
  38475. ! #else    /* POP */
  38476.   #define    POPminc(a)    0
  38477. ! #endif    /* POP */
  38478.   
  38479.   #ifndef    RPOP
  38480.   #define    RPOPminc(a)    (a)
  38481. ! #else    /* RPOP */
  38482.   #define    RPOPminc(a)    0
  38483. ! #endif    /* RPOP */
  38484.   
  38485. + #ifndef    APOP
  38486. + #define    APOPminc(a)    (a)
  38487. + #else
  38488. + #define    APOPminc(a)    0
  38489. + #endif
  38490. + 
  38491.   static struct swit  switches[] = {
  38492.   #define    DATESW    0
  38493.       "date", 0,
  38494. ***************
  38495. *** 41,55 ****
  38496.   #define    USERSW    5
  38497.       "user user", POPminc (-4),
  38498.   
  38499. ! #define    RPOPSW    6
  38500.       "rpop", RPOPminc (-4),
  38501. ! #define    NRPOPSW    7
  38502.       "norpop", RPOPminc (-6),
  38503.   
  38504. ! #define    HELPSW    8
  38505.       "help", 4,
  38506.   
  38507. !     NULL, NULL
  38508.   };
  38509.   
  38510.   /*   */
  38511. --- 53,72 ----
  38512.   #define    USERSW    5
  38513.       "user user", POPminc (-4),
  38514.   
  38515. ! #define    APOPSW    6
  38516. !     "apop", APOPminc (-4),
  38517. ! #define    NAPOPSW    7
  38518. !     "noapop", APOPminc (-6),
  38519. ! 
  38520. ! #define    RPOPSW    8
  38521.       "rpop", RPOPminc (-4),
  38522. ! #define    NRPOPSW    9
  38523.       "norpop", RPOPminc (-6),
  38524.   
  38525. ! #define    HELPSW    10
  38526.       "help", 4,
  38527.   
  38528. !     NULL, 0
  38529.   };
  38530.   
  38531.   /*   */
  38532. ***************
  38533. *** 70,77 ****
  38534.   
  38535.   
  38536.   #ifdef    SYS5
  38537.   struct passwd    *getpwuid(), *getpwnam();
  38538. ! #endif    SYS5
  38539.   
  38540.   static int    donote(), checkmail(), remotemail();
  38541.   /*   */
  38542. --- 87,96 ----
  38543.   
  38544.   
  38545.   #ifdef    SYS5
  38546. + #ifndef __STDC__
  38547.   struct passwd    *getpwuid(), *getpwnam();
  38548. ! #endif /* !__STDC__ */
  38549. ! #endif    /* SYS5 */
  38550.   
  38551.   static int    donote(), checkmail(), remotemail();
  38552.   /*   */
  38553. ***************
  38554. *** 88,93 ****
  38555. --- 107,113 ----
  38556.           status = 0,
  38557.           snoop = 0,
  38558.           vecp = 0;
  38559. +     int uid = getuid ();
  38560.       char   *cp,
  38561.              *host = NULL,
  38562.               buf[80],
  38563. ***************
  38564. *** 95,110 ****
  38565.             **argp,
  38566.          *arguments[MAXARGS],
  38567.              *vec[50];
  38568.       struct passwd  *pw;
  38569.   
  38570.       invo_name = r1bindex (argv[0], '/');
  38571.       mts_init (invo_name);
  38572.   #ifdef    POP
  38573. -     if (pophost && *pophost)
  38574. -     host = pophost;
  38575.       if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  38576.       snoop++;
  38577. ! #endif    POP
  38578.       if ((cp = m_find (invo_name)) != NULL) {
  38579.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  38580.       ap = copyip (ap, arguments);
  38581. --- 115,137 ----
  38582.             **argp,
  38583.          *arguments[MAXARGS],
  38584.              *vec[50];
  38585. +     char *user = getusr ();
  38586.       struct passwd  *pw;
  38587. + #ifdef HESIOD
  38588. +     struct hes_postoffice *po;
  38589. +     char *tmphost;
  38590. + #endif
  38591.   
  38592. + #ifdef LOCALE
  38593. +     setlocale(LC_ALL, "");
  38594. + #endif
  38595.       invo_name = r1bindex (argv[0], '/');
  38596.       mts_init (invo_name);
  38597.   #ifdef    POP
  38598.       if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  38599.       snoop++;
  38600. ! #endif
  38601. ! 
  38602.       if ((cp = m_find (invo_name)) != NULL) {
  38603.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  38604.       ap = copyip (ap, arguments);
  38605. ***************
  38606. *** 157,165 ****
  38607.               adios (NULLCP, "missing argument to %s", argp[-2]);
  38608.               vec[vecp++] = cp;
  38609.               continue;
  38610.           case RPOPSW: 
  38611. !             rpop++;
  38612.               continue;
  38613.           case NRPOPSW: 
  38614.               rpop = 0;
  38615.               continue;
  38616. --- 184,196 ----
  38617.               adios (NULLCP, "missing argument to %s", argp[-2]);
  38618.               vec[vecp++] = cp;
  38619.               continue;
  38620. +         case APOPSW: 
  38621. +             rpop = -1;
  38622. +             continue;
  38623.           case RPOPSW: 
  38624. !             rpop = 1;
  38625.               continue;
  38626. +         case NAPOPSW:
  38627.           case NRPOPSW: 
  38628.               rpop = 0;
  38629.               continue;
  38630. ***************
  38631. *** 168,190 ****
  38632.       }
  38633.   
  38634.   /*   */
  38635. - 
  38636.   #ifdef    POP
  38637.       if (!host || !*host)
  38638.       host = NULL;
  38639. !     if (!host || !rpop)
  38640. !     (void) setuid (getuid ());
  38641. ! #endif    POP
  38642.       if (vecp == 0) {
  38643.   #ifdef    POP
  38644.       if (host)
  38645. !         status = remotemail (host, NULLCP, rpop, notifysw, 1, snoop);
  38646.       else
  38647. ! #endif    POP
  38648. !         if ((pw = getpwuid (getuid ())) == NULL)
  38649. !         adios (NULLCP, "you lose");
  38650. !         else
  38651. !         status = checkmail (pw, datesw, notifysw, 1);
  38652.       }
  38653.       else {
  38654.       vec[vecp] = NULL;
  38655. --- 199,247 ----
  38656.       }
  38657.   
  38658.   /*   */
  38659.   #ifdef    POP
  38660. + #ifdef HESIOD
  38661. +     /*
  38662. +       * Scheme is:
  38663. +       *        use MAILHOST environment variable if present,
  38664. +       *  else try Hesiod.
  38665. +       *  If that fails, use the default (if any)
  38666. +       *  provided by mtstailor in mts_init()
  38667. +       */
  38668. +     if (pophost == NULL || pophost[0] == '\0')
  38669. +       {
  38670. +     if ((tmphost = getenv("MAILHOST")) != NULL)
  38671. +       pophost = tmphost;
  38672. +     else if ((po = hes_getmailhost(vecp ? vec[0] : user)) != NULL &&
  38673. +          strcmp(po->po_type, "POP") == 0)
  38674. +       pophost = po->po_host;
  38675. +       }
  38676. + #endif /* HESIOD */
  38677. +     if (pophost && *pophost)
  38678. +     host = pophost;
  38679.       if (!host || !*host)
  38680.       host = NULL;
  38681. !     if (!host || rpop <= 0)
  38682. !     (void) setuid (uid);
  38683. ! #endif /* POP */
  38684.       if (vecp == 0) {
  38685.   #ifdef    POP
  38686.       if (host)
  38687. !         status = remotemail (host, user, rpop, notifysw, 1, snoop);
  38688.       else
  38689. ! #endif
  38690. !       {
  38691. !         char *home = (uid = geteuid()) ? home = getenv ("HOME") : NULL;
  38692. !         if (home == NULL)
  38693. !           {
  38694. !         pw = getpwnam (user);
  38695. !         if (pw == NULL)
  38696. !           adios (NULLCP, "unable to get information about user");
  38697. !         if (home == NULL)
  38698. !           home = pw->pw_dir;
  38699. !           }
  38700. !         status = checkmail (user, home, datesw, notifysw, 1);
  38701. !       }
  38702.       }
  38703.       else {
  38704.       vec[vecp] = NULL;
  38705. ***************
  38706. *** 194,202 ****
  38707.           if (host)
  38708.           status += remotemail (host, cp, rpop, notifysw, 0, snoop);
  38709.           else
  38710. ! #endif    POP
  38711.           if (pw = getpwnam (cp))
  38712. !             status += checkmail (pw, datesw, notifysw, 0);
  38713.           else
  38714.               advise (NULLCP, "no such user as %s", cp);
  38715.       }
  38716. --- 251,259 ----
  38717.           if (host)
  38718.           status += remotemail (host, cp, rpop, notifysw, 0, snoop);
  38719.           else
  38720. ! #endif
  38721.           if (pw = getpwnam (cp))
  38722. !             status += checkmail (pw->pw_name, pw->pw_dir, datesw, notifysw, 0);
  38723.           else
  38724.               advise (NULLCP, "no such user as %s", cp);
  38725.       }
  38726. ***************
  38727. *** 214,220 ****
  38728.   #define    NNMAISW    2
  38729.       "nomail", 0,
  38730.   
  38731. !     NULL, NULL
  38732.   };
  38733.   
  38734.   
  38735. --- 271,277 ----
  38736.   #define    NNMAISW    2
  38737.       "nomail", 0,
  38738.   
  38739. !     NULL, 0
  38740.   };
  38741.   
  38742.   
  38743. ***************
  38744. *** 242,251 ****
  38745.   
  38746.   #ifdef    MF
  38747.   /* ARGSUSED */
  38748. ! #endif    MF
  38749.   
  38750. ! static int  checkmail (pw, datesw, notifysw, personal)
  38751. ! register struct passwd  *pw;
  38752.   int    datesw,
  38753.       notifysw,
  38754.       personal;
  38755. --- 299,308 ----
  38756.   
  38757.   #ifdef    MF
  38758.   /* ARGSUSED */
  38759. ! #endif    /* MF */
  38760.   
  38761. ! static int  checkmail (user, home, datesw, notifysw, personal)
  38762. ! register char *user, *home;
  38763.   int    datesw,
  38764.       notifysw,
  38765.       personal;
  38766. ***************
  38767. *** 256,269 ****
  38768.       struct stat st;
  38769.   
  38770.       (void) sprintf (buffer, "%s/%s",
  38771. !         mmdfldir[0] ? mmdfldir : pw -> pw_dir,
  38772. !         mmdflfil[0] ? mmdflfil : pw -> pw_name);
  38773.   #ifndef    MF
  38774.       if (datesw) {
  38775.       st.st_size = 0;
  38776.       st.st_atime = st.st_mtime = 0;
  38777.       }
  38778. ! #endif    MF
  38779.       mf = (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK
  38780.       : st.st_atime <= st.st_mtime ? MMDFNEW : MMDFOLD;
  38781.   
  38782. --- 313,326 ----
  38783.       struct stat st;
  38784.   
  38785.       (void) sprintf (buffer, "%s/%s",
  38786. !         mmdfldir[0] ? mmdfldir : home,
  38787. !         mmdflfil[0] ? mmdflfil : user);
  38788.   #ifndef    MF
  38789.       if (datesw) {
  38790.       st.st_size = 0;
  38791.       st.st_atime = st.st_mtime = 0;
  38792.       }
  38793. ! #endif    /* MF */
  38794.       mf = (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK
  38795.       : st.st_atime <= st.st_mtime ? MMDFNEW : MMDFOLD;
  38796.   
  38797. ***************
  38798. *** 270,285 ****
  38799.   #ifdef    MF
  38800.       if (umincproc != NULL && *umincproc != NULL) {
  38801.       (void) sprintf (buffer, "%s/%s",
  38802. !         uucpldir[0] ? uucpldir : pw -> pw_dir,
  38803. !         uucplfil[0] ? uucplfil : pw -> pw_name);
  38804.       mf |= (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK
  38805.           : st.st_atime <= st.st_mtime ? UUCPNEW : UUCPOLD;
  38806.       }
  38807. ! #endif    MF
  38808.   
  38809.       if ((mf & UUCPOK) || (mf & MMDFOK)) {
  38810.       if (notifysw & NT_MAIL) {
  38811. !         printf (personal ? "You have " : "%s has ", pw -> pw_name);
  38812.           if (mf & UUCPOK)
  38813.           printf ("%s old-style bell", mf & UUCPOLD ? "old" : "new");
  38814.           if ((mf & UUCPOK) && (mf & MMDFOK))
  38815. --- 327,342 ----
  38816.   #ifdef    MF
  38817.       if (umincproc != NULL && *umincproc != NULL) {
  38818.       (void) sprintf (buffer, "%s/%s",
  38819. !         uucpldir[0] ? uucpldir : home,
  38820. !         uucplfil[0] ? uucplfil : user);
  38821.       mf |= (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK
  38822.           : st.st_atime <= st.st_mtime ? UUCPNEW : UUCPOLD;
  38823.       }
  38824. ! #endif    /* MF */
  38825.   
  38826.       if ((mf & UUCPOK) || (mf & MMDFOK)) {
  38827.       if (notifysw & NT_MAIL) {
  38828. !         printf (personal ? "You have " : "%s has ", user);
  38829.           if (mf & UUCPOK)
  38830.           printf ("%s old-style bell", mf & UUCPOLD ? "old" : "new");
  38831.           if ((mf & UUCPOK) && (mf & MMDFOK))
  38832. ***************
  38833. *** 297,303 ****
  38834.       else {
  38835.       if (notifysw & NT_NMAI)
  38836.           printf (personal ? "You don't %s%s" : "%s doesn't %s",
  38837. !             personal ? "" : pw -> pw_name, "have any mail waiting");
  38838.       else
  38839.           notifysw = 0;
  38840.   
  38841. --- 354,360 ----
  38842.       else {
  38843.       if (notifysw & NT_NMAI)
  38844.           printf (personal ? "You don't %s%s" : "%s doesn't %s",
  38845. !             personal ? "" : user, "have any mail waiting");
  38846.       else
  38847.           notifysw = 0;
  38848.   
  38849. ***************
  38850. *** 309,315 ****
  38851.       if (datesw && st.st_atime)
  38852.           printf ("; last read on %s",
  38853.               dasctime (dlocaltime ((long *) & st.st_atime), TW_NULL));
  38854. ! #endif    MF
  38855.       if (notifysw)
  38856.       printf ("\n");
  38857.   
  38858. --- 366,372 ----
  38859.       if (datesw && st.st_atime)
  38860.           printf ("; last read on %s",
  38861.               dasctime (dlocaltime ((long *) & st.st_atime), TW_NULL));
  38862. ! #endif    /* MF */
  38863.       if (notifysw)
  38864.       printf ("\n");
  38865.   
  38866. ***************
  38867. *** 374,377 ****
  38868.   
  38869.       return status;
  38870.   }
  38871. ! #endif    POP
  38872. --- 431,434 ----
  38873.   
  38874.       return status;
  38875.   }
  38876. ! #endif    /* POP */
  38877. *** ../mh-6.7.2/uip/msh.c    Thu Apr  5 16:02:57 1990
  38878. --- uip/msh.c    Mon Dec 14 16:21:24 1992
  38879. ***************
  38880. *** 1,7 ****
  38881.   /* msh.c - The MH shell (sigh) */
  38882.   #ifndef    lint
  38883. ! static char ident[] = "@(#)$Id: msh.c,v 2.5 90/04/05 14:56:36 sources Exp $";
  38884. ! #endif    lint
  38885.   
  38886.   /* TODO:
  38887.       Keep more status information in maildrop map
  38888. --- 1,7 ----
  38889.   /* msh.c - The MH shell (sigh) */
  38890.   #ifndef    lint
  38891. ! static char ident[] = "@(#)$Id: msh.c,v 2.13 1992/12/15 00:20:22 jromine Exp $";
  38892. ! #endif    /* lint */
  38893.   
  38894.   /* TODO:
  38895.       Keep more status information in maildrop map
  38896. ***************
  38897. *** 19,36 ****
  38898.   #include <sys/stat.h>
  38899.   #ifndef    SYS5
  38900.   #include <sgtty.h>
  38901. ! #else    SYS5
  38902.   #include <termio.h>
  38903.   #ifndef    NOIOCTLH
  38904.   #include <sys/ioctl.h>
  38905. ! #endif    NOIOCTLH
  38906. ! #endif    SYS5
  38907.   #include <pwd.h>
  38908.   #include <setjmp.h>
  38909.   #include <signal.h>
  38910.   #include "../h/mshsbr.h"
  38911.   #include "../h/vmhsbr.h"
  38912.   
  38913.   
  38914.   #define    QUOTE    '\\'        /* sigh */
  38915.   
  38916. --- 19,44 ----
  38917.   #include <sys/stat.h>
  38918.   #ifndef    SYS5
  38919.   #include <sgtty.h>
  38920. ! #else    /* SYS5 */
  38921.   #include <termio.h>
  38922.   #ifndef    NOIOCTLH
  38923.   #include <sys/ioctl.h>
  38924. ! #endif    /* NOIOCTLH */
  38925. ! #endif    /* SYS5 */
  38926.   #include <pwd.h>
  38927.   #include <setjmp.h>
  38928.   #include <signal.h>
  38929.   #include "../h/mshsbr.h"
  38930.   #include "../h/vmhsbr.h"
  38931. + #ifdef LOCALE
  38932. + #include    <locale.h>
  38933. + #endif
  38934.   
  38935. + #ifdef    MIME
  38936. + #define    MIMEminc(a)    (a)
  38937. + #else
  38938. + #define    MIMEminc(a)    0
  38939. + #endif
  38940.   
  38941.   #define    QUOTE    '\\'        /* sigh */
  38942.   
  38943. ***************
  38944. *** 73,79 ****
  38945.   #define    HELPSW    13
  38946.       "help", 4,
  38947.   
  38948. !     NULL, NULL
  38949.   };
  38950.   
  38951.   /*   */
  38952. --- 81,87 ----
  38953.   #define    HELPSW    13
  38954.       "help", 4,
  38955.   
  38956. !     NULL, 0
  38957.   };
  38958.   
  38959.   /*   */
  38960. ***************
  38961. *** 117,132 ****
  38962.   static jmp_buf peerenv;
  38963.   
  38964.   void    padios (), padvise ();
  38965. ! static int    alrmser ();
  38966.   
  38967.   
  38968.   #ifdef    BPOP
  38969.                   /* POP */
  38970.   
  38971. ! static int pmsh = 0;        /* BPOP enabled */
  38972.   
  38973.   extern char response[];
  38974. ! #endif    BPOP
  38975.   
  38976.   
  38977.                   /* PARENT */
  38978. --- 125,140 ----
  38979.   static jmp_buf peerenv;
  38980.   
  38981.   void    padios (), padvise ();
  38982. ! static TYPESIG    alrmser ();
  38983.   
  38984.   
  38985.   #ifdef    BPOP
  38986.                   /* POP */
  38987.   
  38988. ! int    pmsh = 0;        /* BPOP enabled */
  38989.   
  38990.   extern char response[];
  38991. ! #endif    /* BPOP */
  38992.   
  38993.   
  38994.                   /* PARENT */
  38995. ***************
  38996. *** 159,165 ****
  38997.   TYPESIG (*qstat) ();        /* original SIGQUIT */
  38998.   #ifdef    SIGTSTP
  38999.   static TYPESIG  (*tstat) ();    /* original SIGTSTP */
  39000. ! #endif    SIGTSTP
  39001.   int     interrupted;        /* SIGINT detected */
  39002.   int     broken_pipe;        /* SIGPIPE detected */
  39003.   int     told_to_quit;        /* SIGQUIT detected */
  39004. --- 167,173 ----
  39005.   TYPESIG (*qstat) ();        /* original SIGQUIT */
  39006.   #ifdef    SIGTSTP
  39007.   static TYPESIG  (*tstat) ();    /* original SIGTSTP */
  39008. ! #endif    /* SIGTSTP */
  39009.   int     interrupted;        /* SIGINT detected */
  39010.   int     broken_pipe;        /* SIGPIPE detected */
  39011.   int     told_to_quit;        /* SIGQUIT detected */
  39012. ***************
  39013. *** 167,180 ****
  39014.   #ifdef    BSD42
  39015.   int     should_intr;        /* signal handler should interrupt call */
  39016.   jmp_buf sigenv;            /* the environment pointer */
  39017. ! #endif    BSD42
  39018.   
  39019. ! static int    intrser (), pipeser (), quitser ();
  39020.   
  39021.   
  39022.   #ifdef    SYS5
  39023.   struct passwd  *getpwnam ();
  39024. ! #endif    SYS5
  39025.   
  39026.   static int    read_map(), read_file(), check_folder(), getargs(), parse();
  39027.   static int    getcmds(), init_io(), initaux_io(), finaux_io(), peerwait();
  39028. --- 175,190 ----
  39029.   #ifdef    BSD42
  39030.   int     should_intr;        /* signal handler should interrupt call */
  39031.   jmp_buf sigenv;            /* the environment pointer */
  39032. ! #endif    /* BSD42 */
  39033.   
  39034. ! static TYPESIG    intrser (), pipeser (), quitser ();
  39035.   
  39036.   
  39037. + #ifndef    __STDC__
  39038.   #ifdef    SYS5
  39039.   struct passwd  *getpwnam ();
  39040. ! #endif    /* SYS5 */
  39041. ! #endif
  39042.   
  39043.   static int    read_map(), read_file(), check_folder(), getargs(), parse();
  39044.   static int    getcmds(), init_io(), initaux_io(), finaux_io(), peerwait();
  39045. ***************
  39046. *** 200,206 ****
  39047.   #ifdef    BPOP
  39048.       int        pmsh1 = 0,
  39049.           pmsh2 = 0;
  39050. ! #endif    BPOP
  39051.       char   *cp,
  39052.              *file = NULL,
  39053.              *folder = NULL,
  39054. --- 210,216 ----
  39055.   #ifdef    BPOP
  39056.       int        pmsh1 = 0,
  39057.           pmsh2 = 0;
  39058. ! #endif    /* BPOP */
  39059.       char   *cp,
  39060.              *file = NULL,
  39061.              *folder = NULL,
  39062. ***************
  39063. *** 209,214 ****
  39064. --- 219,227 ----
  39065.               buf[80],
  39066.              *arguments[MAXARGS];
  39067.   
  39068. + #ifdef LOCALE
  39069. +     setlocale(LC_ALL, "");
  39070. + #endif
  39071.       invo_name = r1bindex (argv[0], '/');
  39072.       mts_init (invo_name);
  39073.       if ((cp = m_find (invo_name)) != NULL) {
  39074. ***************
  39075. *** 289,295 ****
  39076.   #ifdef    BPOP
  39077.               if ((pmsh1 = atoi (cp)) < 1)
  39078.               adios (NULLCP, "bad argument %s %s", argp[-2], cp);
  39079. ! #endif    BPOP
  39080.               continue;
  39081.           case PWRITSW: 
  39082.               if (!(cp = *argp++) || *cp == '-')
  39083. --- 302,308 ----
  39084.   #ifdef    BPOP
  39085.               if ((pmsh1 = atoi (cp)) < 1)
  39086.               adios (NULLCP, "bad argument %s %s", argp[-2], cp);
  39087. ! #endif    /* BPOP */
  39088.               continue;
  39089.           case PWRITSW: 
  39090.               if (!(cp = *argp++) || *cp == '-')
  39091. ***************
  39092. *** 297,303 ****
  39093.   #ifdef    BPOP
  39094.               if ((pmsh2 = atoi (cp)) < 1)
  39095.               adios (NULLCP, "bad argument %s %s", argp[-2], cp);
  39096. ! #endif    BPOP
  39097.               continue;
  39098.   
  39099.           case TCURSW:
  39100. --- 310,316 ----
  39101.   #ifdef    BPOP
  39102.               if ((pmsh2 = atoi (cp)) < 1)
  39103.               adios (NULLCP, "bad argument %s %s", argp[-2], cp);
  39104. ! #endif    /* BPOP */
  39105.               continue;
  39106.   
  39107.           case TCURSW:
  39108. ***************
  39109. *** 330,340 ****
  39110.   #ifdef    FIOCLEX
  39111.       if (pfd > 1)
  39112.       (void) ioctl (pfd, FIOCLEX, NULLCP);
  39113. ! #endif    FIOCLEX
  39114.   
  39115.   #ifdef    BSD42
  39116.       should_intr = 0;
  39117. ! #endif    BSD42
  39118.       setsigx (istat, SIGINT, intrser);
  39119.       setsigx (qstat, SIGQUIT, quitser);
  39120.   
  39121. --- 343,353 ----
  39122.   #ifdef    FIOCLEX
  39123.       if (pfd > 1)
  39124.       (void) ioctl (pfd, FIOCLEX, NULLCP);
  39125. ! #endif    /* FIOCLEX */
  39126.   
  39127.   #ifdef    BSD42
  39128.       should_intr = 0;
  39129. ! #endif    /* BSD42 */
  39130.       setsigx (istat, SIGINT, intrser);
  39131.       setsigx (qstat, SIGQUIT, quitser);
  39132.   
  39133. ***************
  39134. *** 347,353 ****
  39135.       (void) signal (SIGQUIT, SIG_IGN);
  39136.   #ifdef    SIGTSTP
  39137.       tstat = signal (SIGTSTP, SIG_IGN);
  39138. ! #endif    SIGTSTP
  39139.       }
  39140.   
  39141.   #ifdef    BPOP
  39142. --- 360,366 ----
  39143.       (void) signal (SIGQUIT, SIG_IGN);
  39144.   #ifdef    SIGTSTP
  39145.       tstat = signal (SIGTSTP, SIG_IGN);
  39146. ! #endif    /* SIGTSTP */
  39147.       }
  39148.   
  39149.   #ifdef    BPOP
  39150. ***************
  39151. *** 355,368 ****
  39152.       cp = getenv ("MHPOPDEBUG");
  39153.   #ifdef    NNTP
  39154.       if (pop_set (pmsh1, pmsh2, cp && *cp, myname) == NOTOK)
  39155. ! #else    NNTP
  39156.       if (pop_set (pmsh1, pmsh2, cp && *cp) == NOTOK)
  39157. ! #endif    NNTP
  39158.           padios (NULLCP, "%s", response);
  39159.       if (folder)
  39160.           file = folder, folder = NULL;
  39161.       }
  39162. ! #endif    BPOP
  39163.   
  39164.       if (folder)
  39165.       fsetup (folder);
  39166. --- 368,381 ----
  39167.       cp = getenv ("MHPOPDEBUG");
  39168.   #ifdef    NNTP
  39169.       if (pop_set (pmsh1, pmsh2, cp && *cp, myname) == NOTOK)
  39170. ! #else    /* NNTP */
  39171.       if (pop_set (pmsh1, pmsh2, cp && *cp) == NOTOK)
  39172. ! #endif    /* NNTP */
  39173.           padios (NULLCP, "%s", response);
  39174.       if (folder)
  39175.           file = folder, folder = NULL;
  39176.       }
  39177. ! #endif    /* BPOP */
  39178.   
  39179.       if (folder)
  39180.       fsetup (folder);
  39181. ***************
  39182. *** 405,442 ****
  39183.       "mark", 0,
  39184.   #define    MAILCMD    11
  39185.       "mhmail", 0,
  39186. ! #define    MSGKCMD    12
  39187.       "msgchk", 0,
  39188. ! #define    NEXTCMD    13
  39189.       "next", 0,
  39190. ! #define    PACKCMD    14
  39191.       "packf", 0,
  39192. ! #define    PICKCMD    15
  39193.       "pick", 0,
  39194. ! #define    PREVCMD    16
  39195.       "prev", 0,
  39196. ! #define    QUITCMD    17
  39197.       "quit", 0,
  39198. ! #define    FILECMD    18
  39199.       "refile", 0,
  39200. ! #define    REPLCMD    19
  39201.       "repl", 0,
  39202. ! #define    RMMCMD    20
  39203.       "rmm", 0,
  39204. ! #define    SCANCMD    21
  39205.       "scan", 0,
  39206. ! #define    SENDCMD    22
  39207.       "send", 0,
  39208. ! #define    SHOWCMD    23
  39209.       "show", 0,
  39210. ! #define    SORTCMD    24
  39211.       "sortm", 0,
  39212. ! #define    WHATCMD    25
  39213.       "whatnow", 0,
  39214. ! #define    WHOMCMD    26
  39215.       "whom", 0,
  39216.   
  39217. !     NULL, NULL
  39218.   };
  39219.   
  39220.   /*   */
  39221. --- 418,457 ----
  39222.       "mark", 0,
  39223.   #define    MAILCMD    11
  39224.       "mhmail", 0,
  39225. ! #define    MHNCMD    12
  39226. !     "mhn", MIMEminc(-3),
  39227. ! #define    MSGKCMD    13
  39228.       "msgchk", 0,
  39229. ! #define    NEXTCMD    14
  39230.       "next", 0,
  39231. ! #define    PACKCMD    15
  39232.       "packf", 0,
  39233. ! #define    PICKCMD    16
  39234.       "pick", 0,
  39235. ! #define    PREVCMD    17
  39236.       "prev", 0,
  39237. ! #define    QUITCMD    18
  39238.       "quit", 0,
  39239. ! #define    FILECMD    19
  39240.       "refile", 0,
  39241. ! #define    REPLCMD    20
  39242.       "repl", 0,
  39243. ! #define    RMMCMD    21
  39244.       "rmm", 0,
  39245. ! #define    SCANCMD    22
  39246.       "scan", 0,
  39247. ! #define    SENDCMD    23
  39248.       "send", 0,
  39249. ! #define    SHOWCMD    24
  39250.       "show", 0,
  39251. ! #define    SORTCMD    25
  39252.       "sortm", 0,
  39253. ! #define    WHATCMD    26
  39254.       "whatnow", 0,
  39255. ! #define    WHOMCMD    27
  39256.       "whom", 0,
  39257.   
  39258. !     NULL, 0
  39259.   };
  39260.   
  39261.   /*   */
  39262. ***************
  39263. *** 578,583 ****
  39264. --- 593,605 ----
  39265.               markcmd (vec);
  39266.           break;
  39267.   
  39268. +         case MHNCMD:
  39269. + #ifdef    MIME
  39270. +         if (!vmh || ttyN (cmdp) != NOTOK)
  39271. +             mhncmd (vec);
  39272. + #endif
  39273. +         break;
  39274. + 
  39275.           case NEXTCMD: 
  39276.           case PREVCMD: 
  39277.           case SHOWCMD: 
  39278. ***************
  39279. *** 673,681 ****
  39280.   
  39281.   #ifndef    BSD42
  39282.       maxfds = _NFILE / 2;
  39283. ! #else    BSD42
  39284.       maxfds = getdtablesize () / 2;
  39285. ! #endif    BSD42
  39286.       if ((maxfds -= 2) < 1)
  39287.       maxfds = 1;
  39288.   }
  39289. --- 695,703 ----
  39290.   
  39291.   #ifndef    BSD42
  39292.       maxfds = _NFILE / 2;
  39293. ! #else    /* BSD42 */
  39294.       maxfds = getdtablesize () / 2;
  39295. ! #endif    /* BSD42 */
  39296.       if ((maxfds -= 2) < 1)
  39297.       maxfds = 1;
  39298.   }
  39299. ***************
  39300. *** 689,695 ****
  39301.               msgp;
  39302.   #ifdef    BPOP
  39303.       char    tmpfil[BUFSIZ];
  39304. ! #endif    BPOP
  39305.       struct stat st;
  39306.   
  39307.   #ifdef    BPOP
  39308. --- 711,717 ----
  39309.               msgp;
  39310.   #ifdef    BPOP
  39311.       char    tmpfil[BUFSIZ];
  39312. ! #endif    /* BPOP */
  39313.       struct stat st;
  39314.   
  39315.   #ifdef    BPOP
  39316. ***************
  39317. *** 700,711 ****
  39318.       (void) unlink (tmpfil);
  39319.       }
  39320.       else
  39321. ! #endif    BPOP
  39322.       if ((fp = fopen (file, "r")) == NULL)
  39323.       padios (file, "unable to read");
  39324.   #ifdef    FIOCLEX
  39325.       (void) ioctl (fileno (fp), FIOCLEX, NULLCP);
  39326. ! #endif    FIOCLEX
  39327.       if (fstat (fileno (fp), &st) != NOTOK) {
  39328.       mode = (int) (st.st_mode & 0777), mtime = st.st_mtime;
  39329.       msgp = read_map (file, (long) st.st_size);
  39330. --- 722,733 ----
  39331.       (void) unlink (tmpfil);
  39332.       }
  39333.       else
  39334. ! #endif    /* BPOP */
  39335.       if ((fp = fopen (file, "r")) == NULL)
  39336.       padios (file, "unable to read");
  39337.   #ifdef    FIOCLEX
  39338.       (void) ioctl (fileno (fp), FIOCLEX, NULLCP);
  39339. ! #endif    /* FIOCLEX */
  39340.       if (fstat (fileno (fp), &st) != NOTOK) {
  39341.       mode = (int) (st.st_mode & 0777), mtime = st.st_mtime;
  39342.       msgp = read_map (file, (long) st.st_size);
  39343. ***************
  39344. *** 718,724 ****
  39345.       if ((msgp = read_file (msgp ? Msgs[msgp].m_stop : 0L, msgp + 1)) < 1)
  39346.       padios (NULLCP, "no messages in %s", myname ? myname : file);
  39347.   
  39348. !     mp = (struct msgs  *) calloc ((unsigned) 1, MSIZE (mp, 1, msgp + 1));
  39349.       if (mp == NULL)
  39350.       padios (NULLCP, "unable to allocate folder storage");
  39351.   
  39352. --- 740,746 ----
  39353.       if ((msgp = read_file (msgp ? Msgs[msgp].m_stop : 0L, msgp + 1)) < 1)
  39354.       padios (NULLCP, "no messages in %s", myname ? myname : file);
  39355.   
  39356. !     mp = (struct msgs  *) calloc ((unsigned) 1, MHSIZE (mp, 1, msgp + 1));
  39357.       if (mp == NULL)
  39358.       padios (NULLCP, "unable to allocate folder storage");
  39359.   
  39360. ***************
  39361. *** 728,757 ****
  39362.       mp -> curmsg = 0;
  39363.   
  39364.       mp -> foldpath = getcpy (myname ? myname : file);
  39365. !     mp -> msgflags = NULL;
  39366.   #ifdef    BPOP
  39367.       if (pmsh)
  39368.       mp -> msgflags |= READONLY;
  39369.       else {
  39370. ! #endif    BPOP
  39371.       (void) stat (file, &st);
  39372.       if (st.st_uid != getuid () || access (file, 02) == NOTOK)
  39373.           mp -> msgflags |= READONLY;
  39374.   #ifdef    BPOP
  39375.       }
  39376. ! #endif    BPOP
  39377.       mp -> lowoff = 1;
  39378.       mp -> hghoff = mp -> hghmsg + 1;
  39379.   
  39380.   #ifdef    MTR
  39381.       mp -> msgstats = (short *)
  39382. !         calloc ((unsigned) 1, MSIZEX (mp, mp -> lowmsg, mp -> hghmsg));
  39383.       if (mp -> msgstats == NULL)
  39384.       padios (NULLCP, "unable to allocate messages storage");
  39385.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  39386.       if (mp -> msgstats < (short *)0)
  39387.       padios (NULLCP, "setup() botch -- you lose big");
  39388. ! #endif    MTR
  39389.   #ifdef    BPOP
  39390.       if (pmsh) {
  39391.   #ifndef    NNTP
  39392. --- 750,779 ----
  39393.       mp -> curmsg = 0;
  39394.   
  39395.       mp -> foldpath = getcpy (myname ? myname : file);
  39396. !     mp -> msgflags = 0;
  39397.   #ifdef    BPOP
  39398.       if (pmsh)
  39399.       mp -> msgflags |= READONLY;
  39400.       else {
  39401. ! #endif    /* BPOP */
  39402.       (void) stat (file, &st);
  39403.       if (st.st_uid != getuid () || access (file, 02) == NOTOK)
  39404.           mp -> msgflags |= READONLY;
  39405.   #ifdef    BPOP
  39406.       }
  39407. ! #endif    /* BPOP */
  39408.       mp -> lowoff = 1;
  39409.       mp -> hghoff = mp -> hghmsg + 1;
  39410.   
  39411.   #ifdef    MTR
  39412.       mp -> msgstats = (short *)
  39413. !         calloc ((unsigned) 1, MHSIZEX (mp, mp -> lowmsg, mp -> hghmsg));
  39414.       if (mp -> msgstats == NULL)
  39415.       padios (NULLCP, "unable to allocate messages storage");
  39416.       mp -> msgstats = (mp -> msgbase = mp -> msgstats) - mp -> lowoff;
  39417.       if (mp -> msgstats < (short *)0)
  39418.       padios (NULLCP, "setup() botch -- you lose big");
  39419. ! #endif    /* MTR */
  39420.   #ifdef    BPOP
  39421.       if (pmsh) {
  39422.   #ifndef    NNTP
  39423. ***************
  39424. *** 759,773 ****
  39425.           Msgs[i].m_top = i;
  39426.           mp -> msgstats[i] = EXISTS | VIRTUAL;
  39427.       }
  39428. ! #else    NNTP
  39429.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++) {
  39430.           if (Msgs[i].m_top)            /* set in read_pop() */
  39431.           mp -> msgstats[i] = EXISTS | VIRTUAL;
  39432.       }
  39433. ! #endif    NNTP
  39434.       }
  39435.       else
  39436. ! #endif    BPOP
  39437.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++)
  39438.       mp -> msgstats[i] = EXISTS;
  39439.       m_init ();
  39440. --- 781,795 ----
  39441.           Msgs[i].m_top = i;
  39442.           mp -> msgstats[i] = EXISTS | VIRTUAL;
  39443.       }
  39444. ! #else    /* NNTP */
  39445.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++) {
  39446.           if (Msgs[i].m_top)            /* set in read_pop() */
  39447.           mp -> msgstats[i] = EXISTS | VIRTUAL;
  39448.       }
  39449. ! #endif    /* NNTP */
  39450.       }
  39451.       else
  39452. ! #endif    /* BPOP */
  39453.       for (i = mp -> lowmsg; i <= mp -> hghmsg; i++)
  39454.       mp -> msgstats[i] = EXISTS;
  39455.       m_init ();
  39456. ***************
  39457. *** 797,803 ****
  39458.   #ifdef    BPOP
  39459.       if (pmsh)
  39460.       return read_pop ();
  39461. ! #endif    BPOP
  39462.   
  39463.       if ((i = map_read (file, size, &rp, 1)) == 0)
  39464.       return 0;
  39465. --- 819,825 ----
  39466.   #ifdef    BPOP
  39467.       if (pmsh)
  39468.       return read_pop ();
  39469. ! #endif    /* BPOP */
  39470.   
  39471.       if ((i = map_read (file, size, &rp, 1)) == 0)
  39472.       return 0;
  39473. ***************
  39474. *** 832,838 ****
  39475.   #ifdef    BPOP
  39476.       if (pmsh)
  39477.       return (msgp - 1);
  39478. ! #endif    BPOP
  39479.   
  39480.       if ((i = mbx_read (fp, pos, &rp, 1)) <= 0)
  39481.       return (msgp - 1);
  39482. --- 854,860 ----
  39483.   #ifdef    BPOP
  39484.       if (pmsh)
  39485.       return (msgp - 1);
  39486. ! #endif    /* BPOP */
  39487.   
  39488.       if ((i = mbx_read (fp, pos, &rp, 1)) <= 0)
  39489.       return (msgp - 1);
  39490. ***************
  39491. *** 867,873 ****
  39492.       Msgs[n].m_top = Msgs[n].m_bboard_id = i;
  39493.   }
  39494.   
  39495. ! #endif    NNTP
  39496.   static int  read_pop () {
  39497.       int        nmsgs,
  39498.               nbytes;
  39499. --- 889,895 ----
  39500.       Msgs[n].m_top = Msgs[n].m_bboard_id = i;
  39501.   }
  39502.   
  39503. ! #endif    /* NNTP */
  39504.   static int  read_pop () {
  39505.       int        nmsgs,
  39506.               nbytes;
  39507. ***************
  39508. *** 880,886 ****
  39509.   #ifdef    NNTP    /* this makes read_pop() do some real work... */
  39510.       pop_base = nbytes - 1;     /* nmsgs=last-first+1, nbytes=first */
  39511.       pop_exists (pop_statmsg);
  39512. ! #endif    NNTP
  39513.       return nmsgs;
  39514.   }
  39515.   
  39516. --- 902,908 ----
  39517.   #ifdef    NNTP    /* this makes read_pop() do some real work... */
  39518.       pop_base = nbytes - 1;     /* nmsgs=last-first+1, nbytes=first */
  39519.       pop_exists (pop_statmsg);
  39520. ! #endif    /* NNTP */
  39521.       return nmsgs;
  39522.   }
  39523.   
  39524. ***************
  39525. *** 890,896 ****
  39526.   {
  39527.       fprintf (yp, "%s\n", s);
  39528.   }
  39529. ! #endif    BPOP
  39530.   
  39531.   /*   */
  39532.   
  39533. --- 912,918 ----
  39534.   {
  39535.       fprintf (yp, "%s\n", s);
  39536.   }
  39537. ! #endif    /* BPOP */
  39538.   
  39539.   /*   */
  39540.   
  39541. ***************
  39542. *** 897,902 ****
  39543. --- 919,926 ----
  39544.   static m_gMsgs (n)
  39545.   int    n;
  39546.   {
  39547. +     int        nmsgs;
  39548. + 
  39549.       if (Msgs == NULL) {
  39550.       nMsgs = n + MAXFOLDER / 2;
  39551.       Msgs = (struct Msg *) calloc ((unsigned) (nMsgs + 2), sizeof *Msgs);
  39552. ***************
  39553. *** 908,918 ****
  39554.       if (nMsgs >= n)
  39555.       return;
  39556.   
  39557. !     nMsgs = n + MAXFOLDER / 2;
  39558.       Msgs = (struct Msg *) realloc ((char *) Msgs,
  39559. !                         (unsigned) (nMsgs + 2) * sizeof *Msgs);
  39560.       if (Msgs == NULL)
  39561.       padios (NULLCP, "unable to reallocate Msgs structure");
  39562.   }
  39563.   
  39564.   /*   */
  39565. --- 932,946 ----
  39566.       if (nMsgs >= n)
  39567.       return;
  39568.   
  39569. !     nmsgs = nMsgs + n + MAXFOLDER / 2;
  39570.       Msgs = (struct Msg *) realloc ((char *) Msgs,
  39571. !                         (unsigned) (nmsgs + 2) * sizeof *Msgs);
  39572.       if (Msgs == NULL)
  39573.       padios (NULLCP, "unable to reallocate Msgs structure");
  39574. +     bzero ((char *) (Msgs + nMsgs + 2),
  39575. +        (unsigned) ((nmsgs - nMsgs) * sizeof *Msgs));
  39576. + 
  39577. +     nMsgs = nmsgs;
  39578.   }
  39579.   
  39580.   /*   */
  39581. ***************
  39582. *** 1000,1006 ****
  39583.   
  39584.       mp -> msgstats[msgnum] &= ~VIRTUAL;
  39585.       }
  39586. ! #endif    BPOP
  39587.   
  39588.       m_eomsbr ((int (*)()) 0);    /* XXX */
  39589.       (void) fseek (fp, Msgs[msgnum].m_start, 0);
  39590. --- 1028,1034 ----
  39591.   
  39592.       mp -> msgstats[msgnum] &= ~VIRTUAL;
  39593.       }
  39594. ! #endif    /* BPOP */
  39595.   
  39596.       m_eomsbr ((int (*)()) 0);    /* XXX */
  39597.       (void) fseek (fp, Msgs[msgnum].m_start, 0);
  39598. ***************
  39599. *** 1022,1028 ****
  39600.   #ifdef    BPOP
  39601.       if (pmsh)
  39602.       return 0;
  39603. ! #endif    BPOP
  39604.   
  39605.       if (fmsh) {
  39606.       if (stat (mp -> foldpath, &st) == NOTOK)
  39607. --- 1050,1056 ----
  39608.   #ifdef    BPOP
  39609.       if (pmsh)
  39610.       return 0;
  39611. ! #endif    /* BPOP */
  39612.   
  39613.       if (fmsh) {
  39614.       if (stat (mp -> foldpath, &st) == NOTOK)
  39615. ***************
  39616. *** 1182,1188 ****
  39617.       int        arg1,
  39618.           arg2,
  39619.           arg3;
  39620. ! #endif    BPOP
  39621.       char   *bp,
  39622.               buf[BUFSIZ],
  39623.               name[NAMESZ];
  39624. --- 1210,1216 ----
  39625.       int        arg1,
  39626.           arg2,
  39627.           arg3;
  39628. ! #endif    /* BPOP */
  39629.       char   *bp,
  39630.               buf[BUFSIZ],
  39631.               name[NAMESZ];
  39632. ***************
  39633. *** 1198,1204 ****
  39634.           && arg3 > 0)
  39635.           return (Msgs[msgnum].m_bboard_id = arg3);
  39636.       }
  39637. ! #endif    BPOP
  39638.   
  39639.       zp = msh_ready (msgnum, 0);
  39640.       for (state = FLD;;)
  39641. --- 1226,1232 ----
  39642.           && arg3 > 0)
  39643.           return (Msgs[msgnum].m_bboard_id = arg3);
  39644.       }
  39645. ! #endif    /* BPOP */
  39646.   
  39647.       zp = msh_ready (msgnum, 0);
  39648.       for (state = FLD;;)
  39649. ***************
  39650. *** 1244,1256 ****
  39651.   #ifndef    BSD42            /* XXX */
  39652.   #ifdef    FIOCLEX
  39653.       (void) ioctl (sd, FIOCLEX, NULL);
  39654. ! #endif    FIOCLEX
  39655. ! #endif    not BSD42
  39656.       if ((sp = fdopen (sd, "w")) == NULL)
  39657.           padios ("standard output", "unable to fdopen");
  39658.       }
  39659.   
  39660. !     (void) putenv ("mhfolder", mp -> foldpath);
  39661.       if (vmh)
  39662.       return;
  39663.   
  39664. --- 1272,1284 ----
  39665.   #ifndef    BSD42            /* XXX */
  39666.   #ifdef    FIOCLEX
  39667.       (void) ioctl (sd, FIOCLEX, NULL);
  39668. ! #endif    /* FIOCLEX */
  39669. ! #endif    /* not BSD42 */
  39670.       if ((sp = fdopen (sd, "w")) == NULL)
  39671.           padios ("standard output", "unable to fdopen");
  39672.       }
  39673.   
  39674. !     (void) m_putenv ("mhfolder", mp -> foldpath);
  39675.       if (vmh)
  39676.       return;
  39677.   
  39678. ***************
  39679. *** 1427,1433 ****
  39680.               (void) kill (ppid, SIGEMT);
  39681.           return EOF;
  39682.       }
  39683. ! #endif    BSD42
  39684.       if (interactive) {
  39685.           printf ("%s", prompt);
  39686.           (void) fflush (stdout);
  39687. --- 1455,1461 ----
  39688.               (void) kill (ppid, SIGEMT);
  39689.           return EOF;
  39690.       }
  39691. ! #endif    /* BSD42 */
  39692.       if (interactive) {
  39693.           printf ("%s", prompt);
  39694.           (void) fflush (stdout);
  39695. ***************
  39696. *** 1444,1459 ****
  39697.               (void) kill (ppid, SIGEMT);
  39698.           return EOF;
  39699.           }
  39700. ! #else    BSD42
  39701.           if (i == EOF)
  39702.           longjmp (sigenv, DONE);
  39703. ! #endif    BSD42
  39704.           if (cp < &buffer[sizeof buffer - 2])
  39705.           *cp++ = i;
  39706.       }
  39707. !     *cp = NULL;
  39708.   
  39709. !     if (buffer[0] == NULL)
  39710.           continue;
  39711.       if (buffer[0] == '?') {
  39712.           printf ("commands:\n");
  39713. --- 1472,1487 ----
  39714.               (void) kill (ppid, SIGEMT);
  39715.           return EOF;
  39716.           }
  39717. ! #else    /* BSD42 */
  39718.           if (i == EOF)
  39719.           longjmp (sigenv, DONE);
  39720. ! #endif    /* BSD42 */
  39721.           if (cp < &buffer[sizeof buffer - 2])
  39722.           *cp++ = i;
  39723.       }
  39724. !     *cp = 0;
  39725.   
  39726. !     if (buffer[0] == 0)
  39727.           continue;
  39728.       if (buffer[0] == '?') {
  39729.           printf ("commands:\n");
  39730. ***************
  39731. *** 1477,1483 ****
  39732.           default: 
  39733.   #ifdef    BSD42
  39734.           should_intr = 0;
  39735. ! #endif    BSD42
  39736.           return i;
  39737.       }
  39738.       }
  39739. --- 1505,1511 ----
  39740.           default: 
  39741.   #ifdef    BSD42
  39742.           should_intr = 0;
  39743. ! #endif    /* BSD42 */
  39744.           return i;
  39745.       }
  39746.       }
  39747. ***************
  39748. *** 1532,1538 ****
  39749.              *cp,
  39750.              *pp;
  39751.   
  39752. !     cmdp -> line[0] = NULL;
  39753.       pp = cmdp -> args[argp++] = cmdp -> line;
  39754.       cmdp -> redirect = NULL;
  39755.       cmdp -> direction = STDIO;
  39756. --- 1560,1566 ----
  39757.              *cp,
  39758.              *pp;
  39759.   
  39760. !     cmdp -> line[0] = 0;
  39761.       pp = cmdp -> args[argp++] = cmdp -> line;
  39762.       cmdp -> redirect = NULL;
  39763.       cmdp -> direction = STDIO;
  39764. ***************
  39765. *** 1541,1547 ****
  39766.       for (cp = buffer; c = *cp; cp++)
  39767.       if (!isspace (c))
  39768.           break;
  39769. !     if (c == NULL) {
  39770.       if (vmh)
  39771.           (void) fmt2peer (RC_EOF, "null command");
  39772.       return NOTOK;
  39773. --- 1569,1575 ----
  39774.       for (cp = buffer; c = *cp; cp++)
  39775.       if (!isspace (c))
  39776.           break;
  39777. !     if (c == 0) {
  39778.       if (vmh)
  39779.           (void) fmt2peer (RC_EOF, "null command");
  39780.       return NOTOK;
  39781. ***************
  39782. *** 1551,1561 ****
  39783.       if (isspace (c)) {
  39784.           while (isspace (c))
  39785.           c = *cp++;
  39786. !         if (c == NULL)
  39787.           break;
  39788. !         *pp++ = NULL;
  39789.           cmdp -> args[argp++] = pp;
  39790. !         *pp = NULL;
  39791.       }
  39792.   
  39793.       switch (c) {
  39794. --- 1579,1589 ----
  39795.       if (isspace (c)) {
  39796.           while (isspace (c))
  39797.           c = *cp++;
  39798. !         if (c == 0)
  39799.           break;
  39800. !         *pp++ = 0;
  39801.           cmdp -> args[argp++] = pp;
  39802. !         *pp = 0;
  39803.       }
  39804.   
  39805.       switch (c) {
  39806. ***************
  39807. *** 1562,1574 ****
  39808.           case '"': 
  39809.           for (;;) {
  39810.               switch (c = *cp++) {
  39811. !             case NULL: 
  39812.                   padvise (NULLCP, "unmatched \"");
  39813.                   return NOTOK;
  39814.               case '"': 
  39815.                   break;
  39816.               case QUOTE: 
  39817. !                 if ((c = *cp++) == NULL)
  39818.                   goto no_quoting;
  39819.               default: 
  39820.                   *pp++ = c;
  39821. --- 1590,1602 ----
  39822.           case '"': 
  39823.           for (;;) {
  39824.               switch (c = *cp++) {
  39825. !             case 0: 
  39826.                   padvise (NULLCP, "unmatched \"");
  39827.                   return NOTOK;
  39828.               case '"': 
  39829.                   break;
  39830.               case QUOTE: 
  39831. !                 if ((c = *cp++) == 0)
  39832.                   goto no_quoting;
  39833.               default: 
  39834.                   *pp++ = c;
  39835. ***************
  39836. *** 1579,1585 ****
  39837.           continue;
  39838.   
  39839.           case QUOTE: 
  39840. !         if ((c = *cp++) == NULL) {
  39841.           no_quoting: ;
  39842.               padvise (NULLCP, "the newline character can not be quoted");
  39843.               return NOTOK;
  39844. --- 1607,1613 ----
  39845.           continue;
  39846.   
  39847.           case QUOTE: 
  39848. !         if ((c = *cp++) == 0) {
  39849.           no_quoting: ;
  39850.               padvise (NULLCP, "the newline character can not be quoted");
  39851.               return NOTOK;
  39852. ***************
  39853. *** 1595,1601 ****
  39854.               padvise (NULLCP, "invalid null command");
  39855.               return NOTOK;
  39856.           }
  39857. !         if (*cmdp -> args[argp - 1] == NULL)
  39858.               argp--;
  39859.           cmdp -> direction = c == '>' ? CRTIO : PIPIO;
  39860.           if (cmdp -> direction == CRTIO && (c = *cp) == '>') {
  39861. --- 1623,1629 ----
  39862.               padvise (NULLCP, "invalid null command");
  39863.               return NOTOK;
  39864.           }
  39865. !         if (*cmdp -> args[argp - 1] == 0)
  39866.               argp--;
  39867.           cmdp -> direction = c == '>' ? CRTIO : PIPIO;
  39868.           if (cmdp -> direction == CRTIO && (c = *cp) == '>') {
  39869. ***************
  39870. *** 1606,1612 ****
  39871.           for (; c = *cp; cp++)
  39872.               if (!isspace (c))
  39873.               break;
  39874. !         if (c == NULL) {
  39875.               padvise (NULLCP, cmdp -> direction != PIPIO
  39876.                   ? "missing name for redirect"
  39877.                   : "invalid null command");
  39878. --- 1634,1640 ----
  39879.           for (; c = *cp; cp++)
  39880.               if (!isspace (c))
  39881.               break;
  39882. !         if (c == 0) {
  39883.               padvise (NULLCP, cmdp -> direction != PIPIO
  39884.                   ? "missing name for redirect"
  39885.                   : "invalid null command");
  39886. ***************
  39887. *** 1627,1633 ****
  39888.       break;
  39889.       }
  39890.   
  39891. !     *pp++ = NULL;
  39892.       cmdp -> args[argp] = NULL;
  39893.   
  39894.       return OK;
  39895. --- 1655,1661 ----
  39896.       break;
  39897.       }
  39898.   
  39899. !     *pp++ = 0;
  39900.       cmdp -> args[argp] = NULL;
  39901.   
  39902.       return OK;
  39903. ***************
  39904. *** 1647,1654 ****
  39905.       return OK;
  39906.   
  39907.       if (cp = index (pp = redirect + 1, '/'))
  39908. !     *cp++ = NULL;
  39909. !     if (*pp == NULL)
  39910.       pp = mypath;
  39911.       else
  39912.       if (pw = getpwnam (pp))
  39913. --- 1675,1682 ----
  39914.       return OK;
  39915.   
  39916.       if (cp = index (pp = redirect + 1, '/'))
  39917. !     *cp++ = 0;
  39918. !     if (*pp == 0)
  39919.       pp = mypath;
  39920.       else
  39921.       if (pw = getpwnam (pp))
  39922. ***************
  39923. *** 1793,1799 ****
  39924.       (void) pop_done ();
  39925.       pmsh = 0;
  39926.       }
  39927. ! #endif    BPOP
  39928.   }
  39929.   
  39930.   /*   */
  39931. --- 1821,1827 ----
  39932.       (void) pop_done ();
  39933.       pmsh = 0;
  39934.       }
  39935. ! #endif    /* BPOP */
  39936.   }
  39937.   
  39938.   /*   */
  39939. ***************
  39940. *** 1821,1832 ****
  39941.   
  39942.   /* ARGSUSED */
  39943.   
  39944. ! static int  intrser (i)
  39945.   int     i;
  39946.   {
  39947.   #ifndef    BSD42
  39948.       (void) signal (SIGINT, intrser);
  39949. ! #endif    not BSD42
  39950.   
  39951.       discard (stdout);
  39952.   
  39953. --- 1849,1860 ----
  39954.   
  39955.   /* ARGSUSED */
  39956.   
  39957. ! static TYPESIG  intrser (i)
  39958.   int     i;
  39959.   {
  39960.   #ifndef    BSD42
  39961.       (void) signal (SIGINT, intrser);
  39962. ! #endif    /* not BSD42 */
  39963.   
  39964.       discard (stdout);
  39965.   
  39966. ***************
  39967. *** 1834,1851 ****
  39968.   #ifdef    BSD42
  39969.       if (should_intr)
  39970.       longjmp (sigenv, NOTOK);
  39971. ! #endif    BSD42
  39972.   }
  39973.   
  39974.   
  39975.   /* ARGSUSED */
  39976.   
  39977. ! static int  pipeser (i)
  39978.   int     i;
  39979.   {
  39980.   #ifndef    BSD42
  39981.       (void) signal (SIGPIPE, pipeser);
  39982. ! #endif    not BSD42
  39983.   
  39984.       if (broken_pipe++ == 0)
  39985.       fprintf (stderr, "broken pipe\n");
  39986. --- 1862,1879 ----
  39987.   #ifdef    BSD42
  39988.       if (should_intr)
  39989.       longjmp (sigenv, NOTOK);
  39990. ! #endif    /* BSD42 */
  39991.   }
  39992.   
  39993.   
  39994.   /* ARGSUSED */
  39995.   
  39996. ! static TYPESIG  pipeser (i)
  39997.   int     i;
  39998.   {
  39999.   #ifndef    BSD42
  40000.       (void) signal (SIGPIPE, pipeser);
  40001. ! #endif    /* not BSD42 */
  40002.   
  40003.       if (broken_pipe++ == 0)
  40004.       fprintf (stderr, "broken pipe\n");
  40005. ***************
  40006. *** 1854,1871 ****
  40007.   #ifdef    BSD42
  40008.       if (should_intr)
  40009.       longjmp (sigenv, NOTOK);
  40010. ! #endif    BSD42
  40011.   }
  40012.   
  40013.   
  40014.   /* ARGSUSED */
  40015.   
  40016. ! static int  quitser (i)
  40017.   int     i;
  40018.   {
  40019.   #ifndef    BSD42
  40020.       (void) signal (SIGQUIT, quitser);
  40021. ! #endif    BSD42
  40022.   
  40023.       told_to_quit++;
  40024.       interrupted++;
  40025. --- 1882,1899 ----
  40026.   #ifdef    BSD42
  40027.       if (should_intr)
  40028.       longjmp (sigenv, NOTOK);
  40029. ! #endif    /* BSD42 */
  40030.   }
  40031.   
  40032.   
  40033.   /* ARGSUSED */
  40034.   
  40035. ! static TYPESIG  quitser (i)
  40036.   int     i;
  40037.   {
  40038.   #ifndef    BSD42
  40039.       (void) signal (SIGQUIT, quitser);
  40040. ! #endif    /* BSD42 */
  40041.   
  40042.       told_to_quit++;
  40043.       interrupted++;
  40044. ***************
  40045. *** 1872,1878 ****
  40046.   #ifdef    BSD42
  40047.       if (should_intr)
  40048.       longjmp (sigenv, NOTOK);
  40049. ! #endif    BSD42
  40050.   }
  40051.   
  40052.   /*   */
  40053. --- 1900,1906 ----
  40054.   #ifdef    BSD42
  40055.       if (should_intr)
  40056.       longjmp (sigenv, NOTOK);
  40057. ! #endif    /* BSD42 */
  40058.   }
  40059.   
  40060.   /*   */
  40061. ***************
  40062. *** 2225,2231 ****
  40063.   
  40064.   /* ARGSUSED */
  40065.   
  40066. ! static int alrmser (i)
  40067.   int    i;
  40068.   {
  40069.       longjmp (peerenv, DONE);
  40070. --- 2253,2259 ----
  40071.   
  40072.   /* ARGSUSED */
  40073.   
  40074. ! static TYPESIG alrmser (i)
  40075.   int    i;
  40076.   {
  40077.       longjmp (peerenv, DONE);
  40078. ***************
  40079. *** 2265,2271 ****
  40080.   
  40081.   #ifdef    SIGTSTP
  40082.       (void) signal (SIGTSTP, tstat);
  40083. ! #endif    SIGTSTP
  40084.       return vmhtty;
  40085.   }
  40086.   
  40087. --- 2293,2299 ----
  40088.   
  40089.   #ifdef    SIGTSTP
  40090.       (void) signal (SIGTSTP, tstat);
  40091. ! #endif    /* SIGTSTP */
  40092.       return vmhtty;
  40093.   }
  40094.   
  40095. ***************
  40096. *** 2279,2285 ****
  40097.   
  40098.   #ifdef    SIGTSTP
  40099.       (void) signal (SIGTSTP, SIG_IGN);
  40100. ! #endif    SIGTSTP
  40101.   
  40102.       if (vmhtty != OK)
  40103.       return NOTOK;
  40104. --- 2307,2313 ----
  40105.   
  40106.   #ifdef    SIGTSTP
  40107.       (void) signal (SIGTSTP, SIG_IGN);
  40108. ! #endif    /* SIGTSTP */
  40109.   
  40110.       if (vmhtty != OK)
  40111.       return NOTOK;
  40112. *** ../mh-6.7.2/uip/mshcmds.c    Thu Jan 23 14:58:19 1992
  40113. --- uip/mshcmds.c    Mon Dec 14 16:21:27 1992
  40114. ***************
  40115. *** 1,7 ****
  40116.   /* mshcmds.c - command handlers in msh */
  40117.   #ifndef    lint
  40118. ! static char ident[] = "@(#)$Id: mshcmds.c,v 1.7 1992/01/23 22:58:03 jromine Exp $";
  40119. ! #endif    lint
  40120.   
  40121.   #include "../h/mh.h"
  40122.   #include "../h/dropsbr.h"
  40123. --- 1,7 ----
  40124.   /* mshcmds.c - command handlers in msh */
  40125.   #ifndef    lint
  40126. ! static char ident[] = "@(#)$Id: mshcmds.c,v 1.25 1992/12/15 00:20:22 jromine Exp $";
  40127. ! #endif    /* lint */
  40128.   
  40129.   #include "../h/mh.h"
  40130.   #include "../h/dropsbr.h"
  40131. ***************
  40132. *** 8,14 ****
  40133. --- 8,20 ----
  40134.   #include "../h/formatsbr.h"
  40135.   #include "../h/scansbr.h"
  40136.   #include "../zotnet/tws.h"
  40137. + #ifdef    _AIX        /* AIX 1.2.1 <stdio.h> declares getws() */
  40138. + #define getws _getws
  40139. + #endif
  40140.   #include <stdio.h>
  40141. + #ifdef    _AIX
  40142. + #undef getws
  40143. + #endif
  40144.   #include "../zotnet/mts.h"
  40145.   #include <ctype.h>
  40146.   #include <errno.h>
  40147. ***************
  40148. *** 33,38 ****
  40149. --- 39,47 ----
  40150.   void clear_screen ();
  40151.   static int     eom_action ();
  40152.   static FP    mhl_action ();
  40153. + #ifdef    MIME
  40154. + static int     nontext();
  40155. + #endif
  40156.   
  40157.   
  40158.   static burst(), forw(), rmm(), show(), ask(), copy_message(), copy_digest();
  40159. ***************
  40160. *** 42,47 ****
  40161. --- 51,66 ----
  40162.   static int    getws ();
  40163.   static char    *sosmash ();
  40164.   
  40165. + #if    defined(NNTP) && defined(MPOP)
  40166. + #undef    MPOP
  40167. + #endif
  40168. + #ifdef    MPOP
  40169. + #ifdef    BPOP
  40170. + extern    int    pmsh;
  40171. + extern    char    response[];
  40172. + #endif
  40173. + #endif /* MPOP */
  40174. + 
  40175.   /*   */
  40176.   
  40177.   forkcmd (args, pgm)
  40178. ***************
  40179. *** 116,122 ****
  40180.   #define    DIHELP    12
  40181.       "help", 4,
  40182.   
  40183. !     NULL, NULL
  40184.   };
  40185.   
  40186.   /*   */
  40187. --- 135,141 ----
  40188.   #define    DIHELP    12
  40189.       "help", 4,
  40190.   
  40191. !     NULL, 0
  40192.   };
  40193.   
  40194.   /*   */
  40195. ***************
  40196. *** 222,228 ****
  40197.   #define    EXHELP    6
  40198.       "help", 4,
  40199.   
  40200. !     NULL, NULL
  40201.   };
  40202.   
  40203.   /*   */
  40204. --- 241,247 ----
  40205.   #define    EXHELP    6
  40206.       "help", 4,
  40207.   
  40208. !     NULL, 0
  40209.   };
  40210.   
  40211.   /*   */
  40212. ***************
  40213. *** 336,341 ****
  40214. --- 355,361 ----
  40215.               msgp;
  40216.       long    pos;
  40217.       char    c,
  40218. +         cc,
  40219.               buffer[BUFSIZ];
  40220.       register FILE *zp;
  40221.   
  40222. ***************
  40223. *** 347,353 ****
  40224.       }
  40225.   
  40226.       pos = ftell (zp = msh_ready (msgnum, 1));
  40227. !     for (msgp = 1; msgp <= MAXFOLDER;) {
  40228.       while (fgets (buffer, sizeof buffer, zp) != NULL
  40229.           && buffer[0] == '\n'
  40230.           && pos < Msgs[msgnum].m_stop)
  40231. --- 367,373 ----
  40232.       }
  40233.   
  40234.       pos = ftell (zp = msh_ready (msgnum, 1));
  40235. !     for (msgp = 0; msgp <= MAXFOLDER;) {
  40236.       while (fgets (buffer, sizeof buffer, zp) != NULL
  40237.           && buffer[0] == '\n'
  40238.           && pos < Msgs[msgnum].m_stop)
  40239. ***************
  40240. *** 357,369 ****
  40241.       (void) fseek (zp, pos, 0);
  40242.       smsgs[msgp].m_start = pos;
  40243.   
  40244. !     for (c = NULL;
  40245. !         fgets (buffer, sizeof buffer, zp) != NULL
  40246. !         && pos < Msgs[msgnum].m_stop;
  40247.           c = buffer[0])
  40248.           if (strncmp (buffer, delim3, ld3) == 0
  40249. !             && peekc (zp) == '\n'
  40250. !             && (msgp == 1 || c == '\n'))
  40251.           break;
  40252.           else
  40253.           pos += (long) strlen (buffer);
  40254. --- 377,389 ----
  40255.       (void) fseek (zp, pos, 0);
  40256.       smsgs[msgp].m_start = pos;
  40257.   
  40258. !     for (c = 0;
  40259. !         pos < Msgs[msgnum].m_stop
  40260. !         && fgets (buffer, sizeof buffer, zp) != NULL;
  40261.           c = buffer[0])
  40262.           if (strncmp (buffer, delim3, ld3) == 0
  40263. !             && (msgp == 1 || c == '\n')
  40264. !             && peekc (zp) == '\n')
  40265.           break;
  40266.           else
  40267.           pos += (long) strlen (buffer);
  40268. ***************
  40269. *** 370,387 ****
  40270.   
  40271.       wasdlm = strncmp (buffer, delim3, ld3) == 0;
  40272.       if (smsgs[msgp].m_start != pos)
  40273. !         smsgs[msgp++].m_stop = c == '\n' && wasdlm ? pos - 1 : pos;
  40274.       if (feof (zp) || pos >= Msgs[msgnum].m_stop) {
  40275. !         if (wasdlm) {
  40276.           smsgs[msgp - 1].m_stop -= ((long) strlen (buffer) + 1);
  40277. -         msgp++;        /* fake "End of XXX Digest" */
  40278. -         }
  40279.           break;
  40280.       }
  40281.       pos += (long) strlen (buffer);
  40282.       }
  40283.   
  40284. !     switch (--msgp) {        /* toss "End of XXX Digest" */
  40285.       case 0: 
  40286.           adios (NULLCP, "burst() botch -- you lose big");
  40287.   
  40288. --- 390,405 ----
  40289.   
  40290.       wasdlm = strncmp (buffer, delim3, ld3) == 0;
  40291.       if (smsgs[msgp].m_start != pos)
  40292. !         smsgs[msgp++].m_stop = (c == '\n' && wasdlm) ? pos - 1 : pos;
  40293.       if (feof (zp) || pos >= Msgs[msgnum].m_stop) {
  40294. !         if (wasdlm)
  40295.           smsgs[msgp - 1].m_stop -= ((long) strlen (buffer) + 1);
  40296.           break;
  40297.       }
  40298.       pos += (long) strlen (buffer);
  40299.       }
  40300.   
  40301. !     switch (msgp--) {        /* toss "End of XXX Digest" */
  40302.       case 0: 
  40303.           adios (NULLCP, "burst() botch -- you lose big");
  40304.   
  40305. ***************
  40306. *** 393,405 ****
  40307.       default: 
  40308.           if (verbosw)
  40309.           printf ("%d message%s exploded from digest %d\n",
  40310. !             msgp - 1, msgp - 1 != 1 ? "s" : "", msgnum);
  40311. !         if (msgp == 2)
  40312. !         msgp++;
  40313.           break;
  40314.       }
  40315.   
  40316. -     msgp--;
  40317.       if ((i = msgp + mp -> hghmsg) > MAXFOLDER) {
  40318.       advise (NULLCP, "more than %d messages", MAXFOLDER);
  40319.       return NOTOK;
  40320. --- 411,420 ----
  40321.       default: 
  40322.           if (verbosw)
  40323.           printf ("%d message%s exploded from digest %d\n",
  40324. !             msgp, msgp != 1 ? "s" : "", msgnum);
  40325.           break;
  40326.       }
  40327.   
  40328.       if ((i = msgp + mp -> hghmsg) > MAXFOLDER) {
  40329.       advise (NULLCP, "more than %d messages", MAXFOLDER);
  40330.       return NOTOK;
  40331. ***************
  40332. *** 408,419 ****
  40333.       adios (NULLCP, "unable to allocate folder storage");
  40334.   
  40335.       j = mp -> hghmsg;
  40336. !     mp -> hghmsg += msgp - 1;
  40337. !     mp -> nummsg += msgp - 1;
  40338.       if (mp -> hghsel > msgnum)
  40339. !     mp -> hghsel += msgp - 1;
  40340.   
  40341. !     if (inplace && msgp > 1)
  40342.       for (i = mp -> hghmsg; j > msgnum; i--, j--) {
  40343.           if (verbosw)
  40344.           printf ("message %d becomes message %d\n", j, i);
  40345. --- 423,434 ----
  40346.       adios (NULLCP, "unable to allocate folder storage");
  40347.   
  40348.       j = mp -> hghmsg;
  40349. !     mp -> hghmsg += msgp;
  40350. !     mp -> nummsg += msgp;
  40351.       if (mp -> hghsel > msgnum)
  40352. !     mp -> hghsel += msgp;
  40353.   
  40354. !     if (inplace)
  40355.       for (i = mp -> hghmsg; j > msgnum; i--, j--) {
  40356.           if (verbosw)
  40357.           printf ("message %d becomes message %d\n", j, i);
  40358. ***************
  40359. *** 434,441 ****
  40360.       (void) readid (msgnum);
  40361.   
  40362.       mp -> msgstats[msgnum] &= ~SELECTED;
  40363. !     i = inplace ? msgnum + msgp - 1 : mp -> hghmsg;
  40364. !     for (j = msgp; j >= (inplace ? 1 : 2); i--, j--) {
  40365.       if (verbosw && i != msgnum)
  40366.           printf ("message %d of digest %d becomes message %d\n",
  40367.               j, msgnum, i);
  40368. --- 449,456 ----
  40369.       (void) readid (msgnum);
  40370.   
  40371.       mp -> msgstats[msgnum] &= ~SELECTED;
  40372. !     i = inplace ? msgnum + msgp : mp -> hghmsg;
  40373. !     for (j = msgp; j >= (inplace ? 0 : 1); i--, j--) {
  40374.       if (verbosw && i != msgnum)
  40375.           printf ("message %d of digest %d becomes message %d\n",
  40376.               j, msgnum, i);
  40377. ***************
  40378. *** 475,481 ****
  40379.   #define    FIHELP    9
  40380.       "help", 4,
  40381.   
  40382. !     NULL, NULL
  40383.   };
  40384.   
  40385.   /*   */
  40386. --- 490,496 ----
  40387.   #define    FIHELP    9
  40388.       "help", 4,
  40389.   
  40390. !     NULL, 0
  40391.   };
  40392.   
  40393.   /*   */
  40394. ***************
  40395. *** 652,658 ****
  40396.   #define    FLHELP    15
  40397.       "help", 4,
  40398.   
  40399. !     NULL, NULL
  40400.   };
  40401.   
  40402.   /*   */
  40403. --- 667,673 ----
  40404.   #define    FLHELP    15
  40405.       "help", 4,
  40406.   
  40407. !     NULL, 0
  40408.   };
  40409.   
  40410.   /*   */
  40411. ***************
  40412. *** 737,743 ****
  40413.       }
  40414.   
  40415.       if (folder) {
  40416. !     if (*folder == NULL) {
  40417.           advise (NULLCP, "null folder names are not permitted");
  40418.           return;
  40419.       }
  40420. --- 752,758 ----
  40421.       }
  40422.   
  40423.       if (folder) {
  40424. !     if (*folder == 0) {
  40425.           advise (NULLCP, "null folder names are not permitted");
  40426.           return;
  40427.       }
  40428. ***************
  40429. *** 839,844 ****
  40430. --- 854,865 ----
  40431.   
  40432.   /*   */
  40433.   
  40434. + #ifndef    MIME
  40435. + #define    MIMEminc(a)    (a)
  40436. + #else    /* MIME */
  40437. + #define    MIMEminc(a)    0
  40438. + #endif    /* MIME */
  40439. + 
  40440.   static struct swit forwswit[] = {
  40441.   #define    FOANSW    0
  40442.       "annotate", 0,
  40443. ***************
  40444. *** 866,879 ****
  40445.       "inplace", 0,
  40446.   #define    FONINSW    12
  40447.       "noinplace", 0,
  40448. ! #define    FOWHTSW    13
  40449.       "whatnowproc program", 0,
  40450. ! #define    FONWTSW    14
  40451.       "nowhatnow", 0,
  40452. ! #define    FOHELP    15
  40453.       "help", 4,
  40454.   
  40455. !     NULL, NULL
  40456.   };
  40457.   
  40458.   /*   */
  40459. --- 887,904 ----
  40460.       "inplace", 0,
  40461.   #define    FONINSW    12
  40462.       "noinplace", 0,
  40463. ! #define    FOMISW    13
  40464. !     "mime", MIMEminc(-4),
  40465. ! #define    FONMISW    14
  40466. !     "nomime", MIMEminc(-6),
  40467. ! #define    FOWHTSW    15
  40468.       "whatnowproc program", 0,
  40469. ! #define    FONWTSW    16
  40470.       "nowhatnow", 0,
  40471. ! #define    FOHELP    17
  40472.       "help", 4,
  40473.   
  40474. !     NULL, 0
  40475.   };
  40476.   
  40477.   /*   */
  40478. ***************
  40479. *** 913,918 ****
  40480. --- 938,945 ----
  40481.           case FONANSW: 
  40482.           case FOINSW: 
  40483.           case FONINSW: 
  40484. +         case FOMISW: 
  40485. +         case FONMISW: 
  40486.               continue;
  40487.   
  40488.           case FONDFSW:
  40489. ***************
  40490. *** 959,965 ****
  40491.   
  40492.                       /* foil search of .mh_profile */
  40493.       (void) sprintf (buf, "%sXXXXXX", invo_name);
  40494. !     vec[0] = mktemp (buf);
  40495.       vec[vecp++] = "-file";
  40496.       vec[vecp] = NULL;
  40497.       if (!msgp)
  40498. --- 986,992 ----
  40499.   
  40500.                       /* foil search of .mh_profile */
  40501.       (void) sprintf (buf, "%sXXXXXX", invo_name);
  40502. !     vec[0] = (char *)mktemp (buf);
  40503.       vec[vecp++] = "-file";
  40504.       vec[vecp] = NULL;
  40505.       if (!msgp)
  40506. ***************
  40507. *** 1151,1157 ****
  40508.   #define    MDBUGSW    9
  40509.       "debug", -5,
  40510.   
  40511. !     NULL, NULL
  40512.   };
  40513.   
  40514.   /*   */
  40515. --- 1178,1184 ----
  40516.   #define    MDBUGSW    9
  40517.       "debug", -5,
  40518.   
  40519. !     NULL, 0
  40520.   };
  40521.   
  40522.   /*   */
  40523. ***************
  40524. *** 1271,1280 ****
  40525.   #ifndef    MTR
  40526.       printf ("lowoff=%d hghoff=%d\n",
  40527.           mp -> lowoff, mp -> hghoff);
  40528. ! #else    MTR
  40529.       printf ("lowoff=%d hghoff=%d msgbase=0x%x msgstats=0x%x\n",
  40530.           mp -> lowoff, mp -> hghoff, mp -> msgbase, mp -> msgstats);
  40531. ! #endif    MTR
  40532.       }
  40533.   
  40534.       if (seqp == 0 && (addsw || deletesw)) {
  40535. --- 1298,1307 ----
  40536.   #ifndef    MTR
  40537.       printf ("lowoff=%d hghoff=%d\n",
  40538.           mp -> lowoff, mp -> hghoff);
  40539. ! #else    /* MTR */
  40540.       printf ("lowoff=%d hghoff=%d msgbase=0x%x msgstats=0x%x\n",
  40541.           mp -> lowoff, mp -> hghoff, mp -> msgbase, mp -> msgstats);
  40542. ! #endif    /* MTR */
  40543.       }
  40544.   
  40545.       if (seqp == 0 && (addsw || deletesw)) {
  40546. ***************
  40547. *** 1340,1345 ****
  40548. --- 1367,1542 ----
  40549.   
  40550.   /*   */
  40551.   
  40552. + #ifdef MIME
  40553. + static struct swit mhnswit[] = {
  40554. + #define    MHNAUTOSW      0
  40555. +     "auto", 0,
  40556. + #define    MHNNAUTOSW      1
  40557. +     "noauto", 0,
  40558. + #define    MHNDEBUGSW      2
  40559. +     "debug", -5,
  40560. + #define    MHNEBCDICSW      3
  40561. +     "ebcdicsafe", 0,
  40562. + #define    MHNNEBCDICSW     4
  40563. +     "noebcdicsafe", 0,
  40564. + #define    MHNFORMSW      5
  40565. +     "form formfile", 4,
  40566. + #define    MHNHEADSW      6
  40567. +     "headers", 0,
  40568. + #define    MHNNHEADSW      7
  40569. +     "noheaders", 0,
  40570. + #define    MHNLISTSW      8
  40571. +     "list", 0,
  40572. + #define    MHNNLISTSW      9
  40573. +     "nolist", 0,
  40574. + #define    MHNPARTSW     10
  40575. +     "part number", 0,
  40576. + #define    MHNSIZESW     11
  40577. +     "realsize", 0,
  40578. + #define    MHNNSIZESW     12
  40579. +     "norealsize", 0,
  40580. + #define    MHNRFC934SW     13
  40581. +     "rfc934mode", 0,
  40582. + #define    MHNNRFC934SW     14
  40583. +     "norfc934mode", 0,
  40584. + #define    MHNSERIALSW     15
  40585. +     "serialonly", 0,
  40586. + #define    MHNNSERIALSW     16
  40587. +     "noserialonly", 0,
  40588. + #define    MHNSHOWSW     17
  40589. +     "show", 0,
  40590. + #define    MHNNSHOWSW     18
  40591. +     "noshow", 0,
  40592. + #define    MHNSTORESW     19
  40593. +     "store", 0,
  40594. + #define    MHNNSTORESW     20
  40595. +     "nostore", 0,
  40596. + #define    MHNTYPESW     21
  40597. +     "type content", 0,
  40598. + #define    MHNVERBSW     22
  40599. +     "verbose", 0,
  40600. + #define    MHNNVERBSW     23
  40601. +     "noverbose", 0,
  40602. + #define    MHNHELPSW     24
  40603. +     "help", 4,
  40604. + #define    MHNPROGSW     25
  40605. +     "moreproc program", -4,
  40606. + #define    MHNNPROGSW     26
  40607. +     "nomoreproc", -3,
  40608. + #define    MHNLENSW     27
  40609. +     "length lines", -4,
  40610. + #define    MHNWIDSW     28
  40611. +     "width columns", -4,
  40612. + 
  40613. +     NULL, 0
  40614. + };
  40615. + 
  40616. + /*   */
  40617. + 
  40618. + mhncmd (args)
  40619. + char  **args;
  40620. + {
  40621. +     int     msgp = 0,
  40622. +         vecp = 1,
  40623. +         i,
  40624. +         msgnum;
  40625. +     char   *cp,
  40626. +             buf[BUFSIZ],
  40627. +        *msgs[MAXARGS],
  40628. +            *vec[MAXARGS];
  40629. + 
  40630. +     if (fmsh) {
  40631. +     forkcmd (args, cmd_name);
  40632. +     return;
  40633. +     }
  40634. + 
  40635. +     while (cp = *args++) {
  40636. +     if (*cp == '-')
  40637. +         switch (smatch (++cp, mhnswit)) {
  40638. +         case AMBIGSW: 
  40639. +             ambigsw (cp, mhnswit);
  40640. +             return;
  40641. +         case UNKWNSW: 
  40642. +             fprintf (stderr, "-%s unknown\n", cp);
  40643. +             return;
  40644. +         case MHNHELPSW:
  40645. +             (void) sprintf (buf, "%s [msgs] [switches]", cmd_name);
  40646. +             help (buf, mhnswit);
  40647. +             return;
  40648. + 
  40649. +         case MHNAUTOSW:
  40650. +         case MHNNAUTOSW:
  40651. +         case MHNDEBUGSW:
  40652. +         case MHNEBCDICSW:
  40653. +         case MHNNEBCDICSW:
  40654. +         case MHNHEADSW:
  40655. +         case MHNNHEADSW:
  40656. +         case MHNLISTSW:
  40657. +         case MHNNLISTSW:
  40658. +         case MHNSIZESW:
  40659. +         case MHNNSIZESW:
  40660. +         case MHNRFC934SW:
  40661. +         case MHNNRFC934SW:
  40662. +         case MHNSERIALSW:
  40663. +         case MHNNSERIALSW:
  40664. +         case MHNSHOWSW:
  40665. +         case MHNNSHOWSW:
  40666. +         case MHNSTORESW:
  40667. +         case MHNNSTORESW:
  40668. +         case MHNVERBSW:
  40669. +         case MHNNVERBSW:
  40670. +         case MHNNPROGSW:
  40671. +             vec[vecp++] = --cp;
  40672. +             continue;
  40673. + 
  40674. +         case MHNFORMSW:
  40675. +         case MHNPARTSW:
  40676. +         case MHNTYPESW:
  40677. +         case MHNPROGSW:
  40678. +         case MHNLENSW:
  40679. +         case MHNWIDSW:
  40680. +             vec[vecp++] = --cp;
  40681. +             if (!(cp = *args++) || *cp == '-') {
  40682. +             advise (NULLCP, "missing argument to %s", args[-2]);
  40683. +             return;
  40684. +             }
  40685. +             vec[vecp++] = cp;
  40686. +             continue;
  40687. +         }
  40688. +     if (*cp == '+' || *cp == '@') {
  40689. +         advise (NULLCP, "sorry, no folders allowed!");
  40690. +         return;
  40691. +     }
  40692. +     else
  40693. +         msgs[msgp++] = cp;
  40694. +     }
  40695. + 
  40696. +     vec[0] = cmd_name;
  40697. +     vec[vecp++] = "-file";
  40698. +     vec[vecp] = NULL;
  40699. +     if (!msgp)
  40700. +     msgs[msgp++] = "cur";
  40701. +     for (msgnum = 0; msgnum < msgp; msgnum++)
  40702. +     if (!m_convert (mp, msgs[msgnum]))
  40703. +         return;
  40704. +     m_setseq (mp);
  40705. + 
  40706. +     interrupted = 0;
  40707. +     for (msgnum = mp -> lowsel;
  40708. +         msgnum <= mp -> hghsel && !interrupted;
  40709. +         msgnum++)
  40710. +     if (mp -> msgstats[msgnum] & SELECTED)
  40711. +         if (process (msgnum, cmd_name, vecp, vec)) {
  40712. +         mp -> msgstats[msgnum] &= ~SELECTED;
  40713. +         mp -> numsel--;
  40714. +         }
  40715. + 
  40716. +     m_setcur (mp, mp -> hghsel);
  40717. + }
  40718. + 
  40719. + /*   */
  40720. + 
  40721. + #endif /* MIME */
  40722.   static struct swit packswit[] = {
  40723.   #define    PAFISW    0
  40724.       "file name", 0,
  40725. ***************
  40726. *** 1347,1353 ****
  40727.   #define    PAHELP    1
  40728.       "help", 4,
  40729.   
  40730. !     NULL, NULL
  40731.   };
  40732.   
  40733.   /*   */
  40734. --- 1544,1550 ----
  40735.   #define    PAHELP    1
  40736.       "help", 4,
  40737.   
  40738. !     NULL, 0
  40739.   };
  40740.   
  40741.   /*   */
  40742. ***************
  40743. *** 1537,1543 ****
  40744.   #define    PIHELP    22
  40745.       "help", 4,
  40746.   
  40747. !     NULL, NULL
  40748.   };
  40749.   
  40750.   /*   */
  40751. --- 1734,1740 ----
  40752.   #define    PIHELP    22
  40753.       "help", 4,
  40754.   
  40755. !     NULL, 0
  40756.   };
  40757.   
  40758.   /*   */
  40759. ***************
  40760. *** 1740,1746 ****
  40761.   #define    REHELP    20
  40762.       "help", 4,
  40763.   
  40764. !     NULL, NULL
  40765.   };
  40766.   
  40767.   /*   */
  40768. --- 1937,1943 ----
  40769.   #define    REHELP    20
  40770.       "help", 4,
  40771.   
  40772. !     NULL, 0
  40773.   };
  40774.   
  40775.   /*   */
  40776. ***************
  40777. *** 1841,1847 ****
  40778.   #define    RMHELP    0
  40779.       "help", 4,
  40780.   
  40781. !     NULL, NULL
  40782.   };
  40783.   
  40784.   /*   */
  40785. --- 2038,2044 ----
  40786.   #define    RMHELP    0
  40787.       "help", 4,
  40788.   
  40789. !     NULL, 0
  40790.   };
  40791.   
  40792.   /*   */
  40793. ***************
  40794. *** 1925,1930 ****
  40795. --- 2122,2133 ----
  40796.       if (mp -> msgstats[msgnum] & SELECTED) {
  40797.           mp -> msgstats[msgnum] |= DELETED;
  40798.           mp -> msgstats[msgnum] &= ~EXISTS;
  40799. + #ifdef    MPOP
  40800. + #ifdef    BPOP
  40801. +         if (pmsh && pop_dele (msgnum) != OK)
  40802. +         fprintf (stderr, "%s", response);
  40803. + #endif
  40804. + #endif /* MPOP */
  40805.       }
  40806.   
  40807.       if ((mp -> nummsg -= mp -> numsel) <= 0) {
  40808. ***************
  40809. *** 1971,1977 ****
  40810.   #define    SCHELP    7
  40811.       "help", 4,
  40812.   
  40813. !     NULL, NULL
  40814.   };
  40815.   
  40816.   /*   */
  40817. --- 2174,2180 ----
  40818.   #define    SCHELP    7
  40819.       "help", 4,
  40820.   
  40821. !     NULL, 0
  40822.   };
  40823.   
  40824.   /*   */
  40825. ***************
  40826. *** 1995,2000 ****
  40827. --- 2198,2208 ----
  40828.          *nfs,
  40829.              *msgs[MAXARGS];
  40830.       register FILE *zp;
  40831. + #ifdef    MPOP
  40832. + #ifdef    BPOP
  40833. +     static int p_optim = 0;
  40834. + #endif
  40835. + #endif /* MPOP */
  40836.       static int s_optim = 0;
  40837.       static char *s_form = NULL,
  40838.           *s_format = NULL;
  40839. ***************
  40840. *** 2072,2081 ****
  40841. --- 2280,2362 ----
  40842.       s_optim = optim = 1;
  40843.       s_form = form ? getcpy (form) : NULL;
  40844.       s_format = format ? getcpy (format) : NULL;
  40845. + 
  40846. + #ifdef    MPOP
  40847. + #ifdef    BPOP
  40848. +     if (pmsh) {
  40849. +         int        i;
  40850. +         char   *dp,
  40851. +            *ep,
  40852. +            *fp;
  40853. + 
  40854. +         if (width == 0)
  40855. +         width = sc_width ();
  40856. + 
  40857. +         for (dp = nfs, i = 0; *dp; dp++, i++)
  40858. +         if (*dp == '\\' || *dp == '"' || *dp == '\n')
  40859. +             i++;
  40860. +         i++;
  40861. +         if ((ep = malloc ((unsigned) i)) == NULL)
  40862. +         adios (NULLCP, "out of memory");
  40863. +         for (dp = nfs, fp = ep; *dp; dp++) {
  40864. +         if (*dp == '\n') {
  40865. +             *fp++ = '\\', *fp++ = 'n';
  40866. +             continue;
  40867. +         }
  40868. +         if (*dp == '"' || *dp == '\\')
  40869. +             *fp++ = '\\';
  40870. +         *fp++ = *dp;
  40871. +         }
  40872. +         *fp = NULL;
  40873. + 
  40874. +         if (pop_command ("XTND SCAN %d \"%s\"", width, ep) == OK)
  40875. +         p_optim = 1;
  40876. + 
  40877. +         free (ep);
  40878. +     }
  40879. + #endif
  40880. + #endif    /* MPOP */
  40881.       }
  40882.       else
  40883.       optim = equiv (s_form, form) && equiv (s_format, format);
  40884.   
  40885. + #ifdef    MPOP
  40886. + #ifdef    BPOP
  40887. +     if (p_optim && optim) {
  40888. +     for (msgnum = mp -> lowmsg; msgnum <= mp -> hghmsg; msgnum++)
  40889. +         if (!(mp -> msgstats[msgnum] & SELECTED) || Msgs[msgnum].m_scanl)
  40890. +         break;
  40891. +     if (msgnum > mp -> hghmsg && pop_command ("LIST") == OK) {
  40892. +         fprintf (stderr, "Stand-by...");
  40893. +         fflush (stderr);
  40894. + 
  40895. +         for (;;) {
  40896. +         int    size;
  40897. + 
  40898. +         switch (pop_multiline ()) {
  40899. +             case NOTOK:
  40900. +                 fprintf (stderr, "%s", response);
  40901. +                 /* and fall... */
  40902. +             case DONE:
  40903. +                 fprintf (stderr,"\n");
  40904. +                 break;
  40905. + 
  40906. +             case OK:
  40907. +             if (sscanf (response, "%d %d", &msgnum, &size) == 2
  40908. +                     && mp -> lowmsg <= msgnum
  40909. +                     && msgnum <= mp -> hghmsg
  40910. +                     && (cp = index (response, '#'))
  40911. +                     && *++cp)
  40912. +                 Msgs[msgnum].m_scanl = concat (cp, "\n", NULLCP);
  40913. +             continue;
  40914. +         }
  40915. +         break;
  40916. +         }
  40917. +     }
  40918. +     }
  40919. + #endif
  40920. + #endif /* MPOP */
  40921. + 
  40922.       interrupted = 0;
  40923.       for (msgnum = mp -> lowsel;
  40924.           msgnum <= mp -> hghsel && !interrupted;
  40925. ***************
  40926. *** 2084,2092 ****
  40927.           if (optim && Msgs[msgnum].m_scanl)
  40928.           printf ("%s", Msgs[msgnum].m_scanl);
  40929.           else {
  40930.           zp = msh_ready (msgnum, 0);
  40931.           switch (state = scan (zp, msgnum, 0, nfs, width,
  40932. !             msgnum == mp -> curmsg, 
  40933.               headersw ? (fmsh ? fmsh : mp -> foldpath) : (char *)0,
  40934.               fmsh ? 0L : (long) (Msgs[msgnum].m_stop - Msgs[msgnum].m_start),
  40935.               1)) {
  40936. --- 2365,2389 ----
  40937.           if (optim && Msgs[msgnum].m_scanl)
  40938.           printf ("%s", Msgs[msgnum].m_scanl);
  40939.           else {
  40940. + #ifdef    MPOP
  40941. + #ifdef    BPOP
  40942. +         if (p_optim
  40943. +                 && optim
  40944. +             && (mp -> msgstats[msgnum] & VIRTUAL)
  40945. +                 && pop_command ("LIST %d", msgnum) == OK
  40946. +             && (cp = index (response, '#'))
  40947. +                 && *++cp) {
  40948. +             Msgs[msgnum].m_scanl = concat (cp, "\n", NULLCP);
  40949. +             printf ("%s", Msgs[msgnum].m_scanl);            
  40950. +             continue;
  40951. +         }
  40952. + #endif
  40953. + #endif /* MPOP */
  40954. + 
  40955.           zp = msh_ready (msgnum, 0);
  40956.           switch (state = scan (zp, msgnum, 0, nfs, width,
  40957. !             msgnum == mp -> curmsg,
  40958. !             mp -> msgstats[msgnum] & UNSEEN,    /* ?? */
  40959.               headersw ? (fmsh ? fmsh : mp -> foldpath) : (char *)0,
  40960.               fmsh ? 0L : (long) (Msgs[msgnum].m_stop - Msgs[msgnum].m_start),
  40961.               1)) {
  40962. ***************
  40963. *** 2139,2145 ****
  40964.   #define    SHHELP    10
  40965.       "help", 4,
  40966.   
  40967. !     NULL, NULL
  40968.   };
  40969.   
  40970.   /*   */
  40971. --- 2436,2442 ----
  40972.   #define    SHHELP    10
  40973.       "help", 4,
  40974.   
  40975. !     NULL, 0
  40976.   };
  40977.   
  40978.   /*   */
  40979. ***************
  40980. *** 2239,2244 ****
  40981. --- 2536,2553 ----
  40982.           return;
  40983.       m_setseq (mp);
  40984.   
  40985. + #ifdef    MIME
  40986. +     if (!nshow && !getenv ("NOMHNPROC"))
  40987. +     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  40988. +         if ((mp -> msgstats[msgnum] & SELECTED) && nontext (msgnum)) {
  40989. +         proc = (cp = m_find ("mhnproc")) ? cp : "mhn";
  40990. +         vec[vecp++] = "-show";
  40991. +         vec[vecp++] = "-file";
  40992. +         vec[vecp] = NULL;
  40993. +         goto finish;
  40994. +         }
  40995. + #endif    /* MIME */
  40996. + 
  40997.       if (nshow)
  40998.       proc = "cat";
  40999.       else
  41000. ***************
  41001. *** 2247,2252 ****
  41002. --- 2556,2562 ----
  41003.           mhl++;
  41004.       }
  41005.   
  41006. + finish: ;
  41007.       seen = m_seqflag (mp, "unseen");
  41008.       vec[0] = r1bindex (proc, '/');
  41009.       if (mhl) {
  41010. ***************
  41011. *** 2356,2365 ****
  41012.       printf ("Press <return> to list \"%d\"...", msgnum);
  41013.       }
  41014.       (void) fflush (stdout);
  41015. !     buf[0] = NULL;
  41016.   #ifndef    BSD42
  41017.       (void) read (fileno (stdout), buf, sizeof buf);
  41018. ! #else    BSD42
  41019.       switch (setjmp (sigenv)) {
  41020.       case OK: 
  41021.           should_intr = 1;
  41022. --- 2666,2675 ----
  41023.       printf ("Press <return> to list \"%d\"...", msgnum);
  41024.       }
  41025.       (void) fflush (stdout);
  41026. !     buf[0] = 0;
  41027.   #ifndef    BSD42
  41028.       (void) read (fileno (stdout), buf, sizeof buf);
  41029. ! #else    /* BSD42 */
  41030.       switch (setjmp (sigenv)) {
  41031.       case OK: 
  41032.           should_intr = 1;
  41033. ***************
  41034. *** 2369,2375 ****
  41035.           should_intr = 0;
  41036.           break;
  41037.       }
  41038. ! #endif    BSD42
  41039.       if (index (buf, '\n') == NULL)
  41040.       (void) putchar ('\n');
  41041.   
  41042. --- 2679,2685 ----
  41043.           should_intr = 0;
  41044.           break;
  41045.       }
  41046. ! #endif    /* BSD42 */
  41047.       if (index (buf, '\n') == NULL)
  41048.       (void) putchar ('\n');
  41049.   
  41050. ***************
  41051. *** 2387,2392 ****
  41052. --- 2697,2860 ----
  41053.   
  41054.   /*   */
  41055.   
  41056. + #ifdef    MIME
  41057. + #include "../h/mhn.h"
  41058. + 
  41059. + 
  41060. + static int  nontext (msgnum)
  41061. + int    msgnum;
  41062. + {
  41063. +     int        result,
  41064. +         state;
  41065. +     register char   *bp,
  41066. +             *dp;
  41067. +     char   *cp,
  41068. +         buf[BUFSIZ],
  41069. +         name[NAMESZ];
  41070. +     FILE   *fp;
  41071. + 
  41072. +     if (Msgs[msgnum].m_flags & MHNCHK)
  41073. +     return (Msgs[msgnum].m_flags & MHNYES);
  41074. +     Msgs[msgnum].m_flags |= MHNCHK;
  41075. + 
  41076. +     fp = msh_ready (msgnum, 1);
  41077. + 
  41078. +     for (state = FLD;;)
  41079. +     switch (state = m_getfld (state, name, buf, sizeof buf, fp)) {
  41080. +         case FLD:
  41081. +         case FLDPLUS:
  41082. +         case FLDEOF:
  41083. +             if (uleq (name, TYPE_FIELD)) {
  41084. +             int        passno;
  41085. +             char    c;
  41086. + 
  41087. +             cp = add (buf, NULLCP);
  41088. +             while (state == FLDPLUS) {
  41089. +             state = m_getfld (state, name, buf, sizeof buf, fp);
  41090. +             cp = add (buf, cp);
  41091. +             }
  41092. +             bp = cp;
  41093. +             passno = 1;
  41094. + 
  41095. + again: ;
  41096. +             for (; isspace (*bp); bp++)
  41097. +             continue;
  41098. +             if (*bp == '(') {
  41099. +             int    i;
  41100. + 
  41101. +             for (bp++, i = 0;;) {
  41102. +                 switch (*bp++) {
  41103. +                 case '\0':
  41104. + invalid: ;
  41105. +                     result = 0;
  41106. +                     goto out;
  41107. +                 case '\\':
  41108. +                     if (*bp++ == '\0')
  41109. +                     goto invalid;
  41110. +                         continue;
  41111. +                 case '(':
  41112. +                         i++;
  41113. +                         /* and fall... */
  41114. +                     default:
  41115. +                         continue;
  41116. +                     case ')':
  41117. +                         if (--i < 0)
  41118. +                     break;
  41119. +                 continue;
  41120. +                 }
  41121. +                 break;
  41122. +             }
  41123. +             }
  41124. +             if (passno == 2) {
  41125. +             if (*bp != '/')
  41126. +                 goto invalid;
  41127. +             bp++;
  41128. +             passno = 3;
  41129. +             goto again;
  41130. +             }
  41131. +             for (dp = bp; istoken (*dp); dp++)
  41132. +             continue;
  41133. +             c = *dp, *dp = NULL;
  41134. +             if (*bp == NULL)
  41135. +             goto invalid;
  41136. +             if (passno > 1) {
  41137. +             if (result = !uleq (bp, "plain"))
  41138. +                 goto out;
  41139. +             *dp = c;
  41140. +             for (dp++; isspace (*dp); dp++)
  41141. +                 continue;
  41142. +             if (result = !uprf (dp, "charset"))
  41143. +                 goto out;
  41144. +             dp += sizeof "charset" - 1;
  41145. +             while (isspace (*dp))
  41146. +                 dp++;
  41147. +             if (*dp++ != '=')
  41148. +                 goto invalid;
  41149. +             while (isspace (*dp))
  41150. +                 dp++;
  41151. +             if (*dp == '"') {
  41152. +                 dp++;
  41153. +                 if (strlen (dp) >= sizeof "us-ascii\""
  41154. +                     && *(bp = dp + sizeof "us-ascii" - 1)=='"')
  41155. +                 *bp = NULL;
  41156. +             }
  41157. +             else
  41158. +                 if (strlen (dp) >= sizeof "us-ascii"
  41159. +                     && isspace (*(bp =
  41160. +                         dp + sizeof "us-ascii" - 1)))
  41161. +                 *bp = NULL;
  41162. +             result = !uleq (dp, "us-ascii");
  41163. +             }
  41164. +             else
  41165. +             if (!(result = !uleq (bp, "text"))) {
  41166. +                 *dp = c;
  41167. +                 bp = dp;
  41168. +                 passno = 2;
  41169. +                 goto again;
  41170. +             }
  41171. + 
  41172. + out: ;
  41173. +             free (cp);
  41174. + 
  41175. +             if (result) {
  41176. +             Msgs[msgnum].m_flags |= MHNYES;
  41177. +             return result;
  41178. +             }
  41179. +             break;
  41180. +         }
  41181. +             if (uleq (name, ENCODING_FIELD)) {
  41182. +             cp = add (buf, NULLCP);
  41183. +             while (state == FLDPLUS) {
  41184. +             state = m_getfld (state, name, buf, sizeof buf, fp);
  41185. +             cp = add (buf, cp);
  41186. +             }
  41187. +             for (bp = cp; isspace (*bp); bp++)
  41188. +             continue;
  41189. +             for (dp = bp; istoken (*dp); dp++)
  41190. +             continue;
  41191. +             *dp = NULL;
  41192. +             if (result = !uleq (bp, "7bit"))
  41193. +                 Msgs[msgnum].m_flags |= MHNYES;
  41194. + 
  41195. +             free (cp);
  41196. +             if (result) {
  41197. +             Msgs[msgnum].m_flags |= MHNYES;
  41198. +             return result;
  41199. +             }
  41200. +             break;
  41201. +         }
  41202. +         while (state == FLDPLUS)
  41203. +             state = m_getfld (state, name, buf, sizeof buf, fp);
  41204. +         break;
  41205. + 
  41206. +         default:
  41207. +         return 0;
  41208. +     }
  41209. + }
  41210. + #endif    /* MIME */
  41211. + 
  41212. + /*   */
  41213. + 
  41214.   static struct swit sortswit[] = {
  41215.   #define    SODATE    0
  41216.       "datefield field", 0,
  41217. ***************
  41218. *** 2405,2411 ****
  41219.   #define    SOHELP    7
  41220.       "help", 4,
  41221.   
  41222. !     NULL, NULL
  41223.   };
  41224.   
  41225.   /*   */
  41226. --- 2873,2879 ----
  41227.   #define    SOHELP    7
  41228.       "help", 4,
  41229.   
  41230. !     NULL, 0
  41231.   };
  41232.   
  41233.   /*   */
  41234. ***************
  41235. *** 2656,2665 ****
  41236.       cp = s;
  41237.       dp = s;    /* dst pointer */
  41238.       if (uleq (subj, "subject"))
  41239. !         while (c = *cp++) {
  41240.           if (! isspace(c)) {
  41241. !             if ((c == 'R' || c == 'r') &&
  41242. !                 (cp[0] == 'e' || cp[0] == 'E') && cp[1] == ':')
  41243.               cp += 2;
  41244.               else {
  41245.               if (isalnum(c))
  41246. --- 3124,3132 ----
  41247.       cp = s;
  41248.       dp = s;    /* dst pointer */
  41249.       if (uleq (subj, "subject"))
  41250. !         while (c = *cp) {
  41251.           if (! isspace(c)) {
  41252. !             if(uprf(cp, "re:"))
  41253.               cp += 2;
  41254.               else {
  41255.               if (isalnum(c))
  41256. ***************
  41257. *** 2667,2672 ****
  41258. --- 3134,3140 ----
  41259.               break;
  41260.               }
  41261.           }
  41262. +         cp++;
  41263.           }
  41264.       while (c = *cp++) {
  41265.           if (isalnum(c))
  41266. *** ../mh-6.7.2/uip/packf.c    Thu Oct 29 15:02:34 1987
  41267. --- uip/packf.c    Mon Dec 14 16:21:27 1992
  41268. ***************
  41269. *** 1,4 ****
  41270. --- 1,7 ----
  41271.   /* packf.c - pack a folder (used to be called "pack") */
  41272. + #ifndef lint
  41273. + static char ident[] = "@(#)$Id: packf.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  41274. + #endif    /*  lint */
  41275.   
  41276.   #include "../h/mh.h"
  41277.   #include "../h/dropsbr.h"
  41278. ***************
  41279. *** 6,11 ****
  41280. --- 9,17 ----
  41281.   #include <stdio.h>
  41282.   #include <sys/types.h>
  41283.   #include <sys/stat.h>
  41284. + #ifdef LOCALE
  41285. + #include    <locale.h>
  41286. + #endif
  41287.   
  41288.   /*   */
  41289.   
  41290. ***************
  41291. *** 16,22 ****
  41292.   #define    HELPSW    1
  41293.       "help", 4,
  41294.   
  41295. !     NULL, NULL
  41296.   };
  41297.   
  41298.   /*   */
  41299. --- 22,28 ----
  41300.   #define    HELPSW    1
  41301.       "help", 4,
  41302.   
  41303. !     NULL, 0
  41304.   };
  41305.   
  41306.   /*   */
  41307. ***************
  41308. *** 51,56 ****
  41309. --- 57,65 ----
  41310.       struct msgs *mp;
  41311.       struct stat st;
  41312.   
  41313. + #ifdef LOCALE
  41314. +     setlocale(LC_ALL, "");
  41315. + #endif
  41316.       invo_name = r1bindex (argv[0], '/');
  41317.       if ((cp = m_find (invo_name)) != NULL) {
  41318.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  41319. *** ../mh-6.7.2/uip/pick.c    Thu Oct 29 15:02:35 1987
  41320. --- uip/pick.c    Mon Dec 14 16:21:28 1992
  41321. ***************
  41322. *** 1,8 ****
  41323. --- 1,14 ----
  41324.   /* pick.c - select messages by content */
  41325. + #ifndef lint
  41326. + static char ident[] = "@(#)$Id: pick.c,v 1.4 1992/12/15 00:20:22 jromine Exp $";
  41327. + #endif    /*  lint */
  41328.   
  41329.   #include "../h/mh.h"
  41330.   #include "../zotnet/tws.h"
  41331.   #include <stdio.h>
  41332. + #ifdef LOCALE
  41333. + #include    <locale.h>
  41334. + #endif
  41335.   
  41336.   /*   */
  41337.   
  41338. ***************
  41339. *** 58,64 ****
  41340.   #define    HELPSW    22
  41341.       "help", 4,
  41342.   
  41343. !     NULL, NULL
  41344.   };
  41345.   
  41346.   /*   */
  41347. --- 64,70 ----
  41348.   #define    HELPSW    22
  41349.       "help", 4,
  41350.   
  41351. !     NULL, 0
  41352.   };
  41353.   
  41354.   /*   */
  41355. ***************
  41356. *** 93,98 ****
  41357. --- 99,107 ----
  41358.       struct msgs *mp;
  41359.       register FILE *fp;
  41360.   
  41361. + #ifdef LOCALE
  41362. +     setlocale(LC_ALL, "");
  41363. + #endif
  41364.       invo_name = r1bindex (argv[0], '/');
  41365.       if ((cp = m_find (invo_name)) != NULL) {
  41366.       ap = brkstring (cp = getcpy (cp), " ", "\n");
  41367. *** ../mh-6.7.2/uip/picksbr.c    Thu Apr  5 16:03:46 1990
  41368. --- uip/picksbr.c    Mon Dec 14 16:21:29 1992
  41369. ***************
  41370. *** 1,7 ****
  41371.   /* picksbr.c - routines to help pick along... */
  41372.   #ifndef    lint
  41373. ! static char ident[] = "@(#)$Id: picksbr.c,v 1.5 90/04/05 15:01:50 sources Exp $";
  41374. ! #endif    lint
  41375.   
  41376.   #include "../h/mh.h"
  41377.   #include "../zotnet/tws.h"
  41378. --- 1,7 ----
  41379.   /* picksbr.c - routines to help pick along... */
  41380.   #ifndef    lint
  41381. ! static char ident[] = "@(#)$Id: picksbr.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  41382. ! #endif    /* lint */
  41383.   
  41384.   #include "../h/mh.h"
  41385.   #include "../zotnet/tws.h"
  41386. ***************
  41387. *** 43,49 ****
  41388.   #define    PRDATF    14
  41389.       "datefield field", 5,
  41390.   
  41391. !     NULL, NULL
  41392.   };
  41393.   
  41394.   /*     DEFINITIONS FOR PATTERN MATCHING */
  41395. --- 43,49 ----
  41396.   #define    PRDATF    14
  41397.       "datefield field", 5,
  41398.   
  41399. !     NULL, 0
  41400.   };
  41401.   
  41402.   /*     DEFINITIONS FOR PATTERN MATCHING */
  41403. ***************
  41404. *** 668,674 ****
  41405.           *p1++ = c;
  41406.       }
  41407.   
  41408. !     *p1++ = NULL;
  41409.       cbp = p2;
  41410.       p1 = linebuf;
  41411.       p2 = n -> n_expbuf;
  41412. --- 668,674 ----
  41413.           *p1++ = c;
  41414.       }
  41415.   
  41416. !     *p1++ = 0;
  41417.       cbp = p2;
  41418.       p1 = linebuf;
  41419.       p2 = n -> n_expbuf;
  41420. ***************
  41421. *** 844,855 ****
  41422.       if ((tw = dparsetime (buffer)) != NULL)
  41423.       return tw;
  41424.   
  41425. !     (void) sprintf (buffer, "%02d %s %02d %s",
  41426.           ts -> tw_mday, tw_moty[ts -> tw_mon], ts -> tw_year, ap);
  41427.       if ((tw = dparsetime (buffer)) != NULL)
  41428.       return tw;
  41429.   
  41430. !     (void) sprintf (buffer, "%02d %s %02d %s %s",
  41431.           ts -> tw_mday, tw_moty[ts -> tw_mon], ts -> tw_year,
  41432.           ap, dtwszone (ts));
  41433.       if ((tw = dparsetime (buffer)) != NULL)
  41434. --- 844,855 ----
  41435.       if ((tw = dparsetime (buffer)) != NULL)
  41436.       return tw;
  41437.   
  41438. !     (void) sprintf (buffer, "%02d %s %04d %s",
  41439.           ts -> tw_mday, tw_moty[ts -> tw_mon], ts -> tw_year, ap);
  41440.       if ((tw = dparsetime (buffer)) != NULL)
  41441.       return tw;
  41442.   
  41443. !     (void) sprintf (buffer, "%02d %s %04d %s %s",
  41444.           ts -> tw_mday, tw_moty[ts -> tw_mon], ts -> tw_year,
  41445.           ap, dtwszone (ts));
  41446.       if ((tw = dparsetime (buffer)) != NULL)
  41447. *** /dev/null    Tue Dec 15 08:01:10 1992
  41448. --- uip/popi.c    Wed Oct 28 13:34:36 1992
  41449. ***************
  41450. *** 0 ****
  41451. --- 1,685 ----
  41452. + /* popi.c - POP initiator - for MPOP */
  41453. + #ifndef    lint
  41454. + static char ident[] = "@(#)$Id: popi.c,v 1.8 1992/10/28 18:52:45 jromine Exp $";
  41455. + #endif    lint
  41456. + 
  41457. + #include "../h/mh.h"
  41458. + #include "../h/formatsbr.h"
  41459. + #include "../h/scansbr.h"
  41460. + #include <errno.h>
  41461. + #include <stdio.h>
  41462. + #include <sys/types.h>
  41463. + #ifdef    SMTP
  41464. + #include "../h/local.h"
  41465. + #else    /* SMTP */
  41466. + #include <sys/stat.h>
  41467. + #endif    /* SMTP */
  41468. + #include "../zotnet/mts.h"
  41469. + 
  41470. + /*   */
  41471. + 
  41472. + #ifndef    RPOP
  41473. + #define    RPOPminc(a)    (a)
  41474. + #else
  41475. + #define    RPOPminc(a)    0
  41476. + #endif
  41477. + 
  41478. + #ifndef    APOP
  41479. + #define    APOPminc(a)    (a)
  41480. + #else
  41481. + #define    APOPminc(a)    0
  41482. + #endif
  41483. + 
  41484. + #ifndef    BPOP
  41485. + #define    BPOPminc(a)    (a)
  41486. + #else
  41487. + #define    BPOPminc(a)    0
  41488. + #endif
  41489. + 
  41490. + #ifndef    SMTP
  41491. + #define    BULKminc(a)    (a)
  41492. + #else
  41493. + #define    BULKminc(a)    0
  41494. + #endif
  41495. + 
  41496. + static struct swit  switches[] = {
  41497. + #define    APOPSW    0
  41498. +     "apop", APOPminc (-4),
  41499. + #define    NAPOPSW    1
  41500. +     "noapop", APOPminc (-6),
  41501. + 
  41502. + #define    AUTOSW    2
  41503. +     "auto", BPOPminc(-4),
  41504. + #define    NAUTOSW    3
  41505. +     "noauto", BPOPminc(-6),
  41506. + 
  41507. + #define    BULKSW    4
  41508. +     "bulk directory", BULKminc(-4),
  41509. + 
  41510. + #define    FORMSW    5
  41511. +     "form formatfile", 0,
  41512. + 
  41513. + #define    FMTSW    6
  41514. +     "format string", 5,
  41515. + 
  41516. + #define    HOSTSW    7
  41517. +     "host host", 0,
  41518. + 
  41519. + #define    PROGSW    8
  41520. +     "mshproc program", 0,
  41521. + 
  41522. + #define    RPOPSW    9
  41523. +     "rpop", RPOPminc (-4),
  41524. + #define    NRPOPSW    10
  41525. +     "norpop", RPOPminc (-6),
  41526. + 
  41527. + #define    USERSW    11
  41528. +     "user user", 0,
  41529. + 
  41530. + #define    WIDSW    12
  41531. +     "width columns", 0,
  41532. + 
  41533. + #define    HELPSW    13
  41534. +     "help", 4,
  41535. + 
  41536. +     NULL, 0
  41537. + };
  41538. + 
  41539. + /*   */
  41540. + 
  41541. + static    char   *bulksw = NULLCP;
  41542. + static    int    snoop = 0;
  41543. + static    int    width = 0;
  41544. + 
  41545. + static    char    mailname[BUFSIZ];
  41546. + 
  41547. + static    char   *nfs = NULL;
  41548. + 
  41549. + static    struct msgs *mp;
  41550. + 
  41551. + extern    int    errno;
  41552. + 
  41553. + extern    char    response[];
  41554. + 
  41555. + /*   */
  41556. + 
  41557. + /* ARGSUSED */
  41558. + 
  41559. + main (argc, argv)
  41560. + int    argc;
  41561. + char   *argv[];
  41562. + {
  41563. +     int        autosw = 1,
  41564. +         noisy = 1,
  41565. +         rpop;
  41566. +     char   *cp,
  41567. +        *maildir,
  41568. +        *folder = NULL,
  41569. +        *form = NULL,
  41570. +        *format = NULL,
  41571. +        *host = NULL,
  41572. +        *user = NULL,
  41573. +        *pass = NULL,
  41574. +         buf[100],
  41575. +       **ap,
  41576. +       **argp,
  41577. +        *arguments[MAXARGS];
  41578. +     struct stat st;
  41579. + 
  41580. +     invo_name = r1bindex (argv[0], '/');
  41581. +     mts_init (invo_name);
  41582. +     if (pophost && *pophost)
  41583. +     host = pophost;
  41584. +     if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  41585. +     snoop++;
  41586. +     if ((cp = m_find (invo_name)) != NULL) {
  41587. +     ap = brkstring (cp = getcpy (cp), " ", "\n");
  41588. +     ap = copyip (ap, arguments);
  41589. +     }
  41590. +     else
  41591. +     ap = arguments;
  41592. +     (void) copyip (argv + 1, ap);
  41593. +     argp = arguments;
  41594. + 
  41595. +     rpop = getuid () && !geteuid ();
  41596. + 
  41597. + /*   */
  41598. + 
  41599. +     while (cp = *argp++) {
  41600. +     if (*cp == '-')
  41601. +         switch (smatch (++cp, switches)) {
  41602. +         case AMBIGSW: 
  41603. +             ambigsw (cp, switches);
  41604. +             done (1);
  41605. +         case UNKWNSW: 
  41606. +             adios (NULLCP, "-%s unknown", cp);
  41607. +         case HELPSW: 
  41608. +             (void) sprintf (buf, "%s [+folder] [switches]", invo_name);
  41609. +             help (buf, switches);
  41610. +             done (1);
  41611. + 
  41612. +         case AUTOSW:
  41613. +             autosw = 1;
  41614. +             continue;
  41615. +         case NAUTOSW:
  41616. +             autosw = 0;
  41617. +             continue;
  41618. + 
  41619. +         case BULKSW: 
  41620. +             if (!(bulksw = *argp++) || *bulksw == '-')
  41621. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41622. +             continue;
  41623. + 
  41624. +         case FORMSW: 
  41625. +             if (!(form = *argp++) || *form == '-')
  41626. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41627. +             format = NULL;
  41628. +             continue;
  41629. +         case FMTSW: 
  41630. +             if (!(format = *argp++) || *format == '-')
  41631. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41632. +             form = NULL;
  41633. +             continue;
  41634. + 
  41635. +         case WIDSW: 
  41636. +             if (!(cp = *argp++) || *cp == '-')
  41637. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41638. +             width = atoi (cp);
  41639. +             continue;
  41640. + 
  41641. +         case HOSTSW:
  41642. +             if (!(host = *argp++) || *host == '-')
  41643. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41644. +             continue;
  41645. +         case USERSW:
  41646. +             if (!(user = *argp++) || *user == '-')
  41647. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41648. +             continue;
  41649. + 
  41650. +         case APOPSW:
  41651. +             rpop = -1;
  41652. +             continue;
  41653. +         case RPOPSW:
  41654. +             rpop = 1;
  41655. +             continue;
  41656. +         case NAPOPSW:
  41657. +         case NRPOPSW:
  41658. +             rpop = 0;
  41659. +             continue;
  41660. + 
  41661. +         case PROGSW:
  41662. +             if (!(mshproc = *argp++) || *mshproc == '-')
  41663. +             adios (NULLCP, "missing argument to %s", argp[-2]);
  41664. +             continue;
  41665. +         }
  41666. +     if (*cp == '+' || *cp == '@') {
  41667. +         if (folder)
  41668. +         adios (NULLCP, "only one folder at a time!");
  41669. +         else
  41670. +         folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF);
  41671. +     }
  41672. +     else
  41673. +         adios (NULLCP, "usage: %s [+folder] [switches]", invo_name);
  41674. +     }
  41675. + 
  41676. + /*   */
  41677. + 
  41678. +     if (!host)
  41679. +     adios (NULLCP, "usage: %s -h